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 39541
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 2818 . . . . . . . 8 𝐽 = 𝐽
32cldss 21565 . . . . . . 7 (𝐶 ∈ (Clsd‘𝐽) → 𝐶 𝐽)
41, 3syl 17 . . . . . 6 ((𝜑𝑥𝐼) → 𝐶 𝐽)
54ralrimiva 3179 . . . . 5 (𝜑 → ∀𝑥𝐼 𝐶 𝐽)
6 boxriin 8492 . . . . 5 (∀𝑥𝐼 𝐶 𝐽X𝑥𝐼 𝐶 = (X𝑥𝐼 𝐽 𝑦𝐼 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
75, 6syl 17 . . . 4 (𝜑X𝑥𝐼 𝐶 = (X𝑥𝐼 𝐽 𝑦𝐼 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
8 kelac1.k . . . . . . . . 9 (𝜑 → (∏t‘(𝑥𝐼𝐽)) ∈ Comp)
9 cmptop 21931 . . . . . . . . 9 ((∏t‘(𝑥𝐼𝐽)) ∈ Comp → (∏t‘(𝑥𝐼𝐽)) ∈ Top)
10 0ntop 21441 . . . . . . . . . . 11 ¬ ∅ ∈ Top
11 fvprc 6656 . . . . . . . . . . . 12 (¬ (𝑥𝐼𝐽) ∈ V → (∏t‘(𝑥𝐼𝐽)) = ∅)
1211eleq1d 2894 . . . . . . . . . . 11 (¬ (𝑥𝐼𝐽) ∈ V → ((∏t‘(𝑥𝐼𝐽)) ∈ Top ↔ ∅ ∈ Top))
1310, 12mtbiri 328 . . . . . . . . . 10 (¬ (𝑥𝐼𝐽) ∈ V → ¬ (∏t‘(𝑥𝐼𝐽)) ∈ Top)
1413con4i 114 . . . . . . . . 9 ((∏t‘(𝑥𝐼𝐽)) ∈ Top → (𝑥𝐼𝐽) ∈ V)
158, 9, 143syl 18 . . . . . . . 8 (𝜑 → (𝑥𝐼𝐽) ∈ V)
16 kelac1.j . . . . . . . . 9 ((𝜑𝑥𝐼) → 𝐽 ∈ Top)
1716fmpttd 6871 . . . . . . . 8 (𝜑 → (𝑥𝐼𝐽):𝐼⟶Top)
18 dmfex 7630 . . . . . . . 8 (((𝑥𝐼𝐽) ∈ V ∧ (𝑥𝐼𝐽):𝐼⟶Top) → 𝐼 ∈ V)
1915, 17, 18syl2anc 584 . . . . . . 7 (𝜑𝐼 ∈ V)
2016ralrimiva 3179 . . . . . . 7 (𝜑 → ∀𝑥𝐼 𝐽 ∈ Top)
21 eqid 2818 . . . . . . . 8 (∏t‘(𝑥𝐼𝐽)) = (∏t‘(𝑥𝐼𝐽))
2221ptunimpt 22131 . . . . . . 7 ((𝐼 ∈ V ∧ ∀𝑥𝐼 𝐽 ∈ Top) → X𝑥𝐼 𝐽 = (∏t‘(𝑥𝐼𝐽)))
2319, 20, 22syl2anc 584 . . . . . 6 (𝜑X𝑥𝐼 𝐽 = (∏t‘(𝑥𝐼𝐽)))
2423ineq1d 4185 . . . . 5 (𝜑 → (X𝑥𝐼 𝐽 𝑦𝐼 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) = ( (∏t‘(𝑥𝐼𝐽)) ∩ 𝑦𝐼 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
25 eqid 2818 . . . . . 6 (∏t‘(𝑥𝐼𝐽)) = (∏t‘(𝑥𝐼𝐽))
262topcld 21571 . . . . . . . . . 10 (𝐽 ∈ Top → 𝐽 ∈ (Clsd‘𝐽))
2716, 26syl 17 . . . . . . . . 9 ((𝜑𝑥𝐼) → 𝐽 ∈ (Clsd‘𝐽))
281, 27ifcld 4508 . . . . . . . 8 ((𝜑𝑥𝐼) → if(𝑥 = 𝑦, 𝐶, 𝐽) ∈ (Clsd‘𝐽))
2919, 16, 28ptcldmpt 22150 . . . . . . 7 (𝜑X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽) ∈ (Clsd‘(∏t‘(𝑥𝐼𝐽))))
3029adantr 481 . . . . . 6 ((𝜑𝑦𝐼) → X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽) ∈ (Clsd‘(∏t‘(𝑥𝐼𝐽))))
31 simprr 769 . . . . . . . 8 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → 𝑧 ∈ Fin)
32 kelac1.b . . . . . . . . . . . . . . 15 ((𝜑𝑥𝐼) → 𝐵:𝑆1-1-onto𝐶)
33 f1ofo 6615 . . . . . . . . . . . . . . 15 (𝐵:𝑆1-1-onto𝐶𝐵:𝑆onto𝐶)
34 foima 6588 . . . . . . . . . . . . . . 15 (𝐵:𝑆onto𝐶 → (𝐵𝑆) = 𝐶)
3532, 33, 343syl 18 . . . . . . . . . . . . . 14 ((𝜑𝑥𝐼) → (𝐵𝑆) = 𝐶)
3635eqcomd 2824 . . . . . . . . . . . . 13 ((𝜑𝑥𝐼) → 𝐶 = (𝐵𝑆))
37 kelac1.z . . . . . . . . . . . . . 14 ((𝜑𝑥𝐼) → 𝑆 ≠ ∅)
38 f1ofn 6609 . . . . . . . . . . . . . . . . 17 (𝐵:𝑆1-1-onto𝐶𝐵 Fn 𝑆)
3932, 38syl 17 . . . . . . . . . . . . . . . 16 ((𝜑𝑥𝐼) → 𝐵 Fn 𝑆)
40 ssid 3986 . . . . . . . . . . . . . . . 16 𝑆𝑆
41 fnimaeq0 6474 . . . . . . . . . . . . . . . 16 ((𝐵 Fn 𝑆𝑆𝑆) → ((𝐵𝑆) = ∅ ↔ 𝑆 = ∅))
4239, 40, 41sylancl 586 . . . . . . . . . . . . . . 15 ((𝜑𝑥𝐼) → ((𝐵𝑆) = ∅ ↔ 𝑆 = ∅))
4342necon3bid 3057 . . . . . . . . . . . . . 14 ((𝜑𝑥𝐼) → ((𝐵𝑆) ≠ ∅ ↔ 𝑆 ≠ ∅))
4437, 43mpbird 258 . . . . . . . . . . . . 13 ((𝜑𝑥𝐼) → (𝐵𝑆) ≠ ∅)
4536, 44eqnetrd 3080 . . . . . . . . . . . 12 ((𝜑𝑥𝐼) → 𝐶 ≠ ∅)
46 n0 4307 . . . . . . . . . . . 12 (𝐶 ≠ ∅ ↔ ∃𝑤 𝑤𝐶)
4745, 46sylib 219 . . . . . . . . . . 11 ((𝜑𝑥𝐼) → ∃𝑤 𝑤𝐶)
48 rexv 3518 . . . . . . . . . . 11 (∃𝑤 ∈ V 𝑤𝐶 ↔ ∃𝑤 𝑤𝐶)
4947, 48sylibr 235 . . . . . . . . . 10 ((𝜑𝑥𝐼) → ∃𝑤 ∈ V 𝑤𝐶)
5049ralrimiva 3179 . . . . . . . . 9 (𝜑 → ∀𝑥𝐼𝑤 ∈ V 𝑤𝐶)
51 ssralv 4030 . . . . . . . . . 10 (𝑧𝐼 → (∀𝑥𝐼𝑤 ∈ V 𝑤𝐶 → ∀𝑥𝑧𝑤 ∈ V 𝑤𝐶))
5251adantr 481 . . . . . . . . 9 ((𝑧𝐼𝑧 ∈ Fin) → (∀𝑥𝐼𝑤 ∈ V 𝑤𝐶 → ∀𝑥𝑧𝑤 ∈ V 𝑤𝐶))
5350, 52mpan9 507 . . . . . . . 8 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → ∀𝑥𝑧𝑤 ∈ V 𝑤𝐶)
54 eleq1 2897 . . . . . . . . 9 (𝑤 = (𝑓𝑥) → (𝑤𝐶 ↔ (𝑓𝑥) ∈ 𝐶))
5554ac6sfi 8750 . . . . . . . 8 ((𝑧 ∈ Fin ∧ ∀𝑥𝑧𝑤 ∈ V 𝑤𝐶) → ∃𝑓(𝑓:𝑧⟶V ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶))
5631, 53, 55syl2anc 584 . . . . . . 7 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → ∃𝑓(𝑓:𝑧⟶V ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶))
5723eqcomd 2824 . . . . . . . . . . 11 (𝜑 (∏t‘(𝑥𝐼𝐽)) = X𝑥𝐼 𝐽)
5857ineq1d 4185 . . . . . . . . . 10 (𝜑 → ( (∏t‘(𝑥𝐼𝐽)) ∩ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) = (X𝑥𝐼 𝐽 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
5958ad2antrr 722 . . . . . . . . 9 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ( (∏t‘(𝑥𝐼𝐽)) ∩ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) = (X𝑥𝐼 𝐽 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
60 iftrue 4469 . . . . . . . . . . . . . . . . . . 19 (𝑥𝑧 → if(𝑥𝑧, (𝑓𝑥), 𝑈) = (𝑓𝑥))
6160ad2antrl 724 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑥𝑧 ∧ (𝑓𝑥) ∈ 𝐶)) → if(𝑥𝑧, (𝑓𝑥), 𝑈) = (𝑓𝑥))
62 simpll 763 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ 𝑥𝑧) → 𝜑)
63 simprl 767 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → 𝑧𝐼)
6463sselda 3964 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ 𝑥𝑧) → 𝑥𝐼)
6562, 64, 4syl2anc 584 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ 𝑥𝑧) → 𝐶 𝐽)
6665sseld 3963 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ 𝑥𝑧) → ((𝑓𝑥) ∈ 𝐶 → (𝑓𝑥) ∈ 𝐽))
6766impr 455 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑥𝑧 ∧ (𝑓𝑥) ∈ 𝐶)) → (𝑓𝑥) ∈ 𝐽)
6861, 67eqeltrd 2910 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑥𝑧 ∧ (𝑓𝑥) ∈ 𝐶)) → if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
6968expr 457 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ 𝑥𝑧) → ((𝑓𝑥) ∈ 𝐶 → if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽))
7069ralimdva 3174 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → (∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶 → ∀𝑥𝑧 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽))
7170imp 407 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ∀𝑥𝑧 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
72 eldifn 4101 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ (𝐼𝑧) → ¬ 𝑥𝑧)
7372iffalsed 4474 . . . . . . . . . . . . . . . . . 18 (𝑥 ∈ (𝐼𝑧) → if(𝑥𝑧, (𝑓𝑥), 𝑈) = 𝑈)
7473adantl 482 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ (𝐼𝑧)) → if(𝑥𝑧, (𝑓𝑥), 𝑈) = 𝑈)
75 eldifi 4100 . . . . . . . . . . . . . . . . . 18 (𝑥 ∈ (𝐼𝑧) → 𝑥𝐼)
76 kelac1.u . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥𝐼) → 𝑈 𝐽)
7775, 76sylan2 592 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ (𝐼𝑧)) → 𝑈 𝐽)
7874, 77eqeltrd 2910 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝐼𝑧)) → if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
7978ralrimiva 3179 . . . . . . . . . . . . . . 15 (𝜑 → ∀𝑥 ∈ (𝐼𝑧)if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
8079ad2antrr 722 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ∀𝑥 ∈ (𝐼𝑧)if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
81 ralun 4165 . . . . . . . . . . . . . 14 ((∀𝑥𝑧 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽 ∧ ∀𝑥 ∈ (𝐼𝑧)if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽) → ∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
8271, 80, 81syl2anc 584 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
83 undif 4426 . . . . . . . . . . . . . . . . 17 (𝑧𝐼 ↔ (𝑧 ∪ (𝐼𝑧)) = 𝐼)
8483biimpi 217 . . . . . . . . . . . . . . . 16 (𝑧𝐼 → (𝑧 ∪ (𝐼𝑧)) = 𝐼)
8584ad2antrl 724 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → (𝑧 ∪ (𝐼𝑧)) = 𝐼)
8685raleqdv 3413 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → (∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽 ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽))
8786adantr 481 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → (∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽 ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽))
8882, 87mpbid 233 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽)
8919ad2antrr 722 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → 𝐼 ∈ V)
90 mptelixpg 8487 . . . . . . . . . . . . 13 (𝐼 ∈ V → ((𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 𝐽 ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽))
9189, 90syl 17 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ((𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 𝐽 ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ 𝐽))
9288, 91mpbird 258 . . . . . . . . . . 11 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 𝐽)
93 eleq2 2898 . . . . . . . . . . . . . . . . . . . . . 22 (𝐶 = if(𝑥 = 𝑦, 𝐶, 𝐽) → ((𝑓𝑥) ∈ 𝐶 ↔ (𝑓𝑥) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
94 eleq2 2898 . . . . . . . . . . . . . . . . . . . . . 22 ( 𝐽 = if(𝑥 = 𝑦, 𝐶, 𝐽) → ((𝑓𝑥) ∈ 𝐽 ↔ (𝑓𝑥) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
95 simplrr 774 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑥𝑧 ∧ (𝑓𝑥) ∈ 𝐶)) ∧ 𝑥 = 𝑦) → (𝑓𝑥) ∈ 𝐶)
9667adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑥𝑧 ∧ (𝑓𝑥) ∈ 𝐶)) ∧ ¬ 𝑥 = 𝑦) → (𝑓𝑥) ∈ 𝐽)
9793, 94, 95, 96ifbothda 4500 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑥𝑧 ∧ (𝑓𝑥) ∈ 𝐶)) → (𝑓𝑥) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
9861, 97eqeltrd 2910 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑥𝑧 ∧ (𝑓𝑥) ∈ 𝐶)) → if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
9998expr 457 . . . . . . . . . . . . . . . . . . 19 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ 𝑥𝑧) → ((𝑓𝑥) ∈ 𝐶 → if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
10099ralimdva 3174 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → (∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶 → ∀𝑥𝑧 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
101100imp 407 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ∀𝑥𝑧 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
102101adantr 481 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → ∀𝑥𝑧 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
10377adantlr 711 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → 𝑈 𝐽)
10473adantl 482 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → if(𝑥𝑧, (𝑓𝑥), 𝑈) = 𝑈)
105 incom 4175 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐼𝑧) ∩ 𝑧) = (𝑧 ∩ (𝐼𝑧))
106 disjdif 4417 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑧 ∩ (𝐼𝑧)) = ∅
107105, 106eqtri 2841 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐼𝑧) ∩ 𝑧) = ∅
108107a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → ((𝐼𝑧) ∩ 𝑧) = ∅)
109 simpr 485 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → 𝑥 ∈ (𝐼𝑧))
110 simplr 765 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → 𝑦𝑧)
111 disjne 4400 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐼𝑧) ∩ 𝑧) = ∅ ∧ 𝑥 ∈ (𝐼𝑧) ∧ 𝑦𝑧) → 𝑥𝑦)
112108, 109, 110, 111syl3anc 1363 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → 𝑥𝑦)
113112neneqd 3018 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → ¬ 𝑥 = 𝑦)
114113iffalsed 4474 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → if(𝑥 = 𝑦, 𝐶, 𝐽) = 𝐽)
115103, 104, 1143eltr4d 2925 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑦𝑧) ∧ 𝑥 ∈ (𝐼𝑧)) → if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
116115ralrimiva 3179 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑦𝑧) → ∀𝑥 ∈ (𝐼𝑧)if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
117116adantlr 711 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ 𝑦𝑧) → ∀𝑥 ∈ (𝐼𝑧)if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
118117adantlr 711 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → ∀𝑥 ∈ (𝐼𝑧)if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
119 ralun 4165 . . . . . . . . . . . . . . . 16 ((∀𝑥𝑧 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽) ∧ ∀𝑥 ∈ (𝐼𝑧)if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)) → ∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
120102, 118, 119syl2anc 584 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → ∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
12185raleqdv 3413 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → (∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽) ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
122121ad2antrr 722 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → (∀𝑥 ∈ (𝑧 ∪ (𝐼𝑧))if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽) ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
123120, 122mpbid 233 . . . . . . . . . . . . . 14 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽))
12419ad3antrrr 726 . . . . . . . . . . . . . . 15 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → 𝐼 ∈ V)
125 mptelixpg 8487 . . . . . . . . . . . . . . 15 (𝐼 ∈ V → ((𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽) ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
126124, 125syl 17 . . . . . . . . . . . . . 14 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → ((𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽) ↔ ∀𝑥𝐼 if(𝑥𝑧, (𝑓𝑥), 𝑈) ∈ if(𝑥 = 𝑦, 𝐶, 𝐽)))
127123, 126mpbird 258 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) ∧ 𝑦𝑧) → (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽))
128127ralrimiva 3179 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ∀𝑦𝑧 (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽))
129 mptexg 6975 . . . . . . . . . . . . . . 15 (𝐼 ∈ V → (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ V)
13019, 129syl 17 . . . . . . . . . . . . . 14 (𝜑 → (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ V)
131130ad2antrr 722 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ V)
132 eliin 4915 . . . . . . . . . . . . 13 ((𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ V → ((𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽) ↔ ∀𝑦𝑧 (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
133131, 132syl 17 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ((𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽) ↔ ∀𝑦𝑧 (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
134128, 133mpbird 258 . . . . . . . . . . 11 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽))
13592, 134elind 4168 . . . . . . . . . 10 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → (𝑥𝐼 ↦ if(𝑥𝑧, (𝑓𝑥), 𝑈)) ∈ (X𝑥𝐼 𝐽 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)))
136135ne0d 4298 . . . . . . . . 9 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → (X𝑥𝐼 𝐽 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) ≠ ∅)
13759, 136eqnetrd 3080 . . . . . . . 8 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶) → ( (∏t‘(𝑥𝐼𝐽)) ∩ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) ≠ ∅)
138137adantrl 712 . . . . . . 7 (((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) ∧ (𝑓:𝑧⟶V ∧ ∀𝑥𝑧 (𝑓𝑥) ∈ 𝐶)) → ( (∏t‘(𝑥𝐼𝐽)) ∩ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) ≠ ∅)
13956, 138exlimddv 1927 . . . . . 6 ((𝜑 ∧ (𝑧𝐼𝑧 ∈ Fin)) → ( (∏t‘(𝑥𝐼𝐽)) ∩ 𝑦𝑧 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) ≠ ∅)
14025, 8, 30, 139cmpfiiin 39172 . . . . 5 (𝜑 → ( (∏t‘(𝑥𝐼𝐽)) ∩ 𝑦𝐼 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) ≠ ∅)
14124, 140eqnetrd 3080 . . . 4 (𝜑 → (X𝑥𝐼 𝐽 𝑦𝐼 X𝑥𝐼 if(𝑥 = 𝑦, 𝐶, 𝐽)) ≠ ∅)
1427, 141eqnetrd 3080 . . 3 (𝜑X𝑥𝐼 𝐶 ≠ ∅)
143 n0 4307 . . 3 (X𝑥𝐼 𝐶 ≠ ∅ ↔ ∃𝑦 𝑦X𝑥𝐼 𝐶)
144142, 143sylib 219 . 2 (𝜑 → ∃𝑦 𝑦X𝑥𝐼 𝐶)
145 elixp2 8453 . . . . . 6 (𝑦X𝑥𝐼 𝐶 ↔ (𝑦 ∈ V ∧ 𝑦 Fn 𝐼 ∧ ∀𝑥𝐼 (𝑦𝑥) ∈ 𝐶))
146145simp3bi 1139 . . . . 5 (𝑦X𝑥𝐼 𝐶 → ∀𝑥𝐼 (𝑦𝑥) ∈ 𝐶)
147 f1ocnv 6620 . . . . . . . 8 (𝐵:𝑆1-1-onto𝐶𝐵:𝐶1-1-onto𝑆)
148 f1of 6608 . . . . . . . 8 (𝐵:𝐶1-1-onto𝑆𝐵:𝐶𝑆)
149 ffvelrn 6841 . . . . . . . . 9 ((𝐵:𝐶𝑆 ∧ (𝑦𝑥) ∈ 𝐶) → (𝐵‘(𝑦𝑥)) ∈ 𝑆)
150149ex 413 . . . . . . . 8 (𝐵:𝐶𝑆 → ((𝑦𝑥) ∈ 𝐶 → (𝐵‘(𝑦𝑥)) ∈ 𝑆))
15132, 147, 148, 1504syl 19 . . . . . . 7 ((𝜑𝑥𝐼) → ((𝑦𝑥) ∈ 𝐶 → (𝐵‘(𝑦𝑥)) ∈ 𝑆))
152151ralimdva 3174 . . . . . 6 (𝜑 → (∀𝑥𝐼 (𝑦𝑥) ∈ 𝐶 → ∀𝑥𝐼 (𝐵‘(𝑦𝑥)) ∈ 𝑆))
153152imp 407 . . . . 5 ((𝜑 ∧ ∀𝑥𝐼 (𝑦𝑥) ∈ 𝐶) → ∀𝑥𝐼 (𝐵‘(𝑦𝑥)) ∈ 𝑆)
154146, 153sylan2 592 . . . 4 ((𝜑𝑦X𝑥𝐼 𝐶) → ∀𝑥𝐼 (𝐵‘(𝑦𝑥)) ∈ 𝑆)
155 mptelixpg 8487 . . . . . 6 (𝐼 ∈ V → ((𝑥𝐼 ↦ (𝐵‘(𝑦𝑥))) ∈ X𝑥𝐼 𝑆 ↔ ∀𝑥𝐼 (𝐵‘(𝑦𝑥)) ∈ 𝑆))
15619, 155syl 17 . . . . 5 (𝜑 → ((𝑥𝐼 ↦ (𝐵‘(𝑦𝑥))) ∈ X𝑥𝐼 𝑆 ↔ ∀𝑥𝐼 (𝐵‘(𝑦𝑥)) ∈ 𝑆))
157156adantr 481 . . . 4 ((𝜑𝑦X𝑥𝐼 𝐶) → ((𝑥𝐼 ↦ (𝐵‘(𝑦𝑥))) ∈ X𝑥𝐼 𝑆 ↔ ∀𝑥𝐼 (𝐵‘(𝑦𝑥)) ∈ 𝑆))
158154, 157mpbird 258 . . 3 ((𝜑𝑦X𝑥𝐼 𝐶) → (𝑥𝐼 ↦ (𝐵‘(𝑦𝑥))) ∈ X𝑥𝐼 𝑆)
159158ne0d 4298 . 2 ((𝜑𝑦X𝑥𝐼 𝐶) → X𝑥𝐼 𝑆 ≠ ∅)
160144, 159exlimddv 1927 1 (𝜑X𝑥𝐼 𝑆 ≠ ∅)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 207  wa 396   = wceq 1528  wex 1771  wcel 2105  wne 3013  wral 3135  wrex 3136  Vcvv 3492  cdif 3930  cun 3931  cin 3932  wss 3933  c0 4288  ifcif 4463   cuni 4830   ciin 4911  cmpt 5137  ccnv 5547  cima 5551   Fn wfn 6343  wf 6344  ontowfo 6346  1-1-ontowf1o 6347  cfv 6348  Xcixp 8449  Fincfn 8497  tcpt 16700  Topctop 21429  Clsdccld 21552  Compccmp 21922
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1787  ax-4 1801  ax-5 1902  ax-6 1961  ax-7 2006  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2151  ax-12 2167  ax-ext 2790  ax-rep 5181  ax-sep 5194  ax-nul 5201  ax-pow 5257  ax-pr 5320  ax-un 7450
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 842  df-3or 1080  df-3an 1081  df-tru 1531  df-ex 1772  df-nf 1776  df-sb 2061  df-mo 2615  df-eu 2647  df-clab 2797  df-cleq 2811  df-clel 2890  df-nfc 2960  df-ne 3014  df-ral 3140  df-rex 3141  df-reu 3142  df-rab 3144  df-v 3494  df-sbc 3770  df-csb 3881  df-dif 3936  df-un 3938  df-in 3940  df-ss 3949  df-pss 3951  df-nul 4289  df-if 4464  df-pw 4537  df-sn 4558  df-pr 4560  df-tp 4562  df-op 4564  df-uni 4831  df-int 4868  df-iun 4912  df-iin 4913  df-br 5058  df-opab 5120  df-mpt 5138  df-tr 5164  df-id 5453  df-eprel 5458  df-po 5467  df-so 5468  df-fr 5507  df-we 5509  df-xp 5554  df-rel 5555  df-cnv 5556  df-co 5557  df-dm 5558  df-rn 5559  df-res 5560  df-ima 5561  df-pred 6141  df-ord 6187  df-on 6188  df-lim 6189  df-suc 6190  df-iota 6307  df-fun 6350  df-fn 6351  df-f 6352  df-f1 6353  df-fo 6354  df-f1o 6355  df-fv 6356  df-ov 7148  df-oprab 7149  df-mpo 7150  df-om 7570  df-1st 7678  df-2nd 7679  df-wrecs 7936  df-recs 7997  df-rdg 8035  df-1o 8091  df-2o 8092  df-oadd 8095  df-er 8278  df-map 8397  df-ixp 8450  df-en 8498  df-dom 8499  df-sdom 8500  df-fin 8501  df-fi 8863  df-topgen 16705  df-pt 16706  df-top 21430  df-bases 21482  df-cld 21555  df-cmp 21923
This theorem is referenced by:  kelac2  39543
  Copyright terms: Public domain W3C validator