Theorem kelac1 31171

Description: Kelley's choice, basic form: if a collection of sets can be cast as closed sets in the factors of a topology, and there is a definable element in each topology (which need not be in the closed set - if it were this would be trivial), then compactness (via finite intersection) guarantees that the final product is nonempty. (Contributed by Stefan O'Rear, 22-Feb-2015.)

Hypotheses

Ref	Expression
kelac1.z	|- ( ( ph /\ x e. I ) -> S =/= (/) )
kelac1.j	|- ( ( ph /\ x e. I ) -> J e. Top )
kelac1.c	|- ( ( ph /\ x e. I ) -> C e. ( Clsd ` J ) )
kelac1.b	|- ( ( ph /\ x e. I ) -> B : S -1-1-onto-> C )
kelac1.u	|- ( ( ph /\ x e. I ) -> U e. U. J )
kelac1.k	|- ( ph -> ( Xt_ ` ( x e. I |-> J ) ) e. Comp )

Assertion

Ref	Expression
kelac1	|- ( ph -> X_ x e. I S =/= (/) )

Distinct variable groups:   ph, x   x, I

Allowed substitution hints:   B( x)   C( x)   S( x)   U( x)   J( x)

Proof of Theorem kelac1

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

Step	Hyp	Ref	Expression
1		kelac1.c	. . . . . . 7 |- ( ( ph /\ x e. I ) -> C e. ( Clsd ` J ) )
2		eqid 2457	. . . . . . . 8 |- U. J = U. J
3	2	cldss 19656	. . . . . . 7 |- ( C e. ( Clsd ` J ) -> C C_ U. J )
4	1, 3	syl 16	. . . . . 6 |- ( ( ph /\ x e. I ) -> C C_ U. J )
5	4	ralrimiva 2871	. . . . 5 |- ( ph -> A. x e. I C C_ U. J )
6		boxriin 7530	. . . . 5 |- ( A. x e. I C C_ U. J -> X_ x e. I C = ( X_ x e. I U. J i^i |^|_ y e. I X_ x e. I if ( x = y , C , U. J ) ) )
7	5, 6	syl 16	. . . 4 |- ( ph -> X_ x e. I C = ( X_ x e. I U. J i^i |^|_ y e. I X_ x e. I if ( x = y , C , U. J ) ) )
8		kelac1.k	. . . . . . . . 9 |- ( ph -> ( Xt_ ` ( x e. I |-> J ) ) e. Comp )
9		cmptop 20021	. . . . . . . . 9 |- ( ( Xt_ ` ( x e. I |-> J ) ) e. Comp -> ( Xt_ ` ( x e. I |-> J ) ) e. Top )
10		0ntop 19540	. . . . . . . . . . 11 |- -. (/) e. Top
11		fvprc 5866	. . . . . . . . . . . 12 |- ( -. ( x e. I |-> J ) e. _V -> ( Xt_ ` ( x e. I |-> J ) ) = (/) )
12	11	eleq1d 2526	. . . . . . . . . . 11 |- ( -. ( x e. I |-> J ) e. _V -> ( ( Xt_ ` ( x e. I |-> J ) ) e. Top <-> (/) e. Top ) )
13	10, 12	mtbiri 303	. . . . . . . . . 10 |- ( -. ( x e. I |-> J ) e. _V -> -. ( Xt_ ` ( x e. I |-> J ) ) e. Top )
14	13	con4i 130	. . . . . . . . 9 |- ( ( Xt_ ` ( x e. I |-> J ) ) e. Top -> ( x e. I |-> J ) e. _V )
15	8, 9, 14	3syl 20	. . . . . . . 8 |- ( ph -> ( x e. I |-> J ) e. _V )
16		kelac1.j	. . . . . . . . 9 |- ( ( ph /\ x e. I ) -> J e. Top )
17		eqid 2457	. . . . . . . . 9 |- ( x e. I |-> J ) = ( x e. I |-> J )
18	16, 17	fmptd 6056	. . . . . . . 8 |- ( ph -> ( x e. I |-> J ) : I --> Top )
19		dmfex 6757	. . . . . . . 8 |- ( ( ( x e. I |-> J ) e. _V /\ ( x e. I |-> J ) : I --> Top ) -> I e. _V )
20	15, 18, 19	syl2anc 661	. . . . . . 7 |- ( ph -> I e. _V )
21	16	ralrimiva 2871	. . . . . . 7 |- ( ph -> A. x e. I J e. Top )
22		eqid 2457	. . . . . . . 8 |- ( Xt_ ` ( x e. I |-> J ) ) = ( Xt_ ` ( x e. I |-> J ) )
23	22	ptunimpt 20221	. . . . . . 7 |- ( ( I e. _V /\ A. x e. I J e. Top ) -> X_ x e. I U. J = U. ( Xt_ ` ( x e. I |-> J ) ) )
24	20, 21, 23	syl2anc 661	. . . . . 6 |- ( ph -> X_ x e. I U. J = U. ( Xt_ ` ( x e. I |-> J ) ) )
25	24	ineq1d 3695	. . . . 5 |- ( ph -> ( X_ x e. I U. J i^i |^|_ y e. I X_ x e. I if ( x = y , C , U. J ) ) = ( U. ( Xt_ ` ( x e. I |-> J ) ) i^i |^|_ y e. I X_ x e. I if ( x = y , C , U. J ) ) )
26		eqid 2457	. . . . . 6 |- U. ( Xt_ ` ( x e. I |-> J ) ) = U. ( Xt_ ` ( x e. I |-> J ) )
27	2	topcld 19662	. . . . . . . . . 10 |- ( J e. Top -> U. J e. ( Clsd ` J ) )
28	16, 27	syl 16	. . . . . . . . 9 |- ( ( ph /\ x e. I ) -> U. J e. ( Clsd ` J ) )
29	1, 28	ifcld 3987	. . . . . . . 8 |- ( ( ph /\ x e. I ) -> if ( x = y , C , U. J ) e. ( Clsd ` J ) )
30	20, 16, 29	ptcldmpt 20240	. . . . . . 7 |- ( ph -> X_ x e. I if ( x = y , C , U. J ) e. ( Clsd ` ( Xt_ ` ( x e. I |-> J ) ) ) )
31	30	adantr 465	. . . . . 6 |- ( ( ph /\ y e. I ) -> X_ x e. I if ( x = y , C , U. J ) e. ( Clsd ` ( Xt_ ` ( x e. I |-> J ) ) ) )
32		simprr 757	. . . . . . . 8 |- ( ( ph /\ ( z C_ I /\ z e. Fin ) ) -> z e. Fin )
33		kelac1.b	. . . . . . . . . . . . . . 15 |- ( ( ph /\ x e. I ) -> B : S -1-1-onto-> C )
34		f1ofo 5829	. . . . . . . . . . . . . . 15 |- ( B : S -1-1-onto-> C -> B : S -onto-> C )
35		foima 5806	. . . . . . . . . . . . . . 15 |- ( B : S -onto-> C -> ( B " S ) = C )
36	33, 34, 35	3syl 20	. . . . . . . . . . . . . 14 |- ( ( ph /\ x e. I ) -> ( B " S ) = C )
37	36	eqcomd 2465	. . . . . . . . . . . . 13 |- ( ( ph /\ x e. I ) -> C = ( B " S ) )
38		kelac1.z	. . . . . . . . . . . . . 14 |- ( ( ph /\ x e. I ) -> S =/= (/) )
39		f1ofn 5823	. . . . . . . . . . . . . . . . 17 |- ( B : S -1-1-onto-> C -> B Fn S )
40	33, 39	syl 16	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ x e. I ) -> B Fn S )
41		ssid 3518	. . . . . . . . . . . . . . . 16 |- S C_ S
42		fnimaeq0 5708	. . . . . . . . . . . . . . . 16 |- ( ( B Fn S /\ S C_ S ) -> ( ( B " S ) = (/) <-> S = (/) ) )
43	40, 41, 42	sylancl 662	. . . . . . . . . . . . . . 15 |- ( ( ph /\ x e. I ) -> ( ( B " S ) = (/) <-> S = (/) ) )
44	43	necon3bid 2715	. . . . . . . . . . . . . 14 |- ( ( ph /\ x e. I ) -> ( ( B " S ) =/= (/) <-> S =/= (/) ) )
45	38, 44	mpbird 232	. . . . . . . . . . . . 13 |- ( ( ph /\ x e. I ) -> ( B " S ) =/= (/) )
46	37, 45	eqnetrd 2750	. . . . . . . . . . . 12 |- ( ( ph /\ x e. I ) -> C =/= (/) )
47		n0 3803	. . . . . . . . . . . 12 |- ( C =/= (/) <-> E. w w e. C )
48	46, 47	sylib 196	. . . . . . . . . . 11 |- ( ( ph /\ x e. I ) -> E. w w e. C )
49		rexv 3124	. . . . . . . . . . 11 |- ( E. w e. _V w e. C <-> E. w w e. C )
50	48, 49	sylibr 212	. . . . . . . . . 10 |- ( ( ph /\ x e. I ) -> E. w e. _V w e. C )
51	50	ralrimiva 2871	. . . . . . . . 9 |- ( ph -> A. x e. I E. w e. _V w e. C )
52		ssralv 3560	. . . . . . . . . 10 |- ( z C_ I -> ( A. x e. I E. w e. _V w e. C -> A. x e. z E. w e. _V w e. C ) )
53	52	adantr 465	. . . . . . . . 9 |- ( ( z C_ I /\ z e. Fin ) -> ( A. x e. I E. w e. _V w e. C -> A. x e. z E. w e. _V w e. C ) )
54	51, 53	mpan9 469	. . . . . . . 8 |- ( ( ph /\ ( z C_ I /\ z e. Fin ) ) -> A. x e. z E. w e. _V w e. C )
55		eleq1 2529	. . . . . . . . 9 |- ( w = ( f ` x ) -> ( w e. C <-> ( f ` x ) e. C ) )
56	55	ac6sfi 7782	. . . . . . . 8 |- ( ( z e. Fin /\ A. x e. z E. w e. _V w e. C ) -> E. f ( f : z --> _V /\ A. x e. z ( f ` x ) e. C ) )
57	32, 54, 56	syl2anc 661	. . . . . . 7 |- ( ( ph /\ ( z C_ I /\ z e. Fin ) ) -> E. f ( f : z --> _V /\ A. x e. z ( f ` x ) e. C ) )
58	24	eqcomd 2465	. . . . . . . . . . 11 |- ( ph -> U. ( Xt_ ` ( x e. I |-> J ) ) = X_ x e. I U. J )
59	58	ineq1d 3695	. . . . . . . . . 10 |- ( ph -> ( U. ( Xt_ ` ( x e. I |-> J ) ) i^i |^|_ y e. z X_ x e. I if ( x = y , C , U. J ) ) = ( X_ x e. I U. J i^i |^|_ y e. z X_ x e. I if ( x = y , C , U. J ) ) )
60	59	ad2antrr 725	. . . . . . . . 9 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> ( U. ( Xt_ ` ( x e. I |-> J ) ) i^i |^|_ y e. z X_ x e. I if ( x = y , C , U. J ) ) = ( X_ x e. I U. J i^i |^|_ y e. z X_ x e. I if ( x = y , C , U. J ) ) )
61		iftrue 3950	. . . . . . . . . . . . . . . . . . 19 |- ( x e. z -> if ( x e. z , ( f ` x ) , U ) = ( f ` x ) )
62	61	ad2antrl 727	. . . . . . . . . . . . . . . . . 18 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ ( x e. z /\ ( f ` x ) e. C ) ) -> if ( x e. z , ( f ` x ) , U ) = ( f ` x ) )
63		simpll 753	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ x e. z ) -> ph )
64		simprl 756	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ph /\ ( z C_ I /\ z e. Fin ) ) -> z C_ I )
65	64	sselda 3499	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ x e. z ) -> x e. I )
66	63, 65, 4	syl2anc 661	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ x e. z ) -> C C_ U. J )
67	66	sseld 3498	. . . . . . . . . . . . . . . . . . 19 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ x e. z ) -> ( ( f ` x ) e. C -> ( f ` x ) e. U. J ) )
68	67	impr 619	. . . . . . . . . . . . . . . . . 18 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ ( x e. z /\ ( f ` x ) e. C ) ) -> ( f ` x ) e. U. J )
69	62, 68	eqeltrd 2545	. . . . . . . . . . . . . . . . 17 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ ( x e. z /\ ( f ` x ) e. C ) ) -> if ( x e. z , ( f ` x ) , U ) e. U. J )
70	69	expr 615	. . . . . . . . . . . . . . . 16 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ x e. z ) -> ( ( f ` x ) e. C -> if ( x e. z , ( f ` x ) , U ) e. U. J ) )
71	70	ralimdva 2865	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( z C_ I /\ z e. Fin ) ) -> ( A. x e. z ( f ` x ) e. C -> A. x e. z if ( x e. z , ( f ` x ) , U ) e. U. J ) )
72	71	imp 429	. . . . . . . . . . . . . 14 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> A. x e. z if ( x e. z , ( f ` x ) , U ) e. U. J )
73		eldifn 3623	. . . . . . . . . . . . . . . . . . 19 |- ( x e. ( I \ z ) -> -. x e. z )
74	73	iffalsed 3955	. . . . . . . . . . . . . . . . . 18 |- ( x e. ( I \ z ) -> if ( x e. z , ( f ` x ) , U ) = U )
75	74	adantl 466	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ x e. ( I \ z ) ) -> if ( x e. z , ( f ` x ) , U ) = U )
76		eldifi 3622	. . . . . . . . . . . . . . . . . 18 |- ( x e. ( I \ z ) -> x e. I )
77		kelac1.u	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ x e. I ) -> U e. U. J )
78	76, 77	sylan2 474	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ x e. ( I \ z ) ) -> U e. U. J )
79	75, 78	eqeltrd 2545	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ x e. ( I \ z ) ) -> if ( x e. z , ( f ` x ) , U ) e. U. J )
80	79	ralrimiva 2871	. . . . . . . . . . . . . . 15 |- ( ph -> A. x e. ( I \ z ) if ( x e. z , ( f ` x ) , U ) e. U. J )
81	80	ad2antrr 725	. . . . . . . . . . . . . 14 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> A. x e. ( I \ z ) if ( x e. z , ( f ` x ) , U ) e. U. J )
82		ralun 3682	. . . . . . . . . . . . . 14 |- ( ( A. x e. z if ( x e. z , ( f ` x ) , U ) e. U. J /\ A. x e. ( I \ z ) if ( x e. z , ( f ` x ) , U ) e. U. J ) -> A. x e. ( z u. ( I \ z ) ) if ( x e. z , ( f ` x ) , U ) e. U. J )
83	72, 81, 82	syl2anc 661	. . . . . . . . . . . . 13 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> A. x e. ( z u. ( I \ z ) ) if ( x e. z , ( f ` x ) , U ) e. U. J )
84		undif 3911	. . . . . . . . . . . . . . . . 17 |- ( z C_ I <-> ( z u. ( I \ z ) ) = I )
85	84	biimpi 194	. . . . . . . . . . . . . . . 16 |- ( z C_ I -> ( z u. ( I \ z ) ) = I )
86	85	ad2antrl 727	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( z C_ I /\ z e. Fin ) ) -> ( z u. ( I \ z ) ) = I )
87	86	raleqdv 3060	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( z C_ I /\ z e. Fin ) ) -> ( A. x e. ( z u. ( I \ z ) ) if ( x e. z , ( f ` x ) , U ) e. U. J <-> A. x e. I if ( x e. z , ( f ` x ) , U ) e. U. J ) )
88	87	adantr 465	. . . . . . . . . . . . 13 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> ( A. x e. ( z u. ( I \ z ) ) if ( x e. z , ( f ` x ) , U ) e. U. J <-> A. x e. I if ( x e. z , ( f ` x ) , U ) e. U. J ) )
89	83, 88	mpbid 210	. . . . . . . . . . . 12 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> A. x e. I if ( x e. z , ( f ` x ) , U ) e. U. J )
90	20	ad2antrr 725	. . . . . . . . . . . . 13 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> I e. _V )
91		mptelixpg 7525	. . . . . . . . . . . . 13 |- ( I e. _V -> ( ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. X_ x e. I U. J <-> A. x e. I if ( x e. z , ( f ` x ) , U ) e. U. J ) )
92	90, 91	syl 16	. . . . . . . . . . . 12 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> ( ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. X_ x e. I U. J <-> A. x e. I if ( x e. z , ( f ` x ) , U ) e. U. J ) )
93	89, 92	mpbird 232	. . . . . . . . . . 11 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. X_ x e. I U. J )
94		eleq2 2530	. . . . . . . . . . . . . . . . . . . . . 22 |- ( C = if ( x = y , C , U. J ) -> ( ( f ` x ) e. C <-> ( f ` x ) e. if ( x = y , C , U. J ) ) )
95		eleq2 2530	. . . . . . . . . . . . . . . . . . . . . 22 |- ( U. J = if ( x = y , C , U. J ) -> ( ( f ` x ) e. U. J <-> ( f ` x ) e. if ( x = y , C , U. J ) ) )
96		simplrr 762	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ ( x e. z /\ ( f ` x ) e. C ) ) /\ x = y ) -> ( f ` x ) e. C )
97	68	adantr 465	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ ( x e. z /\ ( f ` x ) e. C ) ) /\ -. x = y ) -> ( f ` x ) e. U. J )
98	94, 95, 96, 97	ifbothda 3979	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ ( x e. z /\ ( f ` x ) e. C ) ) -> ( f ` x ) e. if ( x = y , C , U. J ) )
99	62, 98	eqeltrd 2545	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ ( x e. z /\ ( f ` x ) e. C ) ) -> if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) )
100	99	expr 615	. . . . . . . . . . . . . . . . . . 19 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ x e. z ) -> ( ( f ` x ) e. C -> if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) ) )
101	100	ralimdva 2865	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ ( z C_ I /\ z e. Fin ) ) -> ( A. x e. z ( f ` x ) e. C -> A. x e. z if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) ) )
102	101	imp 429	. . . . . . . . . . . . . . . . 17 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> A. x e. z if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) )
103	102	adantr 465	. . . . . . . . . . . . . . . 16 |- ( ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) /\ y e. z ) -> A. x e. z if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) )
104	78	adantlr 714	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> U e. U. J )
105	74	adantl 466	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> if ( x e. z , ( f ` x ) , U ) = U )
106		incom 3687	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( I \ z ) i^i z ) = ( z i^i ( I \ z ) )
107		disjdif 3903	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( z i^i ( I \ z ) ) = (/)
108	106, 107	eqtri 2486	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( I \ z ) i^i z ) = (/)
109	108	a1i 11	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> ( ( I \ z ) i^i z ) = (/) )
110		simpr 461	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> x e. ( I \ z ) )
111		simplr 755	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> y e. z )
112		disjne 3875	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ( ( I \ z ) i^i z ) = (/) /\ x e. ( I \ z ) /\ y e. z ) -> x =/= y )
113	109, 110, 111, 112	syl3anc 1228	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> x =/= y )
114	113	neneqd 2659	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> -. x = y )
115	114	iffalsed 3955	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> if ( x = y , C , U. J ) = U. J )
116	104, 105, 115	3eltr4d 2560	. . . . . . . . . . . . . . . . . . 19 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) )
117	116	ralrimiva 2871	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ y e. z ) -> A. x e. ( I \ z ) if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) )
118	117	adantlr 714	. . . . . . . . . . . . . . . . 17 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ y e. z ) -> A. x e. ( I \ z ) if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) )
119	118	adantlr 714	. . . . . . . . . . . . . . . 16 |- ( ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) /\ y e. z ) -> A. x e. ( I \ z ) if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) )
120		ralun 3682	. . . . . . . . . . . . . . . 16 |- ( ( A. x e. z if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) /\ A. x e. ( I \ z ) if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) ) -> A. x e. ( z u. ( I \ z ) ) if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) )
121	103, 119, 120	syl2anc 661	. . . . . . . . . . . . . . 15 |- ( ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) /\ y e. z ) -> A. x e. ( z u. ( I \ z ) ) if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) )
122	86	raleqdv 3060	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( z C_ I /\ z e. Fin ) ) -> ( A. x e. ( z u. ( I \ z ) ) if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) <-> A. x e. I if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) ) )
123	122	ad2antrr 725	. . . . . . . . . . . . . . 15 |- ( ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) /\ y e. z ) -> ( A. x e. ( z u. ( I \ z ) ) if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) <-> A. x e. I if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) ) )
124	121, 123	mpbid 210	. . . . . . . . . . . . . 14 |- ( ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) /\ y e. z ) -> A. x e. I if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) )
125	20	ad3antrrr 729	. . . . . . . . . . . . . . 15 |- ( ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) /\ y e. z ) -> I e. _V )
126		mptelixpg 7525	. . . . . . . . . . . . . . 15 |- ( I e. _V -> ( ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. X_ x e. I if ( x = y , C , U. J ) <-> A. x e. I if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) ) )
127	125, 126	syl 16	. . . . . . . . . . . . . 14 |- ( ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) /\ y e. z ) -> ( ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. X_ x e. I if ( x = y , C , U. J ) <-> A. x e. I if ( x e. z , ( f ` x ) , U ) e. if ( x = y , C , U. J ) ) )
128	124, 127	mpbird 232	. . . . . . . . . . . . 13 |- ( ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) /\ y e. z ) -> ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. X_ x e. I if ( x = y , C , U. J ) )
129	128	ralrimiva 2871	. . . . . . . . . . . 12 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> A. y e. z ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. X_ x e. I if ( x = y , C , U. J ) )
130		mptexg 6143	. . . . . . . . . . . . . . 15 |- ( I e. _V -> ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. _V )
131	20, 130	syl 16	. . . . . . . . . . . . . 14 |- ( ph -> ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. _V )
132	131	ad2antrr 725	. . . . . . . . . . . . 13 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. _V )
133		eliin 4338	. . . . . . . . . . . . 13 |- ( ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. _V -> ( ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. |^|_ y e. z X_ x e. I if ( x = y , C , U. J ) <-> A. y e. z ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. X_ x e. I if ( x = y , C , U. J ) ) )
134	132, 133	syl 16	. . . . . . . . . . . 12 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> ( ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. |^|_ y e. z X_ x e. I if ( x = y , C , U. J ) <-> A. y e. z ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. X_ x e. I if ( x = y , C , U. J ) ) )
135	129, 134	mpbird 232	. . . . . . . . . . 11 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. |^|_ y e. z X_ x e. I if ( x = y , C , U. J ) )
136	93, 135	elind 3684	. . . . . . . . . 10 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. ( X_ x e. I U. J i^i |^|_ y e. z X_ x e. I if ( x = y , C , U. J ) ) )
137		ne0i 3799	. . . . . . . . . 10 |- ( ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. ( X_ x e. I U. J i^i |^|_ y e. z X_ x e. I if ( x = y , C , U. J ) ) -> ( X_ x e. I U. J i^i |^|_ y e. z X_ x e. I if ( x = y , C , U. J ) ) =/= (/) )
138	136, 137	syl 16	. . . . . . . . 9 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> ( X_ x e. I U. J i^i |^|_ y e. z X_ x e. I if ( x = y , C , U. J ) ) =/= (/) )
139	60, 138	eqnetrd 2750	. . . . . . . 8 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> ( U. ( Xt_ ` ( x e. I |-> J ) ) i^i |^|_ y e. z X_ x e. I if ( x = y , C , U. J ) ) =/= (/) )
140	139	adantrl 715	. . . . . . 7 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ ( f : z --> _V /\ A. x e. z ( f ` x ) e. C ) ) -> ( U. ( Xt_ ` ( x e. I |-> J ) ) i^i |^|_ y e. z X_ x e. I if ( x = y , C , U. J ) ) =/= (/) )
141	57, 140	exlimddv 1727	. . . . . 6 |- ( ( ph /\ ( z C_ I /\ z e. Fin ) ) -> ( U. ( Xt_ ` ( x e. I |-> J ) ) i^i |^|_ y e. z X_ x e. I if ( x = y , C , U. J ) ) =/= (/) )
142	26, 8, 31, 141	cmpfiiin 30791	. . . . 5 |- ( ph -> ( U. ( Xt_ ` ( x e. I |-> J ) ) i^i |^|_ y e. I X_ x e. I if ( x = y , C , U. J ) ) =/= (/) )
143	25, 142	eqnetrd 2750	. . . 4 |- ( ph -> ( X_ x e. I U. J i^i |^|_ y e. I X_ x e. I if ( x = y , C , U. J ) ) =/= (/) )
144	7, 143	eqnetrd 2750	. . 3 |- ( ph -> X_ x e. I C =/= (/) )
145		n0 3803	. . 3 |- ( X_ x e. I C =/= (/) <-> E. y y e. X_ x e. I C )
146	144, 145	sylib 196	. 2 |- ( ph -> E. y y e. X_ x e. I C )
147		elixp2 7492	. . . . . 6 |- ( y e. X_ x e. I C <-> ( y e. _V /\ y Fn I /\ A. x e. I ( y ` x ) e. C ) )
148	147	simp3bi 1013	. . . . 5 |- ( y e. X_ x e. I C -> A. x e. I ( y ` x ) e. C )
149		f1ocnv 5834	. . . . . . . 8 |- ( B : S -1-1-onto-> C -> `' B : C -1-1-onto-> S )
150		f1of 5822	. . . . . . . 8 |- ( `' B : C -1-1-onto-> S -> `' B : C --> S )
151		ffvelrn 6030	. . . . . . . . 9 |- ( ( `' B : C --> S /\ ( y ` x ) e. C ) -> ( `' B ` ( y ` x ) ) e. S )
152	151	ex 434	. . . . . . . 8 |- ( `' B : C --> S -> ( ( y ` x ) e. C -> ( `' B ` ( y ` x ) ) e. S ) )
153	33, 149, 150, 152	4syl 21	. . . . . . 7 |- ( ( ph /\ x e. I ) -> ( ( y ` x ) e. C -> ( `' B ` ( y ` x ) ) e. S ) )
154	153	ralimdva 2865	. . . . . 6 |- ( ph -> ( A. x e. I ( y ` x ) e. C -> A. x e. I ( `' B ` ( y ` x ) ) e. S ) )
155	154	imp 429	. . . . 5 |- ( ( ph /\ A. x e. I ( y ` x ) e. C ) -> A. x e. I ( `' B ` ( y ` x ) ) e. S )
156	148, 155	sylan2 474	. . . 4 |- ( ( ph /\ y e. X_ x e. I C ) -> A. x e. I ( `' B ` ( y ` x ) ) e. S )
157		mptelixpg 7525	. . . . . 6 |- ( I e. _V -> ( ( x e. I |-> ( `' B ` ( y ` x ) ) ) e. X_ x e. I S <-> A. x e. I ( `' B ` ( y ` x ) ) e. S ) )
158	20, 157	syl 16	. . . . 5 |- ( ph -> ( ( x e. I |-> ( `' B ` ( y ` x ) ) ) e. X_ x e. I S <-> A. x e. I ( `' B ` ( y ` x ) ) e. S ) )
159	158	adantr 465	. . . 4 |- ( ( ph /\ y e. X_ x e. I C ) -> ( ( x e. I |-> ( `' B ` ( y ` x ) ) ) e. X_ x e. I S <-> A. x e. I ( `' B ` ( y ` x ) ) e. S ) )
160	156, 159	mpbird 232	. . 3 |- ( ( ph /\ y e. X_ x e. I C ) -> ( x e. I |-> ( `' B ` ( y ` x ) ) ) e. X_ x e. I S )
161		ne0i 3799	. . 3 |- ( ( x e. I |-> ( `' B ` ( y ` x ) ) ) e. X_ x e. I S -> X_ x e. I S =/= (/) )
162	160, 161	syl 16	. 2 |- ( ( ph /\ y e. X_ x e. I C ) -> X_ x e. I S =/= (/) )
163	146, 162	exlimddv 1727	1 |- ( ph -> X_ x e. I S =/= (/) )

Syntax hints:   -. wn 3   -> wi 4   <-> wb 184   /\ wa 369   = wceq 1395   E.wex 1613   e. wcel 1819   =/= wne 2652   A.wral 2807   E.wrex 2808   _Vcvv 3109   \ cdif 3468   u. cun 3469   i^i cin 3470   C_ wss 3471   (/)c0 3793   ifcif 3944   U.cuni 4251   |^|_ciin 4333   |-> cmpt 4515   `'ccnv 5007   "cima 5011   Fn wfn 5589   -->wf 5590   -onto->wfo 5592   -1-1-onto->wf1o 5593   ` cfv 5594   X_cixp 7488   Fincfn 7535   Xt_cpt 14855   Topctop 19520   Clsdccld 19643   Compccmp 20012

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1619  ax-4 1632  ax-5 1705  ax-6 1748  ax-7 1791  ax-8 1821  ax-9 1823  ax-10 1838  ax-11 1843  ax-12 1855  ax-13 2000  ax-ext 2435  ax-rep 4568  ax-sep 4578  ax-nul 4586  ax-pow 4634  ax-pr 4695  ax-un 6591

This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3or 974  df-3an 975  df-tru 1398  df-ex 1614  df-nf 1618  df-sb 1741  df-eu 2287  df-mo 2288  df-clab 2443  df-cleq 2449  df-clel 2452  df-nfc 2607  df-ne 2654  df-ral 2812  df-rex 2813  df-reu 2814  df-rab 2816  df-v 3111  df-sbc 3328  df-csb 3431  df-dif 3474  df-un 3476  df-in 3478  df-ss 3485  df-pss 3487  df-nul 3794  df-if 3945  df-pw 4017  df-sn 4033  df-pr 4035  df-tp 4037  df-op 4039  df-uni 4252  df-int 4289  df-iun 4334  df-iin 4335  df-br 4457  df-opab 4516  df-mpt 4517  df-tr 4551  df-eprel 4800  df-id 4804  df-po 4809  df-so 4810  df-fr 4847  df-we 4849  df-ord 4890  df-on 4891  df-lim 4892  df-suc 4893  df-xp 5014  df-rel 5015  df-cnv 5016  df-co 5017  df-dm 5018  df-rn 5019  df-res 5020  df-ima 5021  df-iota 5557  df-fun 5596  df-fn 5597  df-f 5598  df-f1 5599  df-fo 5600  df-f1o 5601  df-fv 5602  df-ov 6299  df-oprab 6300  df-mpt2 6301  df-om 6700  df-1st 6799  df-2nd 6800  df-recs 7060  df-rdg 7094  df-1o 7148  df-2o 7149  df-oadd 7152  df-er 7329  df-map 7440  df-ixp 7489  df-en 7536  df-dom 7537  df-sdom 7538  df-fin 7539  df-fi 7889  df-topgen 14860  df-pt 14861  df-top 19525  df-bases 19527  df-cld 19646  df-cmp 20013

This theorem is referenced by:  kelac2  31173