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 34911
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 3405 . . . 4 (𝑤 = ∅ → (∀𝑥𝑤 𝐵 ∈ dom card ↔ ∀𝑥 ∈ ∅ 𝐵 ∈ dom card))
2 ixpeq1 8458 . . . . . 6 (𝑤 = ∅ → X𝑥𝑤 𝐵 = X𝑥 ∈ ∅ 𝐵)
3 ixp0x 8476 . . . . . 6 X𝑥 ∈ ∅ 𝐵 = {∅}
42, 3syl6eq 2872 . . . . 5 (𝑤 = ∅ → X𝑥𝑤 𝐵 = {∅})
54eleq1d 2897 . . . 4 (𝑤 = ∅ → (X𝑥𝑤 𝐵 ∈ dom card ↔ {∅} ∈ dom card))
61, 5imbi12d 347 . . 3 (𝑤 = ∅ → ((∀𝑥𝑤 𝐵 ∈ dom card → X𝑥𝑤 𝐵 ∈ dom card) ↔ (∀𝑥 ∈ ∅ 𝐵 ∈ dom card → {∅} ∈ dom card)))
7 raleq 3405 . . . 4 (𝑤 = 𝑦 → (∀𝑥𝑤 𝐵 ∈ dom card ↔ ∀𝑥𝑦 𝐵 ∈ dom card))
8 ixpeq1 8458 . . . . 5 (𝑤 = 𝑦X𝑥𝑤 𝐵 = X𝑥𝑦 𝐵)
98eleq1d 2897 . . . 4 (𝑤 = 𝑦 → (X𝑥𝑤 𝐵 ∈ dom card ↔ X𝑥𝑦 𝐵 ∈ dom card))
107, 9imbi12d 347 . . 3 (𝑤 = 𝑦 → ((∀𝑥𝑤 𝐵 ∈ dom card → X𝑥𝑤 𝐵 ∈ dom card) ↔ (∀𝑥𝑦 𝐵 ∈ dom card → X𝑥𝑦 𝐵 ∈ dom card)))
11 raleq 3405 . . . . 5 (𝑤 = (𝑦 ∪ {𝑧}) → (∀𝑥𝑤 𝐵 ∈ dom card ↔ ∀𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card))
12 ralunb 4155 . . . . . 6 (∀𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card ↔ (∀𝑥𝑦 𝐵 ∈ dom card ∧ ∀𝑥 ∈ {𝑧}𝐵 ∈ dom card))
13 vex 3489 . . . . . . . 8 𝑧 ∈ V
14 ralsnsg 4594 . . . . . . . . 9 (𝑧 ∈ V → (∀𝑥 ∈ {𝑧}𝐵 ∈ dom card ↔ [𝑧 / 𝑥]𝐵 ∈ dom card))
15 sbcel1g 4351 . . . . . . . . 9 (𝑧 ∈ V → ([𝑧 / 𝑥]𝐵 ∈ dom card ↔ 𝑧 / 𝑥𝐵 ∈ dom card))
1614, 15bitrd 281 . . . . . . . 8 (𝑧 ∈ V → (∀𝑥 ∈ {𝑧}𝐵 ∈ dom card ↔ 𝑧 / 𝑥𝐵 ∈ dom card))
1713, 16ax-mp 5 . . . . . . 7 (∀𝑥 ∈ {𝑧}𝐵 ∈ dom card ↔ 𝑧 / 𝑥𝐵 ∈ dom card)
1817anbi2i 624 . . . . . 6 ((∀𝑥𝑦 𝐵 ∈ dom card ∧ ∀𝑥 ∈ {𝑧}𝐵 ∈ dom card) ↔ (∀𝑥𝑦 𝐵 ∈ dom card ∧ 𝑧 / 𝑥𝐵 ∈ dom card))
1912, 18bitri 277 . . . . 5 (∀𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card ↔ (∀𝑥𝑦 𝐵 ∈ dom card ∧ 𝑧 / 𝑥𝐵 ∈ dom card))
2011, 19syl6bb 289 . . . 4 (𝑤 = (𝑦 ∪ {𝑧}) → (∀𝑥𝑤 𝐵 ∈ dom card ↔ (∀𝑥𝑦 𝐵 ∈ dom card ∧ 𝑧 / 𝑥𝐵 ∈ dom card)))
21 ixpeq1 8458 . . . . 5 (𝑤 = (𝑦 ∪ {𝑧}) → X𝑥𝑤 𝐵 = X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵)
2221eleq1d 2897 . . . 4 (𝑤 = (𝑦 ∪ {𝑧}) → (X𝑥𝑤 𝐵 ∈ dom card ↔ X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card))
2320, 22imbi12d 347 . . 3 (𝑤 = (𝑦 ∪ {𝑧}) → ((∀𝑥𝑤 𝐵 ∈ dom card → X𝑥𝑤 𝐵 ∈ dom card) ↔ ((∀𝑥𝑦 𝐵 ∈ dom card ∧ 𝑧 / 𝑥𝐵 ∈ dom card) → X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card)))
24 raleq 3405 . . . 4 (𝑤 = 𝐴 → (∀𝑥𝑤 𝐵 ∈ dom card ↔ ∀𝑥𝐴 𝐵 ∈ dom card))
25 ixpeq1 8458 . . . . 5 (𝑤 = 𝐴X𝑥𝑤 𝐵 = X𝑥𝐴 𝐵)
2625eleq1d 2897 . . . 4 (𝑤 = 𝐴 → (X𝑥𝑤 𝐵 ∈ dom card ↔ X𝑥𝐴 𝐵 ∈ dom card))
2724, 26imbi12d 347 . . 3 (𝑤 = 𝐴 → ((∀𝑥𝑤 𝐵 ∈ dom card → X𝑥𝑤 𝐵 ∈ dom card) ↔ (∀𝑥𝐴 𝐵 ∈ dom card → X𝑥𝐴 𝐵 ∈ dom card)))
28 snfi 8580 . . . 4 {∅} ∈ Fin
29 finnum 9363 . . . 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 9366 . . . . . . . . . . 11 ((X𝑥𝑦 𝐵 ∈ dom card ∧ 𝑧 / 𝑥𝐵 ∈ dom card) → (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ∈ dom card)
3332ancoms 461 . . . . . . . . . 10 ((𝑧 / 𝑥𝐵 ∈ dom card ∧ X𝑥𝑦 𝐵 ∈ dom card) → (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ∈ dom card)
34 xp1st 7707 . . . . . . . . . . . . . . . 16 (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) → (1st𝑤) ∈ X𝑥𝑦 𝐵)
35 ixpfn 8453 . . . . . . . . . . . . . . . 16 ((1st𝑤) ∈ X𝑥𝑦 𝐵 → (1st𝑤) Fn 𝑦)
3634, 35syl 17 . . . . . . . . . . . . . . 15 (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) → (1st𝑤) Fn 𝑦)
37 fvex 6669 . . . . . . . . . . . . . . . 16 (2nd𝑤) ∈ V
3813, 37fnsn 6398 . . . . . . . . . . . . . . 15 {⟨𝑧, (2nd𝑤)⟩} Fn {𝑧}
3936, 38jctir 523 . . . . . . . . . . . . . 14 (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) → ((1st𝑤) Fn 𝑦 ∧ {⟨𝑧, (2nd𝑤)⟩} Fn {𝑧}))
40 disjsn 4633 . . . . . . . . . . . . . . 15 ((𝑦 ∩ {𝑧}) = ∅ ↔ ¬ 𝑧𝑦)
4140biimpri 230 . . . . . . . . . . . . . 14 𝑧𝑦 → (𝑦 ∩ {𝑧}) = ∅)
42 fnun 6449 . . . . . . . . . . . . . 14 ((((1st𝑤) Fn 𝑦 ∧ {⟨𝑧, (2nd𝑤)⟩} Fn {𝑧}) ∧ (𝑦 ∩ {𝑧}) = ∅) → ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}) Fn (𝑦 ∪ {𝑧}))
4339, 41, 42syl2anr 598 . . . . . . . . . . . . 13 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}) Fn (𝑦 ∪ {𝑧}))
44 fvex 6669 . . . . . . . . . . . . . . . . 17 (1st𝑤) ∈ V
4544elixp 8454 . . . . . . . . . . . . . . . 16 ((1st𝑤) ∈ X𝑥𝑦 𝐵 ↔ ((1st𝑤) Fn 𝑦 ∧ ∀𝑥𝑦 ((1st𝑤)‘𝑥) ∈ 𝐵))
4634, 45sylib 220 . . . . . . . . . . . . . . 15 (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) → ((1st𝑤) Fn 𝑦 ∧ ∀𝑥𝑦 ((1st𝑤)‘𝑥) ∈ 𝐵))
47 fvun1 6740 . . . . . . . . . . . . . . . . . . . . . 22 (((1st𝑤) Fn 𝑦 ∧ {⟨𝑧, (2nd𝑤)⟩} Fn {𝑧} ∧ ((𝑦 ∩ {𝑧}) = ∅ ∧ 𝑥𝑦)) → (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) = ((1st𝑤)‘𝑥))
4838, 47mp3an2 1445 . . . . . . . . . . . . . . . . . . . . 21 (((1st𝑤) Fn 𝑦 ∧ ((𝑦 ∩ {𝑧}) = ∅ ∧ 𝑥𝑦)) → (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) = ((1st𝑤)‘𝑥))
4948anassrs 470 . . . . . . . . . . . . . . . . . . . 20 ((((1st𝑤) Fn 𝑦 ∧ (𝑦 ∩ {𝑧}) = ∅) ∧ 𝑥𝑦) → (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) = ((1st𝑤)‘𝑥))
5049eleq1d 2897 . . . . . . . . . . . . . . . . . . 19 ((((1st𝑤) Fn 𝑦 ∧ (𝑦 ∩ {𝑧}) = ∅) ∧ 𝑥𝑦) → ((((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵 ↔ ((1st𝑤)‘𝑥) ∈ 𝐵))
5150biimprd 250 . . . . . . . . . . . . . . . . . 18 ((((1st𝑤) Fn 𝑦 ∧ (𝑦 ∩ {𝑧}) = ∅) ∧ 𝑥𝑦) → (((1st𝑤)‘𝑥) ∈ 𝐵 → (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵))
5251ralimdva 3177 . . . . . . . . . . . . . . . . 17 (((1st𝑤) Fn 𝑦 ∧ (𝑦 ∩ {𝑧}) = ∅) → (∀𝑥𝑦 ((1st𝑤)‘𝑥) ∈ 𝐵 → ∀𝑥𝑦 (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵))
5352ancoms 461 . . . . . . . . . . . . . . . 16 (((𝑦 ∩ {𝑧}) = ∅ ∧ (1st𝑤) Fn 𝑦) → (∀𝑥𝑦 ((1st𝑤)‘𝑥) ∈ 𝐵 → ∀𝑥𝑦 (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵))
5453impr 457 . . . . . . . . . . . . . . 15 (((𝑦 ∩ {𝑧}) = ∅ ∧ ((1st𝑤) Fn 𝑦 ∧ ∀𝑥𝑦 ((1st𝑤)‘𝑥) ∈ 𝐵)) → ∀𝑥𝑦 (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵)
5541, 46, 54syl2an 597 . . . . . . . . . . . . . 14 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → ∀𝑥𝑦 (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵)
56 vsnid 4588 . . . . . . . . . . . . . . . . . . 19 𝑧 ∈ {𝑧}
5741, 56jctir 523 . . . . . . . . . . . . . . . . . 18 𝑧𝑦 → ((𝑦 ∩ {𝑧}) = ∅ ∧ 𝑧 ∈ {𝑧}))
58 fvun2 6741 . . . . . . . . . . . . . . . . . . 19 (((1st𝑤) Fn 𝑦 ∧ {⟨𝑧, (2nd𝑤)⟩} Fn {𝑧} ∧ ((𝑦 ∩ {𝑧}) = ∅ ∧ 𝑧 ∈ {𝑧})) → (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑧) = ({⟨𝑧, (2nd𝑤)⟩}‘𝑧))
5938, 58mp3an2 1445 . . . . . . . . . . . . . . . . . 18 (((1st𝑤) Fn 𝑦 ∧ ((𝑦 ∩ {𝑧}) = ∅ ∧ 𝑧 ∈ {𝑧})) → (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑧) = ({⟨𝑧, (2nd𝑤)⟩}‘𝑧))
6036, 57, 59syl2anr 598 . . . . . . . . . . . . . . . . 17 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑧) = ({⟨𝑧, (2nd𝑤)⟩}‘𝑧))
61 csbfv 6701 . . . . . . . . . . . . . . . . 17 𝑧 / 𝑥(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) = (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑧)
6213, 37fvsn 6929 . . . . . . . . . . . . . . . . . 18 ({⟨𝑧, (2nd𝑤)⟩}‘𝑧) = (2nd𝑤)
6362eqcomi 2830 . . . . . . . . . . . . . . . . 17 (2nd𝑤) = ({⟨𝑧, (2nd𝑤)⟩}‘𝑧)
6460, 61, 633eqtr4g 2881 . . . . . . . . . . . . . . . 16 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → 𝑧 / 𝑥(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) = (2nd𝑤))
65 xp2nd 7708 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) → (2nd𝑤) ∈ 𝑧 / 𝑥𝐵)
6665adantl 484 . . . . . . . . . . . . . . . 16 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → (2nd𝑤) ∈ 𝑧 / 𝑥𝐵)
6764, 66eqeltrd 2913 . . . . . . . . . . . . . . 15 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → 𝑧 / 𝑥(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝑧 / 𝑥𝐵)
68 ralsnsg 4594 . . . . . . . . . . . . . . . . 17 (𝑧 ∈ V → (∀𝑥 ∈ {𝑧} (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵[𝑧 / 𝑥](((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵))
6913, 68ax-mp 5 . . . . . . . . . . . . . . . 16 (∀𝑥 ∈ {𝑧} (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵[𝑧 / 𝑥](((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵)
70 sbcel12 4346 . . . . . . . . . . . . . . . 16 ([𝑧 / 𝑥](((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵𝑧 / 𝑥(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝑧 / 𝑥𝐵)
7169, 70bitri 277 . . . . . . . . . . . . . . 15 (∀𝑥 ∈ {𝑧} (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵𝑧 / 𝑥(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝑧 / 𝑥𝐵)
7267, 71sylibr 236 . . . . . . . . . . . . . 14 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → ∀𝑥 ∈ {𝑧} (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵)
73 ralun 4156 . . . . . . . . . . . . . 14 ((∀𝑥𝑦 (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵 ∧ ∀𝑥 ∈ {𝑧} (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵) → ∀𝑥 ∈ (𝑦 ∪ {𝑧})(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵)
7455, 72, 73syl2anc 586 . . . . . . . . . . . . 13 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → ∀𝑥 ∈ (𝑦 ∪ {𝑧})(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵)
75 snex 5318 . . . . . . . . . . . . . . 15 {⟨𝑧, (2nd𝑤)⟩} ∈ V
7644, 75unex 7455 . . . . . . . . . . . . . 14 ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}) ∈ V
7776elixp 8454 . . . . . . . . . . . . 13 (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}) ∈ X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ↔ (((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}) Fn (𝑦 ∪ {𝑧}) ∧ ∀𝑥 ∈ (𝑦 ∪ {𝑧})(((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})‘𝑥) ∈ 𝐵))
7843, 74, 77sylanbrc 585 . . . . . . . . . . . 12 ((¬ 𝑧𝑦𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)) → ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}) ∈ X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵)
7978fmpttd 6865 . . . . . . . . . . 11 𝑧𝑦 → (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})):(X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)⟶X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵)
80 ixpfn 8453 . . . . . . . . . . . . . . . . 17 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵𝑢 Fn (𝑦 ∪ {𝑧}))
81 ssun1 4136 . . . . . . . . . . . . . . . . 17 𝑦 ⊆ (𝑦 ∪ {𝑧})
82 fnssres 6456 . . . . . . . . . . . . . . . . 17 ((𝑢 Fn (𝑦 ∪ {𝑧}) ∧ 𝑦 ⊆ (𝑦 ∪ {𝑧})) → (𝑢𝑦) Fn 𝑦)
8380, 81, 82sylancl 588 . . . . . . . . . . . . . . . 16 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 → (𝑢𝑦) Fn 𝑦)
84 vex 3489 . . . . . . . . . . . . . . . . . 18 𝑢 ∈ V
8584elixp 8454 . . . . . . . . . . . . . . . . 17 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ↔ (𝑢 Fn (𝑦 ∪ {𝑧}) ∧ ∀𝑥 ∈ (𝑦 ∪ {𝑧})(𝑢𝑥) ∈ 𝐵))
86 ssralv 4021 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ⊆ (𝑦 ∪ {𝑧}) → (∀𝑥 ∈ (𝑦 ∪ {𝑧})(𝑢𝑥) ∈ 𝐵 → ∀𝑥𝑦 (𝑢𝑥) ∈ 𝐵))
8781, 86ax-mp 5 . . . . . . . . . . . . . . . . . . 19 (∀𝑥 ∈ (𝑦 ∪ {𝑧})(𝑢𝑥) ∈ 𝐵 → ∀𝑥𝑦 (𝑢𝑥) ∈ 𝐵)
88 fvres 6675 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥𝑦 → ((𝑢𝑦)‘𝑥) = (𝑢𝑥))
8988eleq1d 2897 . . . . . . . . . . . . . . . . . . . . 21 (𝑥𝑦 → (((𝑢𝑦)‘𝑥) ∈ 𝐵 ↔ (𝑢𝑥) ∈ 𝐵))
9089biimprd 250 . . . . . . . . . . . . . . . . . . . 20 (𝑥𝑦 → ((𝑢𝑥) ∈ 𝐵 → ((𝑢𝑦)‘𝑥) ∈ 𝐵))
9190ralimia 3158 . . . . . . . . . . . . . . . . . . 19 (∀𝑥𝑦 (𝑢𝑥) ∈ 𝐵 → ∀𝑥𝑦 ((𝑢𝑦)‘𝑥) ∈ 𝐵)
9287, 91syl 17 . . . . . . . . . . . . . . . . . 18 (∀𝑥 ∈ (𝑦 ∪ {𝑧})(𝑢𝑥) ∈ 𝐵 → ∀𝑥𝑦 ((𝑢𝑦)‘𝑥) ∈ 𝐵)
9392adantl 484 . . . . . . . . . . . . . . . . 17 ((𝑢 Fn (𝑦 ∪ {𝑧}) ∧ ∀𝑥 ∈ (𝑦 ∪ {𝑧})(𝑢𝑥) ∈ 𝐵) → ∀𝑥𝑦 ((𝑢𝑦)‘𝑥) ∈ 𝐵)
9485, 93sylbi 219 . . . . . . . . . . . . . . . 16 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 → ∀𝑥𝑦 ((𝑢𝑦)‘𝑥) ∈ 𝐵)
9584resex 5885 . . . . . . . . . . . . . . . . 17 (𝑢𝑦) ∈ V
9695elixp 8454 . . . . . . . . . . . . . . . 16 ((𝑢𝑦) ∈ X𝑥𝑦 𝐵 ↔ ((𝑢𝑦) Fn 𝑦 ∧ ∀𝑥𝑦 ((𝑢𝑦)‘𝑥) ∈ 𝐵))
9783, 94, 96sylanbrc 585 . . . . . . . . . . . . . . 15 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 → (𝑢𝑦) ∈ X𝑥𝑦 𝐵)
98 ssun2 4137 . . . . . . . . . . . . . . . . . 18 {𝑧} ⊆ (𝑦 ∪ {𝑧})
9998, 56sselii 3952 . . . . . . . . . . . . . . . . 17 𝑧 ∈ (𝑦 ∪ {𝑧})
100 csbeq1 3874 . . . . . . . . . . . . . . . . . 18 (𝑤 = 𝑧𝑤 / 𝑥𝐵 = 𝑧 / 𝑥𝐵)
101100fvixp 8452 . . . . . . . . . . . . . . . . 17 ((𝑢X𝑤 ∈ (𝑦 ∪ {𝑧})𝑤 / 𝑥𝐵𝑧 ∈ (𝑦 ∪ {𝑧})) → (𝑢𝑧) ∈ 𝑧 / 𝑥𝐵)
10299, 101mpan2 689 . . . . . . . . . . . . . . . 16 (𝑢X𝑤 ∈ (𝑦 ∪ {𝑧})𝑤 / 𝑥𝐵 → (𝑢𝑧) ∈ 𝑧 / 𝑥𝐵)
103 nfcv 2977 . . . . . . . . . . . . . . . . 17 𝑤𝐵
104 nfcsb1v 3895 . . . . . . . . . . . . . . . . 17 𝑥𝑤 / 𝑥𝐵
105 csbeq1a 3885 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑤𝐵 = 𝑤 / 𝑥𝐵)
106103, 104, 105cbvixp 8464 . . . . . . . . . . . . . . . 16 X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 = X𝑤 ∈ (𝑦 ∪ {𝑧})𝑤 / 𝑥𝐵
107102, 106eleq2s 2931 . . . . . . . . . . . . . . 15 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 → (𝑢𝑧) ∈ 𝑧 / 𝑥𝐵)
108 opelxpi 5578 . . . . . . . . . . . . . . 15 (((𝑢𝑦) ∈ X𝑥𝑦 𝐵 ∧ (𝑢𝑧) ∈ 𝑧 / 𝑥𝐵) → ⟨(𝑢𝑦), (𝑢𝑧)⟩ ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵))
10997, 107, 108syl2anc 586 . . . . . . . . . . . . . 14 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 → ⟨(𝑢𝑦), (𝑢𝑧)⟩ ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵))
110109adantl 484 . . . . . . . . . . . . 13 ((¬ 𝑧𝑦𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵) → ⟨(𝑢𝑦), (𝑢𝑧)⟩ ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵))
111 disj3 4389 . . . . . . . . . . . . . . . . . . 19 ((𝑦 ∩ {𝑧}) = ∅ ↔ 𝑦 = (𝑦 ∖ {𝑧}))
11240, 111sylbb1 239 . . . . . . . . . . . . . . . . . 18 𝑧𝑦𝑦 = (𝑦 ∖ {𝑧}))
113 difun2 4415 . . . . . . . . . . . . . . . . . 18 ((𝑦 ∪ {𝑧}) ∖ {𝑧}) = (𝑦 ∖ {𝑧})
114112, 113syl6eqr 2874 . . . . . . . . . . . . . . . . 17 𝑧𝑦𝑦 = ((𝑦 ∪ {𝑧}) ∖ {𝑧}))
115114reseq2d 5839 . . . . . . . . . . . . . . . 16 𝑧𝑦 → (𝑢𝑦) = (𝑢 ↾ ((𝑦 ∪ {𝑧}) ∖ {𝑧})))
116115uneq1d 4126 . . . . . . . . . . . . . . 15 𝑧𝑦 → ((𝑢𝑦) ∪ {⟨𝑧, (𝑢𝑧)⟩}) = ((𝑢 ↾ ((𝑦 ∪ {𝑧}) ∖ {𝑧})) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
117116adantr 483 . . . . . . . . . . . . . 14 ((¬ 𝑧𝑦𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵) → ((𝑢𝑦) ∪ {⟨𝑧, (𝑢𝑧)⟩}) = ((𝑢 ↾ ((𝑦 ∪ {𝑧}) ∖ {𝑧})) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
118 fvex 6669 . . . . . . . . . . . . . . . . . . 19 (𝑢𝑧) ∈ V
11995, 118op1std 7685 . . . . . . . . . . . . . . . . . 18 (𝑤 = ⟨(𝑢𝑦), (𝑢𝑧)⟩ → (1st𝑤) = (𝑢𝑦))
12095, 118op2ndd 7686 . . . . . . . . . . . . . . . . . . . 20 (𝑤 = ⟨(𝑢𝑦), (𝑢𝑧)⟩ → (2nd𝑤) = (𝑢𝑧))
121120opeq2d 4796 . . . . . . . . . . . . . . . . . . 19 (𝑤 = ⟨(𝑢𝑦), (𝑢𝑧)⟩ → ⟨𝑧, (2nd𝑤)⟩ = ⟨𝑧, (𝑢𝑧)⟩)
122121sneqd 4565 . . . . . . . . . . . . . . . . . 18 (𝑤 = ⟨(𝑢𝑦), (𝑢𝑧)⟩ → {⟨𝑧, (2nd𝑤)⟩} = {⟨𝑧, (𝑢𝑧)⟩})
123119, 122uneq12d 4128 . . . . . . . . . . . . . . . . 17 (𝑤 = ⟨(𝑢𝑦), (𝑢𝑧)⟩ → ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}) = ((𝑢𝑦) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
124 eqid 2821 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})) = (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))
125 snex 5318 . . . . . . . . . . . . . . . . . 18 {⟨𝑧, (𝑢𝑧)⟩} ∈ V
12695, 125unex 7455 . . . . . . . . . . . . . . . . 17 ((𝑢𝑦) ∪ {⟨𝑧, (𝑢𝑧)⟩}) ∈ V
127123, 124, 126fvmpt 6754 . . . . . . . . . . . . . . . 16 (⟨(𝑢𝑦), (𝑢𝑧)⟩ ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) → ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘⟨(𝑢𝑦), (𝑢𝑧)⟩) = ((𝑢𝑦) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
128109, 127syl 17 . . . . . . . . . . . . . . 15 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 → ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘⟨(𝑢𝑦), (𝑢𝑧)⟩) = ((𝑢𝑦) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
129128adantl 484 . . . . . . . . . . . . . 14 ((¬ 𝑧𝑦𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵) → ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘⟨(𝑢𝑦), (𝑢𝑧)⟩) = ((𝑢𝑦) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
130 fnsnsplit 6932 . . . . . . . . . . . . . . . 16 ((𝑢 Fn (𝑦 ∪ {𝑧}) ∧ 𝑧 ∈ (𝑦 ∪ {𝑧})) → 𝑢 = ((𝑢 ↾ ((𝑦 ∪ {𝑧}) ∖ {𝑧})) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
13180, 99, 130sylancl 588 . . . . . . . . . . . . . . 15 (𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵𝑢 = ((𝑢 ↾ ((𝑦 ∪ {𝑧}) ∖ {𝑧})) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
132131adantl 484 . . . . . . . . . . . . . 14 ((¬ 𝑧𝑦𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵) → 𝑢 = ((𝑢 ↾ ((𝑦 ∪ {𝑧}) ∖ {𝑧})) ∪ {⟨𝑧, (𝑢𝑧)⟩}))
133117, 129, 1323eqtr4rd 2867 . . . . . . . . . . . . 13 ((¬ 𝑧𝑦𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵) → 𝑢 = ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘⟨(𝑢𝑦), (𝑢𝑧)⟩))
134 fveq2 6656 . . . . . . . . . . . . . 14 (𝑣 = ⟨(𝑢𝑦), (𝑢𝑧)⟩ → ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘𝑣) = ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘⟨(𝑢𝑦), (𝑢𝑧)⟩))
135134rspceeqv 3630 . . . . . . . . . . . . 13 ((⟨(𝑢𝑦), (𝑢𝑧)⟩ ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ∧ 𝑢 = ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘⟨(𝑢𝑦), (𝑢𝑧)⟩)) → ∃𝑣 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)𝑢 = ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘𝑣))
136110, 133, 135syl2anc 586 . . . . . . . . . . . 12 ((¬ 𝑧𝑦𝑢X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵) → ∃𝑣 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)𝑢 = ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘𝑣))
137136ralrimiva 3182 . . . . . . . . . . 11 𝑧𝑦 → ∀𝑢X 𝑥 ∈ (𝑦 ∪ {𝑧})𝐵𝑣 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)𝑢 = ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘𝑣))
138 dffo3 6854 . . . . . . . . . . 11 ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})):(X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)–ontoX𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ↔ ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})):(X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)⟶X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∧ ∀𝑢X 𝑥 ∈ (𝑦 ∪ {𝑧})𝐵𝑣 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)𝑢 = ((𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩}))‘𝑣)))
13979, 137, 138sylanbrc 585 . . . . . . . . . 10 𝑧𝑦 → (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})):(X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)–ontoX𝑥 ∈ (𝑦 ∪ {𝑧})𝐵)
140 fonum 9470 . . . . . . . . . 10 (((X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ∈ dom card ∧ (𝑤 ∈ (X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵) ↦ ((1st𝑤) ∪ {⟨𝑧, (2nd𝑤)⟩})):(X𝑥𝑦 𝐵 × 𝑧 / 𝑥𝐵)–ontoX𝑥 ∈ (𝑦 ∪ {𝑧})𝐵) → X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card)
14133, 139, 140syl2anr 598 . . . . . . . . 9 ((¬ 𝑧𝑦 ∧ (𝑧 / 𝑥𝐵 ∈ dom card ∧ X𝑥𝑦 𝐵 ∈ dom card)) → X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card)
142141expr 459 . . . . . . . 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 456 . . . . . 6 𝑧𝑦 → ((𝑧 / 𝑥𝐵 ∈ dom card ∧ ∀𝑥𝑦 𝐵 ∈ dom card) → ((∀𝑥𝑦 𝐵 ∈ dom card → X𝑥𝑦 𝐵 ∈ dom card) → X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card)))
145144ancomsd 468 . . . . 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 484 . . 3 ((𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) → ((∀𝑥𝑦 𝐵 ∈ dom card → X𝑥𝑦 𝐵 ∈ dom card) → ((∀𝑥𝑦 𝐵 ∈ dom card ∧ 𝑧 / 𝑥𝐵 ∈ dom card) → X𝑥 ∈ (𝑦 ∪ {𝑧})𝐵 ∈ dom card)))
1486, 10, 23, 27, 30, 147findcard2s 8745 . 2 (𝐴 ∈ Fin → (∀𝑥𝐴 𝐵 ∈ dom card → X𝑥𝐴 𝐵 ∈ dom card))
149148imp 409 1 ((𝐴 ∈ Fin ∧ ∀𝑥𝐴 𝐵 ∈ dom card) → X𝑥𝐴 𝐵 ∈ dom card)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398   = wceq 1537  wcel 2114  wral 3138  wrex 3139  Vcvv 3486  [wsbc 3763  csb 3871  cdif 3921  cun 3922  cin 3923  wss 3924  c0 4279  {csn 4553  cop 4559  cmpt 5132   × cxp 5539  dom cdm 5541  cres 5543   Fn wfn 6336  wf 6337  ontowfo 6339  cfv 6341  1st c1st 7673  2nd c2nd 7674  Xcixp 8447  Fincfn 8495  cardccrd 9350
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793  ax-rep 5176  ax-sep 5189  ax-nul 5196  ax-pow 5252  ax-pr 5316  ax-un 7447
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-fal 1550  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3488  df-sbc 3764  df-csb 3872  df-dif 3927  df-un 3929  df-in 3931  df-ss 3940  df-pss 3942  df-nul 4280  df-if 4454  df-pw 4527  df-sn 4554  df-pr 4556  df-tp 4558  df-op 4560  df-uni 4825  df-int 4863  df-iun 4907  df-br 5053  df-opab 5115  df-mpt 5133  df-tr 5159  df-id 5446  df-eprel 5451  df-po 5460  df-so 5461  df-fr 5500  df-se 5501  df-we 5502  df-xp 5547  df-rel 5548  df-cnv 5549  df-co 5550  df-dm 5551  df-rn 5552  df-res 5553  df-ima 5554  df-pred 6134  df-ord 6180  df-on 6181  df-lim 6182  df-suc 6183  df-iota 6300  df-fun 6343  df-fn 6344  df-f 6345  df-f1 6346  df-fo 6347  df-f1o 6348  df-fv 6349  df-isom 6350  df-riota 7100  df-ov 7145  df-oprab 7146  df-mpo 7147  df-om 7567  df-1st 7675  df-2nd 7676  df-wrecs 7933  df-recs 7994  df-rdg 8032  df-1o 8088  df-oadd 8092  df-omul 8093  df-er 8275  df-map 8394  df-ixp 8448  df-en 8496  df-dom 8497  df-fin 8499  df-card 9354  df-acn 9357
This theorem is referenced by:  poimirlem32  34958
  Copyright terms: Public domain W3C validator