Users' Mathboxes Mathbox for Stefan O'Rear < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  kelac1 Structured version   Visualization version   GIF version

Theorem kelac1 43420
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 ((𝜑𝑥𝐼) → 𝑆 ≠ ∅)
kelac1.j ((𝜑𝑥𝐼) → 𝐽 ∈ Top)
kelac1.c ((𝜑𝑥𝐼) → 𝐶 ∈ (Clsd‘𝐽))
kelac1.b ((𝜑𝑥𝐼) → 𝐵:𝑆1-1-onto𝐶)
kelac1.u ((𝜑𝑥𝐼) → 𝑈 𝐽)
kelac1.k (𝜑 → (∏t‘(𝑥𝐼𝐽)) ∈ Comp)
Assertion
Ref Expression
kelac1 (𝜑X𝑥𝐼 𝑆 ≠ ∅)
Distinct variable groups:   𝜑,𝑥   𝑥,𝐼
Allowed substitution hints:   𝐵(𝑥)   𝐶(𝑥)   𝑆(𝑥)   𝑈(𝑥)   𝐽(𝑥)

Proof of Theorem kelac1
Dummy variables 𝑓 𝑦 𝑧 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 kelac1.c . . . . . . 7 ((𝜑𝑥𝐼) → 𝐶 ∈ (Clsd‘𝐽))
2 eqid 2737 . . . . . . . 8 𝐽 = 𝐽
32cldss 22985 . . . . . . 7 (𝐶 ∈ (Clsd‘𝐽) → 𝐶 𝐽)
41, 3syl 17 . . . . . 6 ((𝜑𝑥𝐼) → 𝐶 𝐽)
54ralrimiva 3130 . . . . 5 (𝜑 → ∀𝑥𝐼 𝐶 𝐽)
6 boxriin 8890 . . . . 5 (∀𝑥𝐼 𝐶 𝐽X𝑥𝐼 𝐶 = (X𝑥𝐼 𝐽 𝑦𝐼 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
75, 6syl 17 . . . 4 (𝜑X𝑥𝐼 𝐶 = (X𝑥𝐼 𝐽 𝑦𝐼 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
8 kelac1.k . . . . . . . . 9 (𝜑 → (∏t‘(𝑥𝐼𝐽)) ∈ Comp)
9 cmptop 23351 . . . . . . . . 9 ((∏t‘(𝑥𝐼𝐽)) ∈ Comp → (∏t‘(𝑥𝐼𝐽)) ∈ Top)
10 0ntop 22861 . . . . . . . . . . 11 ¬ ∅ ∈ Top
11 fvprc 6834 . . . . . . . . . . . 12 (¬ (𝑥𝐼𝐽) ∈ V → (∏t‘(𝑥𝐼𝐽)) = ∅)
1211eleq1d 2822 . . . . . . . . . . 11 (¬ (𝑥𝐼𝐽) ∈ V → ((∏t‘(𝑥𝐼𝐽)) ∈ Top ↔ ∅ ∈ Top))
1310, 12mtbiri 327 . . . . . . . . . 10 (¬ (𝑥𝐼𝐽) ∈ V → ¬ (∏t‘(𝑥𝐼𝐽)) ∈ Top)
1413con4i 114 . . . . . . . . 9 ((∏t‘(𝑥𝐼𝐽)) ∈ Top → (𝑥𝐼𝐽) ∈ V)
158, 9, 143syl 18 . . . . . . . 8 (𝜑 → (𝑥𝐼𝐽) ∈ V)
16 kelac1.j . . . . . . . . 9 ((𝜑𝑥𝐼) → 𝐽 ∈ Top)
1716fmpttd 7069 . . . . . . . 8 (𝜑 → (𝑥𝐼𝐽):𝐼⟶Top)
18 dmfex 7857 . . . . . . . 8 (((𝑥𝐼𝐽) ∈ V ∧ (𝑥𝐼𝐽):𝐼⟶Top) → 𝐼 ∈ V)
1915, 17, 18syl2anc 585 . . . . . . 7 (𝜑𝐼 ∈ V)
2016ralrimiva 3130 . . . . . . 7 (𝜑 → ∀𝑥𝐼 𝐽 ∈ Top)
21 eqid 2737 . . . . . . . 8 (∏t‘(𝑥𝐼𝐽)) = (∏t‘(𝑥𝐼𝐽))
2221ptunimpt 23551 . . . . . . 7 ((𝐼 ∈ V ∧ ∀𝑥𝐼 𝐽 ∈ Top) → X𝑥𝐼 𝐽 = (∏t‘(𝑥𝐼𝐽)))
2319, 20, 22syl2anc 585 . . . . . 6 (𝜑X𝑥𝐼 𝐽 = (∏t‘(𝑥𝐼𝐽)))
2423ineq1d 4173 . . . . 5 (𝜑 → (X𝑥𝐼 𝐽 𝑦𝐼 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) = ( (∏t‘(𝑥𝐼𝐽)) ∩ 𝑦𝐼 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
25 eqid 2737 . . . . . 6 (∏t‘(𝑥𝐼𝐽)) = (∏t‘(𝑥𝐼𝐽))
262topcld 22991 . . . . . . . . . 10 (𝐽 ∈ Top → 𝐽 ∈ (Clsd‘𝐽))
2716, 26syl 17 . . . . . . . . 9 ((𝜑𝑥𝐼) → 𝐽 ∈ (Clsd‘𝐽))
281, 27ifcld 4528 . . . . . . . 8 ((𝜑𝑥𝐼) → if(𝑥 = 𝑦, 𝐶, 𝐽) ∈ (Clsd‘𝐽))
2919, 16, 28ptcldmpt 23570 . . . . . . 7 (𝜑X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽) ∈ (Clsd‘(∏t‘(𝑥𝐼𝐽))))
3029adantr 480 . . . . . 6 ((𝜑𝑦𝐼) → X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽) ∈ (Clsd‘(∏t‘(𝑥𝐼𝐽))))
31 simprr 773 . . . . . . . 8 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → 𝑧 ∈ Fin)
32 kelac1.b . . . . . . . . . . . . . . 15 ((𝜑𝑥𝐼) → 𝐵:𝑆1-1-onto𝐶)
33 f1ofo 6789 . . . . . . . . . . . . . . 15 (𝐵:𝑆1-1-onto𝐶𝐵:𝑆onto𝐶)
34 foima 6759 . . . . . . . . . . . . . . 15 (𝐵:𝑆onto𝐶 → (𝐵𝑆) = 𝐶)
3532, 33, 343syl 18 . . . . . . . . . . . . . 14 ((𝜑𝑥𝐼) → (𝐵𝑆) = 𝐶)
3635eqcomd 2743 . . . . . . . . . . . . 13 ((𝜑𝑥𝐼) → 𝐶 = (𝐵𝑆))
37 kelac1.z . . . . . . . . . . . . . 14 ((𝜑𝑥𝐼) → 𝑆 ≠ ∅)
38 f1ofn 6783 . . . . . . . . . . . . . . . . 17 (𝐵:𝑆1-1-onto𝐶𝐵 Fn 𝑆)
3932, 38syl 17 . . . . . . . . . . . . . . . 16 ((𝜑𝑥𝐼) → 𝐵 Fn 𝑆)
40 ssid 3958 . . . . . . . . . . . . . . . 16 𝑆𝑆
41 fnimaeq0 6633 . . . . . . . . . . . . . . . 16 ((𝐵 Fn 𝑆𝑆𝑆) → ((𝐵𝑆) = ∅ ↔ 𝑆 = ∅))
4239, 40, 41sylancl 587 . . . . . . . . . . . . . . 15 ((𝜑𝑥𝐼) → ((𝐵𝑆) = ∅ ↔ 𝑆 = ∅))
4342necon3bid 2977 . . . . . . . . . . . . . 14 ((𝜑𝑥𝐼) → ((𝐵𝑆) ≠ ∅ ↔ 𝑆 ≠ ∅))
4437, 43mpbird 257 . . . . . . . . . . . . 13 ((𝜑𝑥𝐼) → (𝐵𝑆) ≠ ∅)
4536, 44eqnetrd 3000 . . . . . . . . . . . 12 ((𝜑𝑥𝐼) → 𝐶 ≠ ∅)
46 n0 4307 . . . . . . . . . . . 12 (𝐶 ≠ ∅ ↔ ∃𝑤 𝑤𝐶)
4745, 46sylib 218 . . . . . . . . . . 11 ((𝜑𝑥𝐼) → ∃𝑤 𝑤𝐶)
48 rexv 3470 . . . . . . . . . . 11 (∃𝑤 ∈ V 𝑤𝐶 ↔ ∃𝑤 𝑤𝐶)
4947, 48sylibr 234 . . . . . . . . . 10 ((𝜑𝑥𝐼) → ∃𝑤 ∈ V 𝑤𝐶)
5049ralrimiva 3130 . . . . . . . . 9 (𝜑 → ∀𝑥𝐼𝑤 ∈ V 𝑤𝐶)
51 ssralv 4004 . . . . . . . . . 10 (𝑧𝐼 → (∀𝑥𝐼𝑤 ∈ V 𝑤𝐶 → ∀𝑥𝑧𝑤 ∈ V 𝑤𝐶))
5251adantr 480 . . . . . . . . 9 ((𝑧𝐼𝑧 ∈ Fin) → (∀𝑥𝐼𝑤 ∈ V 𝑤𝐶 → ∀𝑥𝑧𝑤 ∈ V 𝑤𝐶))
5350, 52mpan9 506 . . . . . . . 8 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → ∀𝑥𝑧𝑤 ∈ V 𝑤𝐶)
54 eleq1 2825 . . . . . . . . 9 (𝑤 = (𝑓𝑥) → (𝑤𝐶 ↔ (𝑓𝑥) ∈ 𝐶))
5554ac6sfi 9196 . . . . . . . 8 ((𝑧 ∈ Fin ∧ ∀𝑥𝑧𝑤 ∈ V 𝑤𝐶) → ∃𝑓(𝑓:𝑧⟶V ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶))
5631, 53, 55syl2anc 585 . . . . . . 7 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → ∃𝑓(𝑓:𝑧⟶V ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶))
5723eqcomd 2743 . . . . . . . . . . 11 (𝜑 (∏t‘(𝑥𝐼𝐽)) = X𝑥𝐼 𝐽)
5857ineq1d 4173 . . . . . . . . . 10 (𝜑 → ( (∏t‘(𝑥𝐼𝐽)) ∩ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) = (X𝑥𝐼 𝐽 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
5958ad2antrr 727 . . . . . . . . 9 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ( (∏t‘(𝑥𝐼𝐽)) ∩ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) = (X𝑥𝐼 𝐽 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
60 iftrue 4487 . . . . . . . . . . . . . . . . . . 19 (𝑥𝑧 → if(𝑥𝑧, (𝑓𝑥), 𝑈) = (𝑓𝑥))
6160ad2antrl 729 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑥𝑧 ∧ (𝑓𝑥) ∈ 𝐶)) → if(𝑥𝑧, (𝑓𝑥), 𝑈) = (𝑓𝑥))
62 simpll 767 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ 𝑥𝑧) → 𝜑)
63 simprl 771 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → 𝑧𝐼)
6463sselda 3935 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ 𝑥𝑧) → 𝑥𝐼)
6562, 64, 4syl2anc 585 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ 𝑥𝑧) → 𝐶 𝐽)
6665sseld 3934 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ 𝑥𝑧) → ((𝑓𝑥) ∈ 𝐶 → (𝑓𝑥) ∈ 𝐽))
6766impr 454 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑥𝑧 ∧ (𝑓𝑥) ∈ 𝐶)) → (𝑓𝑥) ∈ 𝐽)
6861, 67eqeltrd 2837 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑥𝑧 ∧ (𝑓𝑥) ∈ 𝐶)) → if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
6968expr 456 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ 𝑥𝑧) → ((𝑓𝑥) ∈ 𝐶 → if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽))
7069ralimdva 3150 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → (∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶 → ∀𝑥𝑧 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽))
7170imp 406 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ∀𝑥𝑧 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
72 eldifn 4086 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ (𝐼𝑧) → ¬ 𝑥𝑧)
7372iffalsed 4492 . . . . . . . . . . . . . . . . . 18 (𝑥 ∈ (𝐼𝑧) → if(𝑥𝑧, (𝑓𝑥), 𝑈) = 𝑈)
7473adantl 481 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ (𝐼𝑧)) → if(𝑥𝑧, (𝑓𝑥), 𝑈) = 𝑈)
75 eldifi 4085 . . . . . . . . . . . . . . . . . 18 (𝑥 ∈ (𝐼𝑧) → 𝑥𝐼)
76 kelac1.u . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥𝐼) → 𝑈 𝐽)
7775, 76sylan2 594 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ (𝐼𝑧)) → 𝑈 𝐽)
7874, 77eqeltrd 2837 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝐼𝑧)) → if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
7978ralrimiva 3130 . . . . . . . . . . . . . . 15 (𝜑 → ∀𝑥 ∈ (𝐼𝑧)if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
8079ad2antrr 727 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ∀𝑥 ∈ (𝐼𝑧)if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
81 ralun 4152 . . . . . . . . . . . . . 14 ((∀𝑥𝑧 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽 ∧ ∀𝑥 ∈ (𝐼𝑧)if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽) → ∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
8271, 80, 81syl2anc 585 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
83 undif 4436 . . . . . . . . . . . . . . . . 17 (𝑧𝐼 ↔ (𝑧 ∪ (𝐼𝑧)) = 𝐼)
8483biimpi 216 . . . . . . . . . . . . . . . 16 (𝑧𝐼 → (𝑧 ∪ (𝐼𝑧)) = 𝐼)
8584ad2antrl 729 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → (𝑧 ∪ (𝐼𝑧)) = 𝐼)
8685raleqdv 3298 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → (∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽 ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽))
8786adantr 480 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → (∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽 ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽))
8882, 87mpbid 232 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
8919ad2antrr 727 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → 𝐼 ∈ V)
90 mptelixpg 8885 . . . . . . . . . . . . 13 (𝐼 ∈ V → ((𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 𝐽 ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽))
9189, 90syl 17 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ((𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 𝐽 ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽))
9288, 91mpbird 257 . . . . . . . . . . 11 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 𝐽)
93 eleq2 2826 . . . . . . . . . . . . . . . . . . . . . 22 (𝐶 = if(𝑥 = 𝑦, 𝐶, 𝐽) → ((𝑓𝑥) ∈ 𝐶 ↔ (𝑓𝑥) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
94 eleq2 2826 . . . . . . . . . . . . . . . . . . . . . 22 ( 𝐽 = if(𝑥 = 𝑦, 𝐶, 𝐽) → ((𝑓𝑥) ∈ 𝐽 ↔ (𝑓𝑥) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
95 simplrr 778 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑥𝑧 ∧ (𝑓𝑥) ∈ 𝐶)) ∧ 𝑥 = 𝑦) → (𝑓𝑥) ∈ 𝐶)
9667adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑥𝑧 ∧ (𝑓𝑥) ∈ 𝐶)) ∧ ¬ 𝑥 = 𝑦) → (𝑓𝑥) ∈ 𝐽)
9793, 94, 95, 96ifbothda 4520 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑥𝑧 ∧ (𝑓𝑥) ∈ 𝐶)) → (𝑓𝑥) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
9861, 97eqeltrd 2837 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑥𝑧 ∧ (𝑓𝑥) ∈ 𝐶)) → if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
9998expr 456 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ 𝑥𝑧) → ((𝑓𝑥) ∈ 𝐶 → if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
10099ralimdva 3150 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → (∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶 → ∀𝑥𝑧 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
101100imp 406 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ∀𝑥𝑧 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
102101adantr 480 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → ∀𝑥𝑧 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
10377adantlr 716 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → 𝑈 𝐽)
10473adantl 481 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → if(𝑥𝑧, (𝑓𝑥), 𝑈) = 𝑈)
105 disjdifr 4427 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐼𝑧) ∩ 𝑧) = ∅
106105a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → ((𝐼𝑧) ∩ 𝑧) = ∅)
107 simpr 484 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → 𝑥 ∈ (𝐼𝑧))
108 simplr 769 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → 𝑦𝑧)
109 disjne 4409 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐼𝑧) ∩ 𝑧) = ∅ ∧ 𝑥 ∈ (𝐼𝑧) ∧ 𝑦𝑧) → 𝑥𝑦)
110106, 107, 108, 109syl3anc 1374 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → 𝑥𝑦)
111110neneqd 2938 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → ¬ 𝑥 = 𝑦)
112111iffalsed 4492 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → if(𝑥 = 𝑦, 𝐶, 𝐽) = 𝐽)
113103, 104, 1123eltr4d 2852 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
114113ralrimiva 3130 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦𝑧) → ∀𝑥 ∈ (𝐼𝑧)if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
115114adantlr 716 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ 𝑦𝑧) → ∀𝑥 ∈ (𝐼𝑧)if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
116115adantlr 716 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → ∀𝑥 ∈ (𝐼𝑧)if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
117 ralun 4152 . . . . . . . . . . . . . . . 16 ((∀𝑥𝑧 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽) ∧ ∀𝑥 ∈ (𝐼𝑧)if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)) → ∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
118102, 116, 117syl2anc 585 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → ∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
11985raleqdv 3298 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → (∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽) ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
120119ad2antrr 727 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → (∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽) ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
121118, 120mpbid 232 . . . . . . . . . . . . . 14 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
12219ad3antrrr 731 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → 𝐼 ∈ V)
123 mptelixpg 8885 . . . . . . . . . . . . . . 15 (𝐼 ∈ V → ((𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽) ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
124122, 123syl 17 . . . . . . . . . . . . . 14 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → ((𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽) ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
125121, 124mpbird 257 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽))
126125ralrimiva 3130 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ∀𝑦𝑧 (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽))
127 mptexg 7177 . . . . . . . . . . . . . . 15 (𝐼 ∈ V → (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ V)
12819, 127syl 17 . . . . . . . . . . . . . 14 (𝜑 → (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ V)
129128ad2antrr 727 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ V)
130 eliin 4953 . . . . . . . . . . . . 13 ((𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ V → ((𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽) ↔ ∀𝑦𝑧 (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
131129, 130syl 17 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ((𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽) ↔ ∀𝑦𝑧 (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
132126, 131mpbird 257 . . . . . . . . . . 11 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽))
13392, 132elind 4154 . . . . . . . . . 10 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ (X𝑥𝐼 𝐽 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
134133ne0d 4296 . . . . . . . . 9 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → (X𝑥𝐼 𝐽 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) ≠ ∅)
13559, 134eqnetrd 3000 . . . . . . . 8 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ( (∏t‘(𝑥𝐼𝐽)) ∩ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) ≠ ∅)
136135adantrl 717 . . . . . . 7 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑓:𝑧⟶V ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶)) → ( (∏t‘(𝑥𝐼𝐽)) ∩ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) ≠ ∅)
13756, 136exlimddv 1937 . . . . . 6 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → ( (∏t‘(𝑥𝐼𝐽)) ∩ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) ≠ ∅)
13825, 8, 30, 137cmpfiiin 43054 . . . . 5 (𝜑 → ( (∏t‘(𝑥𝐼𝐽)) ∩ 𝑦𝐼 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) ≠ ∅)
13924, 138eqnetrd 3000 . . . 4 (𝜑 → (X𝑥𝐼 𝐽 𝑦𝐼 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) ≠ ∅)
1407, 139eqnetrd 3000 . . 3 (𝜑X𝑥𝐼 𝐶 ≠ ∅)
141 n0 4307 . . 3 (X𝑥𝐼 𝐶 ≠ ∅ ↔ ∃𝑦 𝑦X𝑥𝐼 𝐶)
142140, 141sylib 218 . 2 (𝜑 → ∃𝑦 𝑦X𝑥𝐼 𝐶)
143 elixp2 8851 . . . . . 6 (𝑦X𝑥𝐼 𝐶 ↔ (𝑦 ∈ V ∧ 𝑦 Fn 𝐼 ∧ ∀𝑥𝐼 (𝑦𝑥) ∈ 𝐶))
144143simp3bi 1148 . . . . 5 (𝑦X𝑥𝐼 𝐶 → ∀𝑥𝐼 (𝑦𝑥) ∈ 𝐶)
145 f1ocnv 6794 . . . . . . . 8 (𝐵:𝑆1-1-onto𝐶𝐵:𝐶1-1-onto𝑆)
146 f1of 6782 . . . . . . . 8 (𝐵:𝐶1-1-onto𝑆𝐵:𝐶𝑆)
147 ffvelcdm 7035 . . . . . . . . 9 ((𝐵:𝐶𝑆 ∧ (𝑦𝑥) ∈ 𝐶) → (𝐵‘(𝑦𝑥)) ∈ 𝑆)
148147ex 412 . . . . . . . 8 (𝐵:𝐶𝑆 → ((𝑦𝑥) ∈ 𝐶 → (𝐵‘(𝑦𝑥)) ∈ 𝑆))
14932, 145, 146, 1484syl 19 . . . . . . 7 ((𝜑𝑥𝐼) → ((𝑦𝑥) ∈ 𝐶 → (𝐵‘(𝑦𝑥)) ∈ 𝑆))
150149ralimdva 3150 . . . . . 6 (𝜑 → (∀𝑥𝐼 (𝑦𝑥) ∈ 𝐶 → ∀𝑥𝐼 (𝐵‘(𝑦𝑥)) ∈ 𝑆))
151150imp 406 . . . . 5 ((𝜑 ∧ ∀𝑥𝐼 (𝑦𝑥) ∈ 𝐶) → ∀𝑥𝐼 (𝐵‘(𝑦𝑥)) ∈ 𝑆)
152144, 151sylan2 594 . . . 4 ((𝜑𝑦X𝑥𝐼 𝐶) → ∀𝑥𝐼 (𝐵‘(𝑦𝑥)) ∈ 𝑆)
153 mptelixpg 8885 . . . . . 6 (𝐼 ∈ V → ((𝑥𝐼 ↦ (𝐵‘(𝑦𝑥))) ∈ X𝑥𝐼 𝑆 ↔ ∀𝑥𝐼 (𝐵‘(𝑦𝑥)) ∈ 𝑆))
15419, 153syl 17 . . . . 5 (𝜑 → ((𝑥𝐼 ↦ (𝐵‘(𝑦𝑥))) ∈ X𝑥𝐼 𝑆 ↔ ∀𝑥𝐼 (𝐵‘(𝑦𝑥)) ∈ 𝑆))
155154adantr 480 . . . 4 ((𝜑𝑦X𝑥𝐼 𝐶) → ((𝑥𝐼 ↦ (𝐵‘(𝑦𝑥))) ∈ X𝑥𝐼 𝑆 ↔ ∀𝑥𝐼 (𝐵‘(𝑦𝑥)) ∈ 𝑆))
156152, 155mpbird 257 . . 3 ((𝜑𝑦X𝑥𝐼 𝐶) → (𝑥𝐼 ↦ (𝐵‘(𝑦𝑥))) ∈ X𝑥𝐼 𝑆)
157156ne0d 4296 . 2 ((𝜑𝑦X𝑥𝐼 𝐶) → X𝑥𝐼 𝑆 ≠ ∅)
158142, 157exlimddv 1937 1 (𝜑X𝑥𝐼 𝑆 ≠ ∅)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395   = wceq 1542  wex 1781  wcel 2114  wne 2933  wral 3052  wrex 3062  Vcvv 3442  cdif 3900  cun 3901  cin 3902  wss 3903  c0 4287  ifcif 4481   cuni 4865   ciin 4949  cmpt 5181  ccnv 5631  cima 5635   Fn wfn 6495  wf 6496  ontowfo 6498  1-1-ontowf1o 6499  cfv 6500  Xcixp 8847  Fincfn 8895  tcpt 17370  Topctop 22849  Clsdccld 22972  Compccmp 23342
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5226  ax-sep 5243  ax-nul 5253  ax-pow 5312  ax-pr 5379  ax-un 7690
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-int 4905  df-iun 4950  df-iin 4951  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5527  df-eprel 5532  df-po 5540  df-so 5541  df-fr 5585  df-we 5587  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-ord 6328  df-on 6329  df-lim 6330  df-suc 6331  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-om 7819  df-1o 8407  df-2o 8408  df-ixp 8848  df-en 8896  df-dom 8897  df-fin 8899  df-fi 9326  df-topgen 17375  df-pt 17376  df-top 22850  df-bases 22902  df-cld 22975  df-cmp 23343
This theorem is referenced by:  kelac2  43422
  Copyright terms: Public domain W3C validator