Theorem kelac1 35892

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 2422	. . . . . . . 8 |- U. J = U. J
3	2	cldss 20043	. . . . . . 7 |- ( C e. ( Clsd ` J ) -> C C_ U. J )
4	1, 3	syl 17	. . . . . 6 |- ( ( ph /\ x e. I ) -> C C_ U. J )
5	4	ralrimiva 2836	. . . . 5 |- ( ph -> A. x e. I C C_ U. J )
6		boxriin 7576	. . . . 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 17	. . . 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 20409	. . . . . . . . 9 |- ( ( Xt_ ` ( x e. I |-> J ) ) e. Comp -> ( Xt_ ` ( x e. I |-> J ) ) e. Top )
10		0ntop 19934	. . . . . . . . . . 11 |- -. (/) e. Top
11		fvprc 5876	. . . . . . . . . . . 12 |- ( -. ( x e. I |-> J ) e. _V -> ( Xt_ ` ( x e. I |-> J ) ) = (/) )
12	11	eleq1d 2491	. . . . . . . . . . 11 |- ( -. ( x e. I |-> J ) e. _V -> ( ( Xt_ ` ( x e. I |-> J ) ) e. Top <-> (/) e. Top ) )
13	10, 12	mtbiri 304	. . . . . . . . . 10 |- ( -. ( x e. I |-> J ) e. _V -> -. ( Xt_ ` ( x e. I |-> J ) ) e. Top )
14	13	con4i 133	. . . . . . . . 9 |- ( ( Xt_ ` ( x e. I |-> J ) ) e. Top -> ( x e. I |-> J ) e. _V )
15	8, 9, 14	3syl 18	. . . . . . . 8 |- ( ph -> ( x e. I |-> J ) e. _V )
16		kelac1.j	. . . . . . . . 9 |- ( ( ph /\ x e. I ) -> J e. Top )
17		eqid 2422	. . . . . . . . 9 |- ( x e. I |-> J ) = ( x e. I |-> J )
18	16, 17	fmptd 6062	. . . . . . . 8 |- ( ph -> ( x e. I |-> J ) : I --> Top )
19		dmfex 6766	. . . . . . . 8 |- ( ( ( x e. I |-> J ) e. _V /\ ( x e. I |-> J ) : I --> Top ) -> I e. _V )
20	15, 18, 19	syl2anc 665	. . . . . . 7 |- ( ph -> I e. _V )
21	16	ralrimiva 2836	. . . . . . 7 |- ( ph -> A. x e. I J e. Top )
22		eqid 2422	. . . . . . . 8 |- ( Xt_ ` ( x e. I |-> J ) ) = ( Xt_ ` ( x e. I |-> J ) )
23	22	ptunimpt 20609	. . . . . . 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 665	. . . . . 6 |- ( ph -> X_ x e. I U. J = U. ( Xt_ ` ( x e. I |-> J ) ) )
25	24	ineq1d 3663	. . . . 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 2422	. . . . . 6 |- U. ( Xt_ ` ( x e. I |-> J ) ) = U. ( Xt_ ` ( x e. I |-> J ) )
27	2	topcld 20049	. . . . . . . . . 10 |- ( J e. Top -> U. J e. ( Clsd ` J ) )
28	16, 27	syl 17	. . . . . . . . 9 |- ( ( ph /\ x e. I ) -> U. J e. ( Clsd ` J ) )
29	1, 28	ifcld 3954	. . . . . . . 8 |- ( ( ph /\ x e. I ) -> if ( x = y , C , U. J ) e. ( Clsd ` J ) )
30	20, 16, 29	ptcldmpt 20628	. . . . . . 7 |- ( ph -> X_ x e. I if ( x = y , C , U. J ) e. ( Clsd ` ( Xt_ ` ( x e. I |-> J ) ) ) )
31	30	adantr 466	. . . . . 6 |- ( ( ph /\ y e. I ) -> X_ x e. I if ( x = y , C , U. J ) e. ( Clsd ` ( Xt_ ` ( x e. I |-> J ) ) ) )
32		simprr 764	. . . . . . . 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 5838	. . . . . . . . . . . . . . 15 |- ( B : S -1-1-onto-> C -> B : S -onto-> C )
35		foima 5815	. . . . . . . . . . . . . . 15 |- ( B : S -onto-> C -> ( B " S ) = C )
36	33, 34, 35	3syl 18	. . . . . . . . . . . . . 14 |- ( ( ph /\ x e. I ) -> ( B " S ) = C )
37	36	eqcomd 2430	. . . . . . . . . . . . 13 |- ( ( ph /\ x e. I ) -> C = ( B " S ) )
38		kelac1.z	. . . . . . . . . . . . . 14 |- ( ( ph /\ x e. I ) -> S =/= (/) )
39		f1ofn 5832	. . . . . . . . . . . . . . . . 17 |- ( B : S -1-1-onto-> C -> B Fn S )
40	33, 39	syl 17	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ x e. I ) -> B Fn S )
41		ssid 3483	. . . . . . . . . . . . . . . 16 |- S C_ S
42		fnimaeq0 5715	. . . . . . . . . . . . . . . 16 |- ( ( B Fn S /\ S C_ S ) -> ( ( B " S ) = (/) <-> S = (/) ) )
43	40, 41, 42	sylancl 666	. . . . . . . . . . . . . . 15 |- ( ( ph /\ x e. I ) -> ( ( B " S ) = (/) <-> S = (/) ) )
44	43	necon3bid 2678	. . . . . . . . . . . . . 14 |- ( ( ph /\ x e. I ) -> ( ( B " S ) =/= (/) <-> S =/= (/) ) )
45	38, 44	mpbird 235	. . . . . . . . . . . . 13 |- ( ( ph /\ x e. I ) -> ( B " S ) =/= (/) )
46	37, 45	eqnetrd 2713	. . . . . . . . . . . 12 |- ( ( ph /\ x e. I ) -> C =/= (/) )
47		n0 3771	. . . . . . . . . . . 12 |- ( C =/= (/) <-> E. w w e. C )
48	46, 47	sylib 199	. . . . . . . . . . 11 |- ( ( ph /\ x e. I ) -> E. w w e. C )
49		rexv 3096	. . . . . . . . . . 11 |- ( E. w e. _V w e. C <-> E. w w e. C )
50	48, 49	sylibr 215	. . . . . . . . . 10 |- ( ( ph /\ x e. I ) -> E. w e. _V w e. C )
51	50	ralrimiva 2836	. . . . . . . . 9 |- ( ph -> A. x e. I E. w e. _V w e. C )
52		ssralv 3525	. . . . . . . . . 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 466	. . . . . . . . 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 471	. . . . . . . 8 |- ( ( ph /\ ( z C_ I /\ z e. Fin ) ) -> A. x e. z E. w e. _V w e. C )
55		eleq1 2495	. . . . . . . . 9 |- ( w = ( f ` x ) -> ( w e. C <-> ( f ` x ) e. C ) )
56	55	ac6sfi 7825	. . . . . . . 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 665	. . . . . . 7 |- ( ( ph /\ ( z C_ I /\ z e. Fin ) ) -> E. f ( f : z --> _V /\ A. x e. z ( f ` x ) e. C ) )
58	24	eqcomd 2430	. . . . . . . . . . 11 |- ( ph -> U. ( Xt_ ` ( x e. I |-> J ) ) = X_ x e. I U. J )
59	58	ineq1d 3663	. . . . . . . . . 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 730	. . . . . . . . 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 3917	. . . . . . . . . . . . . . . . . . 19 |- ( x e. z -> if ( x e. z , ( f ` x ) , U ) = ( f ` x ) )
62	61	ad2antrl 732	. . . . . . . . . . . . . . . . . 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 758	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ x e. z ) -> ph )
64		simprl 762	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ph /\ ( z C_ I /\ z e. Fin ) ) -> z C_ I )
65	64	sselda 3464	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ x e. z ) -> x e. I )
66	63, 65, 4	syl2anc 665	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ x e. z ) -> C C_ U. J )
67	66	sseld 3463	. . . . . . . . . . . . . . . . . . 19 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ x e. z ) -> ( ( f ` x ) e. C -> ( f ` x ) e. U. J ) )
68	67	impr 623	. . . . . . . . . . . . . . . . . 18 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ ( x e. z /\ ( f ` x ) e. C ) ) -> ( f ` x ) e. U. J )
69	62, 68	eqeltrd 2507	. . . . . . . . . . . . . . . . 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 618	. . . . . . . . . . . . . . . 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 2830	. . . . . . . . . . . . . . 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 430	. . . . . . . . . . . . . 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 3588	. . . . . . . . . . . . . . . . . . 19 |- ( x e. ( I \ z ) -> -. x e. z )
74	73	iffalsed 3922	. . . . . . . . . . . . . . . . . 18 |- ( x e. ( I \ z ) -> if ( x e. z , ( f ` x ) , U ) = U )
75	74	adantl 467	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ x e. ( I \ z ) ) -> if ( x e. z , ( f ` x ) , U ) = U )
76		eldifi 3587	. . . . . . . . . . . . . . . . . 18 |- ( x e. ( I \ z ) -> x e. I )
77		kelac1.u	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ x e. I ) -> U e. U. J )
78	76, 77	sylan2 476	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ x e. ( I \ z ) ) -> U e. U. J )
79	75, 78	eqeltrd 2507	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ x e. ( I \ z ) ) -> if ( x e. z , ( f ` x ) , U ) e. U. J )
80	79	ralrimiva 2836	. . . . . . . . . . . . . . 15 |- ( ph -> A. x e. ( I \ z ) if ( x e. z , ( f ` x ) , U ) e. U. J )
81	80	ad2antrr 730	. . . . . . . . . . . . . 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 3648	. . . . . . . . . . . . . 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 665	. . . . . . . . . . . . 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 3878	. . . . . . . . . . . . . . . . 17 |- ( z C_ I <-> ( z u. ( I \ z ) ) = I )
85	84	biimpi 197	. . . . . . . . . . . . . . . 16 |- ( z C_ I -> ( z u. ( I \ z ) ) = I )
86	85	ad2antrl 732	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( z C_ I /\ z e. Fin ) ) -> ( z u. ( I \ z ) ) = I )
87	86	raleqdv 3028	. . . . . . . . . . . . . 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 466	. . . . . . . . . . . . 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 213	. . . . . . . . . . . 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 730	. . . . . . . . . . . . 13 |- ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) -> I e. _V )
91		mptelixpg 7571	. . . . . . . . . . . . 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 17	. . . . . . . . . . . 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 235	. . . . . . . . . . 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 2496	. . . . . . . . . . . . . . . . . . . . . 22 |- ( C = if ( x = y , C , U. J ) -> ( ( f ` x ) e. C <-> ( f ` x ) e. if ( x = y , C , U. J ) ) )
95		eleq2 2496	. . . . . . . . . . . . . . . . . . . . . 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 769	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ ( x e. z /\ ( f ` x ) e. C ) ) /\ x = y ) -> ( f ` x ) e. C )
97	68	adantr 466	. . . . . . . . . . . . . . . . . . . . . 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 3946	. . . . . . . . . . . . . . . . . . . . 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 2507	. . . . . . . . . . . . . . . . . . . 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 618	. . . . . . . . . . . . . . . . . . 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 2830	. . . . . . . . . . . . . . . . . 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 430	. . . . . . . . . . . . . . . . 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 466	. . . . . . . . . . . . . . . 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 719	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> U e. U. J )
105	74	adantl 467	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> if ( x e. z , ( f ` x ) , U ) = U )
106		incom 3655	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( I \ z ) i^i z ) = ( z i^i ( I \ z ) )
107		disjdif 3869	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( z i^i ( I \ z ) ) = (/)
108	106, 107	eqtri 2451	. . . . . . . . . . . . . . . . . . . . . . . 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 462	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> x e. ( I \ z ) )
111		simplr 760	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> y e. z )
112		disjne 3840	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ( ( I \ z ) i^i z ) = (/) /\ x e. ( I \ z ) /\ y e. z ) -> x =/= y )
113	109, 110, 111, 112	syl3anc 1264	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> x =/= y )
114	113	neneqd 2621	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> -. x = y )
115	114	iffalsed 3922	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( ph /\ y e. z ) /\ x e. ( I \ z ) ) -> if ( x = y , C , U. J ) = U. J )
116	104, 105, 115	3eltr4d 2522	. . . . . . . . . . . . . . . . . . 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 2836	. . . . . . . . . . . . . . . . . 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 719	. . . . . . . . . . . . . . . . 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 719	. . . . . . . . . . . . . . . 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 3648	. . . . . . . . . . . . . . . 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 665	. . . . . . . . . . . . . . 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 3028	. . . . . . . . . . . . . . . 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 730	. . . . . . . . . . . . . . 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 213	. . . . . . . . . . . . . 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 734	. . . . . . . . . . . . . . 15 |- ( ( ( ( ph /\ ( z C_ I /\ z e. Fin ) ) /\ A. x e. z ( f ` x ) e. C ) /\ y e. z ) -> I e. _V )
126		mptelixpg 7571	. . . . . . . . . . . . . . 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 17	. . . . . . . . . . . . . 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 235	. . . . . . . . . . . . 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 2836	. . . . . . . . . . . 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 6151	. . . . . . . . . . . . . . 15 |- ( I e. _V -> ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. _V )
131	20, 130	syl 17	. . . . . . . . . . . . . 14 |- ( ph -> ( x e. I |-> if ( x e. z , ( f ` x ) , U ) ) e. _V )
132	131	ad2antrr 730	. . . . . . . . . . . . 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 4305	. . . . . . . . . . . . 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 17	. . . . . . . . . . . 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 235	. . . . . . . . . . 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 3650	. . . . . . . . . 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 3767	. . . . . . . . . 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 17	. . . . . . . . 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 2713	. . . . . . . 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 720	. . . . . . 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 1774	. . . . . 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 35509	. . . . 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 2713	. . . 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 2713	. . 3 |- ( ph -> X_ x e. I C =/= (/) )
145		n0 3771	. . 3 |- ( X_ x e. I C =/= (/) <-> E. y y e. X_ x e. I C )
146	144, 145	sylib 199	. 2 |- ( ph -> E. y y e. X_ x e. I C )
147		elixp2 7538	. . . . . 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 1022	. . . . 5 |- ( y e. X_ x e. I C -> A. x e. I ( y ` x ) e. C )
149		f1ocnv 5843	. . . . . . . 8 |- ( B : S -1-1-onto-> C -> `' B : C -1-1-onto-> S )
150		f1of 5831	. . . . . . . 8 |- ( `' B : C -1-1-onto-> S -> `' B : C --> S )
151		ffvelrn 6036	. . . . . . . . 9 |- ( ( `' B : C --> S /\ ( y ` x ) e. C ) -> ( `' B ` ( y ` x ) ) e. S )
152	151	ex 435	. . . . . . . 8 |- ( `' B : C --> S -> ( ( y ` x ) e. C -> ( `' B ` ( y ` x ) ) e. S ) )
153	33, 149, 150, 152	4syl 19	. . . . . . 7 |- ( ( ph /\ x e. I ) -> ( ( y ` x ) e. C -> ( `' B ` ( y ` x ) ) e. S ) )
154	153	ralimdva 2830	. . . . . 6 |- ( ph -> ( A. x e. I ( y ` x ) e. C -> A. x e. I ( `' B ` ( y ` x ) ) e. S ) )
155	154	imp 430	. . . . 5 |- ( ( ph /\ A. x e. I ( y ` x ) e. C ) -> A. x e. I ( `' B ` ( y ` x ) ) e. S )
156	148, 155	sylan2 476	. . . 4 |- ( ( ph /\ y e. X_ x e. I C ) -> A. x e. I ( `' B ` ( y ` x ) ) e. S )
157		mptelixpg 7571	. . . . . 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 17	. . . . 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 466	. . . 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 235	. . 3 |- ( ( ph /\ y e. X_ x e. I C ) -> ( x e. I |-> ( `' B ` ( y ` x ) ) ) e. X_ x e. I S )
161		ne0i 3767	. . 3 |- ( ( x e. I |-> ( `' B ` ( y ` x ) ) ) e. X_ x e. I S -> X_ x e. I S =/= (/) )
162	160, 161	syl 17	. 2 |- ( ( ph /\ y e. X_ x e. I C ) -> X_ x e. I S =/= (/) )
163	146, 162	exlimddv 1774	1 |- ( ph -> X_ x e. I S =/= (/) )

Syntax hints:   -. wn 3   -> wi 4   <-> wb 187   /\ wa 370   = wceq 1437   E.wex 1657   e. wcel 1872   =/= wne 2614   A.wral 2771   E.wrex 2772   _Vcvv 3080   \ cdif 3433   u. cun 3434   i^i cin 3435   C_ wss 3436   (/)c0 3761   ifcif 3911   U.cuni 4219   |^|_ciin 4300   |-> cmpt 4482   `'ccnv 4852   "cima 4856   Fn wfn 5596   -->wf 5597   -onto->wfo 5599   -1-1-onto->wf1o 5600   ` cfv 5601   X_cixp 7534   Fincfn 7581   Xt_cpt 15337   Topctop 19916   Clsdccld 20030   Compccmp 20400

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1663  ax-4 1676  ax-5 1752  ax-6 1798  ax-7 1843  ax-8 1874  ax-9 1876  ax-10 1891  ax-11 1896  ax-12 1909  ax-13 2057  ax-ext 2401  ax-rep 4536  ax-sep 4546  ax-nul 4555  ax-pow 4602  ax-pr 4660  ax-un 6598

This theorem depends on definitions:  df-bi 188  df-or 371  df-an 372  df-3or 983  df-3an 984  df-tru 1440  df-ex 1658  df-nf 1662  df-sb 1791  df-eu 2273  df-mo 2274  df-clab 2408  df-cleq 2414  df-clel 2417  df-nfc 2568  df-ne 2616  df-ral 2776  df-rex 2777  df-reu 2778  df-rab 2780  df-v 3082  df-sbc 3300  df-csb 3396  df-dif 3439  df-un 3441  df-in 3443  df-ss 3450  df-pss 3452  df-nul 3762  df-if 3912  df-pw 3983  df-sn 3999  df-pr 4001  df-tp 4003  df-op 4005  df-uni 4220  df-int 4256  df-iun 4301  df-iin 4302  df-br 4424  df-opab 4483  df-mpt 4484  df-tr 4519  df-eprel 4764  df-id 4768  df-po 4774  df-so 4775  df-fr 4812  df-we 4814  df-xp 4859  df-rel 4860  df-cnv 4861  df-co 4862  df-dm 4863  df-rn 4864  df-res 4865  df-ima 4866  df-pred 5399  df-ord 5445  df-on 5446  df-lim 5447  df-suc 5448  df-iota 5565  df-fun 5603  df-fn 5604  df-f 5605  df-f1 5606  df-fo 5607  df-f1o 5608  df-fv 5609  df-ov 6309  df-oprab 6310  df-mpt2 6311  df-om 6708  df-1st 6808  df-2nd 6809  df-wrecs 7040  df-recs 7102  df-rdg 7140  df-1o 7194  df-2o 7195  df-oadd 7198  df-er 7375  df-map 7486  df-ixp 7535  df-en 7582  df-dom 7583  df-sdom 7584  df-fin 7585  df-fi 7935  df-topgen 15342  df-pt 15343  df-top 19920  df-bases 19921  df-cld 20033  df-cmp 20401

This theorem is referenced by:  kelac2  35894