Users' Mathboxes Mathbox for Brendan Leahy < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  finixpnum Structured version   Visualization version   GIF version

Theorem finixpnum 36136
Description: A finite Cartesian product of numerable sets is numerable. (Contributed by Brendan Leahy, 24-Feb-2019.)
Assertion
Ref Expression
finixpnum ((𝐴 ∈ Fin ∧ ∀𝑥𝐴 𝐵 ∈ dom card) → X𝑥𝐴 𝐵 ∈ dom card)
Distinct variable group:   𝑥,𝐴
Allowed substitution hint:   𝐵(𝑥)

Proof of Theorem finixpnum
Dummy variables 𝑣 𝑢 𝑤 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 raleq 3307 . . . 4 (𝑤 = ∅ → (∀𝑥𝑤 𝐵 ∈ dom card ↔ ∀𝑥 ∈ ∅ 𝐵 ∈ dom card))
2 ixpeq1 8853 . . . . . 6 (𝑤 = ∅ → X𝑥𝑤 𝐵 = X𝑥 ∈ ∅ 𝐵)
3 ixp0x 8871 . . . . . 6 X𝑥 ∈ ∅ 𝐵 = {∅}
42, 3eqtrdi 2787 . . . . 5 (𝑤 = ∅ → X𝑥𝑤 𝐵 = {∅})
54eleq1d 2817 . . . 4 (𝑤 = ∅ → (X𝑥𝑤 𝐵 ∈ dom card ↔ {∅} ∈ dom card))
61, 5imbi12d 344 . . 3 (𝑤 = ∅ → ((∀𝑥𝑤 𝐵 ∈ dom card → X𝑥𝑤 𝐵 ∈ dom card) ↔ (∀𝑥 ∈ ∅ 𝐵 ∈ dom card → {∅} ∈ dom card)))
7 raleq 3307 . . . 4 (𝑤 = 𝑦 → (∀𝑥𝑤 𝐵 ∈ dom card ↔ ∀𝑥𝑦 𝐵 ∈ dom card))
8 ixpeq1 8853 . . . . 5 (𝑤 = 𝑦X𝑥𝑤 𝐵 = X𝑥𝑦 𝐵)
98eleq1d 2817 . . . 4 (𝑤 = 𝑦 → (X𝑥𝑤 𝐵 ∈ dom card ↔ X𝑥𝑦 𝐵 ∈ dom card))
107, 9imbi12d 344 . . 3 (𝑤 = 𝑦 → ((∀𝑥𝑤 𝐵 ∈ dom card → X𝑥𝑤 𝐵 ∈ dom card) ↔ (∀𝑥𝑦 𝐵 ∈ dom card → X𝑥𝑦 𝐵 ∈ dom card)))
11 raleq 3307 . . . . 5 (𝑤 = (𝑦 ∪ {𝑧}) → (∀𝑥𝑤 𝐵 ∈ dom card ↔ ∀𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card))
12 ralunb 4156 . . . . . 6 (∀𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card ↔ (∀𝑥𝑦 𝐵 ∈ dom card ∧ ∀𝑥 ∈ {𝑧}𝐵 ∈ dom card))
13 vex 3450 . . . . . . . 8 𝑧 ∈ V
14 ralsnsg 4634 . . . . . . . . 9 (𝑧 ∈ V → (∀𝑥 ∈ {𝑧}𝐵 ∈ dom card ↔ [𝑧 / 𝑥]𝐵 ∈ dom card))
15 sbcel1g 4378 . . . . . . . . 9 (𝑧 ∈ V → ([𝑧 / 𝑥]𝐵 ∈ dom card ↔ 𝑧 / 𝑥𝐵 ∈ dom card))
1614, 15bitrd 278 . . . . . . . 8 (𝑧 ∈ V → (∀𝑥 ∈ {𝑧}𝐵 ∈ dom card ↔ 𝑧 / 𝑥𝐵 ∈ dom card))
1713, 16ax-mp 5 . . . . . . 7 (∀𝑥 ∈ {𝑧}𝐵 ∈ dom card ↔ 𝑧 / 𝑥𝐵 ∈ dom card)
1817anbi2i 623 . . . . . 6 ((∀𝑥𝑦 𝐵 ∈ dom card ∧ ∀𝑥 ∈ {𝑧}𝐵 ∈ dom card) ↔ (∀𝑥𝑦 𝐵 ∈ dom card ∧ 𝑧 / 𝑥𝐵 ∈ dom card))
1912, 18bitri 274 . . . . 5 (∀𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card ↔ (∀𝑥𝑦 𝐵 ∈ dom card ∧ 𝑧 / 𝑥𝐵 ∈ dom card))
2011, 19bitrdi 286 . . . 4 (𝑤 = (𝑦 ∪ {𝑧}) → (∀𝑥𝑤 𝐵 ∈ dom card ↔ (∀𝑥𝑦 𝐵 ∈ dom card ∧ 𝑧 / 𝑥𝐵 ∈ dom card)))
21 ixpeq1 8853 . . . . 5 (𝑤 = (𝑦 ∪ {𝑧}) → X𝑥𝑤 𝐵 = X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵)
2221eleq1d 2817 . . . 4 (𝑤 = (𝑦 ∪ {𝑧}) → (X𝑥𝑤 𝐵 ∈ dom card ↔ X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card))
2320, 22imbi12d 344 . . 3 (𝑤 = (𝑦 ∪ {𝑧}) → ((∀𝑥𝑤 𝐵 ∈ dom card → X𝑥𝑤 𝐵 ∈ dom card) ↔ ((∀𝑥𝑦 𝐵 ∈ dom card ∧ 𝑧 / 𝑥𝐵 ∈ dom card) → X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card)))
24 raleq 3307 . . . 4 (𝑤 = 𝐴 → (∀𝑥𝑤 𝐵 ∈ dom card ↔ ∀𝑥𝐴 𝐵 ∈ dom card))
25 ixpeq1 8853 . . . . 5 (𝑤 = 𝐴X𝑥𝑤 𝐵 = X𝑥𝐴 𝐵)
2625eleq1d 2817 . . . 4 (𝑤 = 𝐴 → (X𝑥𝑤 𝐵 ∈ dom card ↔ X𝑥𝐴 𝐵 ∈ dom card))
2724, 26imbi12d 344 . . 3 (𝑤 = 𝐴 → ((∀𝑥𝑤 𝐵 ∈ dom card → X𝑥𝑤 𝐵 ∈ dom card) ↔ (∀𝑥𝐴 𝐵 ∈ dom card → X𝑥𝐴 𝐵 ∈ dom card)))
28 snfi 8995 . . . 4 {∅} ∈ Fin
29 finnum 9893 . . . 4 ({∅} ∈ Fin → {∅} ∈ dom card)
3028, 29mp1i 13 . . 3 (∀𝑥 ∈ ∅ 𝐵 ∈ dom card → {∅} ∈ dom card)
31 pm2.27 42 . . . . . . . 8 (∀𝑥𝑦 𝐵 ∈ dom card → ((∀𝑥𝑦 𝐵 ∈ dom card → X𝑥𝑦 𝐵 ∈ dom card) → X𝑥𝑦 𝐵 ∈ dom card))
32 xpnum 9896 . . . . . . . . . . 11 ((X𝑥𝑦 𝐵 ∈ dom card ∧ 𝑧 / 𝑥𝐵 ∈ dom card) → (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ∈ dom card)
3332ancoms 459 . . . . . . . . . 10 ((𝑧 / 𝑥𝐵 ∈ dom card ∧ X𝑥𝑦 𝐵 ∈ dom card) → (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ∈ dom card)
34 xp1st 7958 . . . . . . . . . . . . . . . 16 (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) → (1st𝑤) ∈ X𝑥𝑦 𝐵)
35 ixpfn 8848 . . . . . . . . . . . . . . . 16 ((1st𝑤) ∈ X𝑥𝑦 𝐵 → (1st𝑤) Fn 𝑦)
3634, 35syl 17 . . . . . . . . . . . . . . 15 (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) → (1st𝑤) Fn 𝑦)
37 fvex 6860 . . . . . . . . . . . . . . . 16 (2nd𝑤) ∈ V
3813, 37fnsn 6564 . . . . . . . . . . . . . . 15 {⟨𝑧, (2nd𝑤)⟩} Fn {𝑧}
3936, 38jctir 521 . . . . . . . . . . . . . 14 (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) → ((1st𝑤) Fn 𝑦 ∧ {⟨𝑧, (2nd𝑤)⟩} Fn {𝑧}))
40 disjsn 4677 . . . . . . . . . . . . . . 15 ((𝑦 ∩ {𝑧}) = ∅ ↔ ¬ 𝑧𝑦)
4140biimpri 227 . . . . . . . . . . . . . 14 𝑧𝑦 → (𝑦 ∩ {𝑧}) = ∅)
42 fnun 6619 . . . . . . . . . . . . . 14 ((((1st𝑤) Fn 𝑦 ∧ {⟨𝑧, (2nd𝑤)⟩} Fn {𝑧}) ∧ (𝑦 ∩ {𝑧}) = ∅) → ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}) Fn (𝑦 ∪ {𝑧}))
4339, 41, 42syl2anr 597 . . . . . . . . . . . . 13 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}) Fn (𝑦 ∪ {𝑧}))
44 fvex 6860 . . . . . . . . . . . . . . . . 17 (1st𝑤) ∈ V
4544elixp 8849 . . . . . . . . . . . . . . . 16 ((1st𝑤) ∈ X𝑥𝑦 𝐵 ↔ ((1st𝑤) Fn 𝑦 ∧ ∀𝑥𝑦 ((1st𝑤)‘𝑥) ∈ 𝐵))
4634, 45sylib 217 . . . . . . . . . . . . . . 15 (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) → ((1st𝑤) Fn 𝑦 ∧ ∀𝑥𝑦 ((1st𝑤)‘𝑥) ∈ 𝐵))
47 fvun1 6937 . . . . . . . . . . . . . . . . . . . . . 22 (((1st𝑤) Fn 𝑦 ∧ {⟨𝑧, (2nd𝑤)⟩} Fn {𝑧} ∧ ((𝑦 ∩ {𝑧}) = ∅ ∧ 𝑥𝑦)) → (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) = ((1st𝑤)‘𝑥))
4838, 47mp3an2 1449 . . . . . . . . . . . . . . . . . . . . 21 (((1st𝑤) Fn 𝑦 ∧ ((𝑦 ∩ {𝑧}) = ∅ ∧ 𝑥𝑦)) → (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) = ((1st𝑤)‘𝑥))
4948anassrs 468 . . . . . . . . . . . . . . . . . . . 20 ((((1st𝑤) Fn 𝑦 ∧ (𝑦 ∩ {𝑧}) = ∅) ∧ 𝑥𝑦) → (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) = ((1st𝑤)‘𝑥))
5049eleq1d 2817 . . . . . . . . . . . . . . . . . . 19 ((((1st𝑤) Fn 𝑦 ∧ (𝑦 ∩ {𝑧}) = ∅) ∧ 𝑥𝑦) → ((((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵 ↔ ((1st𝑤)‘𝑥) ∈ 𝐵))
5150biimprd 247 . . . . . . . . . . . . . . . . . 18 ((((1st𝑤) Fn 𝑦 ∧ (𝑦 ∩ {𝑧}) = ∅) ∧ 𝑥𝑦) → (((1st𝑤)‘𝑥) ∈ 𝐵 → (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵))
5251ralimdva 3160 . . . . . . . . . . . . . . . . 17 (((1st𝑤) Fn 𝑦 ∧ (𝑦 ∩ {𝑧}) = ∅) → (∀𝑥𝑦 ((1st𝑤)‘𝑥) ∈ 𝐵 → ∀𝑥𝑦 (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵))
5352ancoms 459 . . . . . . . . . . . . . . . 16 (((𝑦 ∩ {𝑧}) = ∅ ∧ (1st𝑤) Fn 𝑦) → (∀𝑥𝑦 ((1st𝑤)‘𝑥) ∈ 𝐵 → ∀𝑥𝑦 (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵))
5453impr 455 . . . . . . . . . . . . . . 15 (((𝑦 ∩ {𝑧}) = ∅ ∧ ((1st𝑤) Fn 𝑦 ∧ ∀𝑥𝑦 ((1st𝑤)‘𝑥) ∈ 𝐵)) → ∀𝑥𝑦 (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵)
5541, 46, 54syl2an 596 . . . . . . . . . . . . . 14 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → ∀𝑥𝑦 (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵)
56 vsnid 4628 . . . . . . . . . . . . . . . . . . 19 𝑧 ∈ {𝑧}
5741, 56jctir 521 . . . . . . . . . . . . . . . . . 18 𝑧𝑦 → ((𝑦 ∩ {𝑧}) = ∅ ∧ 𝑧 ∈ {𝑧}))
58 fvun2 6938 . . . . . . . . . . . . . . . . . . 19 (((1st𝑤) Fn 𝑦 ∧ {⟨𝑧, (2nd𝑤)⟩} Fn {𝑧} ∧ ((𝑦 ∩ {𝑧}) = ∅ ∧ 𝑧 ∈ {𝑧})) → (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑧) = ({⟨𝑧, (2nd𝑤)⟩}‘𝑧))
5938, 58mp3an2 1449 . . . . . . . . . . . . . . . . . 18 (((1st𝑤) Fn 𝑦 ∧ ((𝑦 ∩ {𝑧}) = ∅ ∧ 𝑧 ∈ {𝑧})) → (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑧) = ({⟨𝑧, (2nd𝑤)⟩}‘𝑧))
6036, 57, 59syl2anr 597 . . . . . . . . . . . . . . . . 17 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑧) = ({⟨𝑧, (2nd𝑤)⟩}‘𝑧))
61 csbfv 6897 . . . . . . . . . . . . . . . . 17 𝑧 / 𝑥(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) = (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑧)
6213, 37fvsn 7132 . . . . . . . . . . . . . . . . . 18 ({⟨𝑧, (2nd𝑤)⟩}‘𝑧) = (2nd𝑤)
6362eqcomi 2740 . . . . . . . . . . . . . . . . 17 (2nd𝑤) = ({⟨𝑧, (2nd𝑤)⟩}‘𝑧)
6460, 61, 633eqtr4g 2796 . . . . . . . . . . . . . . . 16 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → 𝑧 / 𝑥(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) = (2nd𝑤))
65 xp2nd 7959 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) → (2nd𝑤) ∈ 𝑧 / 𝑥𝐵)
6665adantl 482 . . . . . . . . . . . . . . . 16 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → (2nd𝑤) ∈ 𝑧 / 𝑥𝐵)
6764, 66eqeltrd 2832 . . . . . . . . . . . . . . 15 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → 𝑧 / 𝑥(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝑧 / 𝑥𝐵)
68 ralsnsg 4634 . . . . . . . . . . . . . . . . 17 (𝑧 ∈ V → (∀𝑥 ∈ {𝑧} (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵[𝑧 / 𝑥](((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵))
6913, 68ax-mp 5 . . . . . . . . . . . . . . . 16 (∀𝑥 ∈ {𝑧} (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵[𝑧 / 𝑥](((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵)
70 sbcel12 4373 . . . . . . . . . . . . . . . 16 ([𝑧 / 𝑥](((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵𝑧 / 𝑥(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝑧 / 𝑥𝐵)
7169, 70bitri 274 . . . . . . . . . . . . . . 15 (∀𝑥 ∈ {𝑧} (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵𝑧 / 𝑥(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝑧 / 𝑥𝐵)
7267, 71sylibr 233 . . . . . . . . . . . . . 14 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → ∀𝑥 ∈ {𝑧} (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵)
73 ralun 4157 . . . . . . . . . . . . . 14 ((∀𝑥𝑦 (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵 ∧ ∀𝑥 ∈ {𝑧} (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵) → ∀𝑥 ∈ (𝑦 ∪ {𝑧})(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵)
7455, 72, 73syl2anc 584 . . . . . . . . . . . . 13 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → ∀𝑥 ∈ (𝑦 ∪ {𝑧})(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵)
75 snex 5393 . . . . . . . . . . . . . . 15 {⟨𝑧, (2nd𝑤)⟩} ∈ V
7644, 75unex 7685 . . . . . . . . . . . . . 14 ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}) ∈ V
7776elixp 8849 . . . . . . . . . . . . 13 (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}) ∈ X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ↔ (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}) Fn (𝑦 ∪ {𝑧}) ∧ ∀𝑥 ∈ (𝑦 ∪ {𝑧})(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵))
7843, 74, 77sylanbrc 583 . . . . . . . . . . . 12 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}) ∈ X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵)
7978fmpttd 7068 . . . . . . . . . . 11 𝑧𝑦 → (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})):(X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)⟶X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵)
80 ixpfn 8848 . . . . . . . . . . . . . . . . 17 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵𝑢 Fn (𝑦 ∪ {𝑧}))
81 ssun1 4137 . . . . . . . . . . . . . . . . 17 𝑦 ⊆ (𝑦 ∪ {𝑧})
82 fnssres 6629 . . . . . . . . . . . . . . . . 17 ((𝑢 Fn (𝑦 ∪ {𝑧}) ∧ 𝑦 ⊆ (𝑦 ∪ {𝑧})) → (𝑢𝑦) Fn 𝑦)
8380, 81, 82sylancl 586 . . . . . . . . . . . . . . . 16 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 → (𝑢𝑦) Fn 𝑦)
84 vex 3450 . . . . . . . . . . . . . . . . . 18 𝑢 ∈ V
8584elixp 8849 . . . . . . . . . . . . . . . . 17 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ↔ (𝑢 Fn (𝑦 ∪ {𝑧}) ∧ ∀𝑥 ∈ (𝑦 ∪ {𝑧})(𝑢𝑥) ∈ 𝐵))
86 ssralv 4015 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ⊆ (𝑦 ∪ {𝑧}) → (∀𝑥 ∈ (𝑦 ∪ {𝑧})(𝑢𝑥) ∈ 𝐵 → ∀𝑥𝑦 (𝑢𝑥) ∈ 𝐵))
8781, 86ax-mp 5 . . . . . . . . . . . . . . . . . . 19 (∀𝑥 ∈ (𝑦 ∪ {𝑧})(𝑢𝑥) ∈ 𝐵 → ∀𝑥𝑦 (𝑢𝑥) ∈ 𝐵)
88 fvres 6866 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥𝑦 → ((𝑢𝑦)‘𝑥) = (𝑢𝑥))
8988eleq1d 2817 . . . . . . . . . . . . . . . . . . . . 21 (𝑥𝑦 → (((𝑢𝑦)‘𝑥) ∈ 𝐵 ↔ (𝑢𝑥) ∈ 𝐵))
9089biimprd 247 . . . . . . . . . . . . . . . . . . . 20 (𝑥𝑦 → ((𝑢𝑥) ∈ 𝐵 → ((𝑢𝑦)‘𝑥) ∈ 𝐵))
9190ralimia 3079 . . . . . . . . . . . . . . . . . . 19 (∀𝑥𝑦 (𝑢𝑥) ∈ 𝐵 → ∀𝑥𝑦 ((𝑢𝑦)‘𝑥) ∈ 𝐵)
9287, 91syl 17 . . . . . . . . . . . . . . . . . 18 (∀𝑥 ∈ (𝑦 ∪ {𝑧})(𝑢𝑥) ∈ 𝐵 → ∀𝑥𝑦 ((𝑢𝑦)‘𝑥) ∈ 𝐵)
9392adantl 482 . . . . . . . . . . . . . . . . 17 ((𝑢 Fn (𝑦 ∪ {𝑧}) ∧ ∀𝑥 ∈ (𝑦 ∪ {𝑧})(𝑢𝑥) ∈ 𝐵) → ∀𝑥𝑦 ((𝑢𝑦)‘𝑥) ∈ 𝐵)
9485, 93sylbi 216 . . . . . . . . . . . . . . . 16 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 → ∀𝑥𝑦 ((𝑢𝑦)‘𝑥) ∈ 𝐵)
9584resex 5990 . . . . . . . . . . . . . . . . 17 (𝑢𝑦) ∈ V
9695elixp 8849 . . . . . . . . . . . . . . . 16 ((𝑢𝑦) ∈ X𝑥𝑦 𝐵 ↔ ((𝑢𝑦) Fn 𝑦 ∧ ∀𝑥𝑦 ((𝑢𝑦)‘𝑥) ∈ 𝐵))
9783, 94, 96sylanbrc 583 . . . . . . . . . . . . . . 15 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 → (𝑢𝑦) ∈ X𝑥𝑦 𝐵)
98 ssun2 4138 . . . . . . . . . . . . . . . . . 18 {𝑧} ⊆ (𝑦 ∪ {𝑧})
9998, 56sselii 3944 . . . . . . . . . . . . . . . . 17 𝑧 ∈ (𝑦 ∪ {𝑧})
100 csbeq1 3861 . . . . . . . . . . . . . . . . . 18 (𝑤 = 𝑧𝑤 / 𝑥𝐵 = 𝑧 / 𝑥𝐵)
101100fvixp 8847 . . . . . . . . . . . . . . . . 17 ((𝑢X𝑤 ∈ (𝑦 ∪ {𝑧})𝑤 / 𝑥𝐵𝑧 ∈ (𝑦 ∪ {𝑧})) → (𝑢𝑧) ∈ 𝑧 / 𝑥𝐵)
10299, 101mpan2 689 . . . . . . . . . . . . . . . 16 (𝑢X𝑤 ∈ (𝑦 ∪ {𝑧})𝑤 / 𝑥𝐵 → (𝑢𝑧) ∈ 𝑧 / 𝑥𝐵)
103 nfcv 2902 . . . . . . . . . . . . . . . . 17 𝑤𝐵
104 nfcsb1v 3883 . . . . . . . . . . . . . . . . 17 𝑥𝑤 / 𝑥𝐵
105 csbeq1a 3872 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑤𝐵 = 𝑤 / 𝑥𝐵)
106103, 104, 105cbvixp 8859 . . . . . . . . . . . . . . . 16 X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 = X𝑤 ∈ (𝑦 ∪ {𝑧})𝑤 / 𝑥𝐵
107102, 106eleq2s 2850 . . . . . . . . . . . . . . 15 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 → (𝑢𝑧) ∈ 𝑧 / 𝑥𝐵)
108 opelxpi 5675 . . . . . . . . . . . . . . 15 (((𝑢𝑦) ∈ X𝑥𝑦 𝐵 ∧ (𝑢𝑧) ∈ 𝑧 / 𝑥𝐵) → ⟨(𝑢𝑦), (𝑢𝑧)⟩ ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵))
10997, 107, 108syl2anc 584 . . . . . . . . . . . . . 14 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 → ⟨(𝑢𝑦), (𝑢𝑧)⟩ ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵))
110109adantl 482 . . . . . . . . . . . . 13 ((¬ 𝑧𝑦𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵) → ⟨(𝑢𝑦), (𝑢𝑧)⟩ ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵))
111 disj3 4418 . . . . . . . . . . . . . . . . . . 19 ((𝑦 ∩ {𝑧}) = ∅ ↔ 𝑦 = (𝑦 ∖ {𝑧}))
11240, 111sylbb1 236 . . . . . . . . . . . . . . . . . 18 𝑧𝑦𝑦 = (𝑦 ∖ {𝑧}))
113 difun2 4445 . . . . . . . . . . . . . . . . . 18 ((𝑦 ∪ {𝑧}) ∖ {𝑧}) = (𝑦 ∖ {𝑧})
114112, 113eqtr4di 2789 . . . . . . . . . . . . . . . . 17 𝑧𝑦𝑦 = ((𝑦 ∪ {𝑧}) ∖ {𝑧}))
115114reseq2d 5942 . . . . . . . . . . . . . . . 16 𝑧𝑦 → (𝑢𝑦) = (𝑢 ↾ ((𝑦 ∪ {𝑧}) ∖ {𝑧})))
116115uneq1d 4127 . . . . . . . . . . . . . . 15 𝑧𝑦 → ((𝑢𝑦) ∪ {⟨𝑧, (𝑢𝑧)⟩}) = ((𝑢 ↾ ((𝑦 ∪ {𝑧}) ∖ {𝑧})) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
117116adantr 481 . . . . . . . . . . . . . 14 ((¬ 𝑧𝑦𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵) → ((𝑢𝑦) ∪ {⟨𝑧, (𝑢𝑧)⟩}) = ((𝑢 ↾ ((𝑦 ∪ {𝑧}) ∖ {𝑧})) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
118 fvex 6860 . . . . . . . . . . . . . . . . . . 19 (𝑢𝑧) ∈ V
11995, 118op1std 7936 . . . . . . . . . . . . . . . . . 18 (𝑤 = ⟨(𝑢𝑦), (𝑢𝑧)⟩ → (1st𝑤) = (𝑢𝑦))
12095, 118op2ndd 7937 . . . . . . . . . . . . . . . . . . . 20 (𝑤 = ⟨(𝑢𝑦), (𝑢𝑧)⟩ → (2nd𝑤) = (𝑢𝑧))
121120opeq2d 4842 . . . . . . . . . . . . . . . . . . 19 (𝑤 = ⟨(𝑢𝑦), (𝑢𝑧)⟩ → ⟨𝑧, (2nd𝑤)⟩ = ⟨𝑧, (𝑢𝑧)⟩)
122121sneqd 4603 . . . . . . . . . . . . . . . . . 18 (𝑤 = ⟨(𝑢𝑦), (𝑢𝑧)⟩ → {⟨𝑧, (2nd𝑤)⟩} = {⟨𝑧, (𝑢𝑧)⟩})
123119, 122uneq12d 4129 . . . . . . . . . . . . . . . . 17 (𝑤 = ⟨(𝑢𝑦), (𝑢𝑧)⟩ → ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}) = ((𝑢𝑦) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
124 eqid 2731 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})) = (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))
125 snex 5393 . . . . . . . . . . . . . . . . . 18 {⟨𝑧, (𝑢𝑧)⟩} ∈ V
12695, 125unex 7685 . . . . . . . . . . . . . . . . 17 ((𝑢𝑦) ∪ {⟨𝑧, (𝑢𝑧)⟩}) ∈ V
127123, 124, 126fvmpt 6953 . . . . . . . . . . . . . . . 16 (⟨(𝑢𝑦), (𝑢𝑧)⟩ ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) → ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘⟨(𝑢𝑦), (𝑢𝑧)⟩) = ((𝑢𝑦) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
128109, 127syl 17 . . . . . . . . . . . . . . 15 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 → ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘⟨(𝑢𝑦), (𝑢𝑧)⟩) = ((𝑢𝑦) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
129128adantl 482 . . . . . . . . . . . . . 14 ((¬ 𝑧𝑦𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵) → ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘⟨(𝑢𝑦), (𝑢𝑧)⟩) = ((𝑢𝑦) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
130 fnsnsplit 7135 . . . . . . . . . . . . . . . 16 ((𝑢 Fn (𝑦 ∪ {𝑧}) ∧ 𝑧 ∈ (𝑦 ∪ {𝑧})) → 𝑢 = ((𝑢 ↾ ((𝑦 ∪ {𝑧}) ∖ {𝑧})) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
13180, 99, 130sylancl 586 . . . . . . . . . . . . . . 15 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵𝑢 = ((𝑢 ↾ ((𝑦 ∪ {𝑧}) ∖ {𝑧})) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
132131adantl 482 . . . . . . . . . . . . . 14 ((¬ 𝑧𝑦𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵) → 𝑢 = ((𝑢 ↾ ((𝑦 ∪ {𝑧}) ∖ {𝑧})) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
133117, 129, 1323eqtr4rd 2782 . . . . . . . . . . . . 13 ((¬ 𝑧𝑦𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵) → 𝑢 = ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘⟨(𝑢𝑦), (𝑢𝑧)⟩))
134 fveq2 6847 . . . . . . . . . . . . . 14 (𝑣 = ⟨(𝑢𝑦), (𝑢𝑧)⟩ → ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘𝑣) = ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘⟨(𝑢𝑦), (𝑢𝑧)⟩))
135134rspceeqv 3598 . . . . . . . . . . . . 13 ((⟨(𝑢𝑦), (𝑢𝑧)⟩ ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ∧ 𝑢 = ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘⟨(𝑢𝑦), (𝑢𝑧)⟩)) → ∃𝑣 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)𝑢 = ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘𝑣))
136110, 133, 135syl2anc 584 . . . . . . . . . . . 12 ((¬ 𝑧𝑦𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵) → ∃𝑣 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)𝑢 = ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘𝑣))
137136ralrimiva 3139 . . . . . . . . . . 11 𝑧𝑦 → ∀𝑢X 𝑥 ∈ (𝑦 ∪ {𝑧})𝐵𝑣 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)𝑢 = ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘𝑣))
138 dffo3 7057 . . . . . . . . . . 11 ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})):(X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)–ontoX𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ↔ ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})):(X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)⟶X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∧ ∀𝑢X 𝑥 ∈ (𝑦 ∪ {𝑧})𝐵𝑣 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)𝑢 = ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘𝑣)))
13979, 137, 138sylanbrc 583 . . . . . . . . . 10 𝑧𝑦 → (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})):(X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)–ontoX𝑥 ∈ (𝑦 ∪ {𝑧})𝐵)
140 fonum 10003 . . . . . . . . . 10 (((X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ∈ dom card ∧ (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})):(X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)–ontoX𝑥 ∈ (𝑦 ∪ {𝑧})𝐵) → X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card)
14133, 139, 140syl2anr 597 . . . . . . . . 9 ((¬ 𝑧𝑦 ∧ (𝑧 / 𝑥𝐵 ∈ dom card ∧ X𝑥𝑦 𝐵 ∈ dom card)) → X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card)
142141expr 457 . . . . . . . 8 ((¬ 𝑧𝑦𝑧 / 𝑥𝐵 ∈ dom card) → (X𝑥𝑦 𝐵 ∈ dom card → X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card))
14331, 142syl9r 78 . . . . . . 7 ((¬ 𝑧𝑦𝑧 / 𝑥𝐵 ∈ dom card) → (∀𝑥𝑦 𝐵 ∈ dom card → ((∀𝑥𝑦 𝐵 ∈ dom card → X𝑥𝑦 𝐵 ∈ dom card) → X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card)))
144143expimpd 454 . . . . . 6 𝑧𝑦 → ((𝑧 / 𝑥𝐵 ∈ dom card ∧ ∀𝑥𝑦 𝐵 ∈ dom card) → ((∀𝑥𝑦 𝐵 ∈ dom card → X𝑥𝑦 𝐵 ∈ dom card) → X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card)))
145144ancomsd 466 . . . . 5 𝑧𝑦 → ((∀𝑥𝑦 𝐵 ∈ dom card ∧ 𝑧 / 𝑥𝐵 ∈ dom card) → ((∀𝑥𝑦 𝐵 ∈ dom card → X𝑥𝑦 𝐵 ∈ dom card) → X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card)))
146145com23 86 . . . 4 𝑧𝑦 → ((∀𝑥𝑦 𝐵 ∈ dom card → X𝑥𝑦 𝐵 ∈ dom card) → ((∀𝑥𝑦 𝐵 ∈ dom card ∧ 𝑧 / 𝑥𝐵 ∈ dom card) → X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card)))
147146adantl 482 . . 3 ((𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) → ((∀𝑥𝑦 𝐵 ∈ dom card → X𝑥𝑦 𝐵 ∈ dom card) → ((∀𝑥𝑦 𝐵 ∈ dom card ∧ 𝑧 / 𝑥𝐵 ∈ dom card) → X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card)))
1486, 10, 23, 27, 30, 147findcard2s 9116 . 2 (𝐴 ∈ Fin → (∀𝑥𝐴 𝐵 ∈ dom card → X𝑥𝐴 𝐵 ∈ dom card))
149148imp 407 1 ((𝐴 ∈ Fin ∧ ∀𝑥𝐴 𝐵 ∈ dom card) → X𝑥𝐴 𝐵 ∈ dom card)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 396   = wceq 1541  wcel 2106  wral 3060  wrex 3069  Vcvv 3446  [wsbc 3742  csb 3858  cdif 3910  cun 3911  cin 3912  wss 3913  c0 4287  {csn 4591  cop 4597  cmpt 5193   × cxp 5636  dom cdm 5638  cres 5640   Fn wfn 6496  wf 6497  ontowfo 6499  cfv 6501  1st c1st 7924  2nd c2nd 7925  Xcixp 8842  Fincfn 8890  cardccrd 9880
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 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2702  ax-rep 5247  ax-sep 5261  ax-nul 5268  ax-pow 5325  ax-pr 5389  ax-un 7677
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-ral 3061  df-rex 3070  df-rmo 3351  df-reu 3352  df-rab 3406  df-v 3448  df-sbc 3743  df-csb 3859  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3932  df-nul 4288  df-if 4492  df-pw 4567  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4871  df-int 4913  df-iun 4961  df-br 5111  df-opab 5173  df-mpt 5194  df-tr 5228  df-id 5536  df-eprel 5542  df-po 5550  df-so 5551  df-fr 5593  df-se 5594  df-we 5595  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-pred 6258  df-ord 6325  df-on 6326  df-lim 6327  df-suc 6328  df-iota 6453  df-fun 6503  df-fn 6504  df-f 6505  df-f1 6506  df-fo 6507  df-f1o 6508  df-fv 6509  df-isom 6510  df-riota 7318  df-ov 7365  df-oprab 7366  df-mpo 7367  df-om 7808  df-1st 7926  df-2nd 7927  df-frecs 8217  df-wrecs 8248  df-recs 8322  df-rdg 8361  df-1o 8417  df-oadd 8421  df-omul 8422  df-er 8655  df-map 8774  df-ixp 8843  df-en 8891  df-dom 8892  df-fin 8894  df-card 9884  df-acn 9887
This theorem is referenced by:  poimirlem32  36183
  Copyright terms: Public domain W3C validator