MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  mapunen Structured version   Visualization version   GIF version

Theorem mapunen 9110
Description: Equinumerosity law for set exponentiation of a disjoint union. Exercise 4.45 of [Mendelson] p. 255. (Contributed by NM, 23-Sep-2004.) (Revised by Mario Carneiro, 29-Apr-2015.)
Assertion
Ref Expression
mapunen (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → (𝐶m (𝐴𝐵)) ≈ ((𝐶m 𝐴) × (𝐶m 𝐵)))

Proof of Theorem mapunen
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 ovexd 7422 . 2 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → (𝐶m (𝐴𝐵)) ∈ V)
2 ovexd 7422 . . 3 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → (𝐶m 𝐴) ∈ V)
3 ovexd 7422 . . 3 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → (𝐶m 𝐵) ∈ V)
42, 3xpexd 7727 . 2 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → ((𝐶m 𝐴) × (𝐶m 𝐵)) ∈ V)
5 elmapi 8822 . . . . 5 (𝑥 ∈ (𝐶m (𝐴𝐵)) → 𝑥:(𝐴𝐵)⟶𝐶)
6 ssun1 4141 . . . . 5 𝐴 ⊆ (𝐴𝐵)
7 fssres 6726 . . . . 5 ((𝑥:(𝐴𝐵)⟶𝐶𝐴 ⊆ (𝐴𝐵)) → (𝑥𝐴):𝐴𝐶)
85, 6, 7sylancl 586 . . . 4 (𝑥 ∈ (𝐶m (𝐴𝐵)) → (𝑥𝐴):𝐴𝐶)
9 ssun2 4142 . . . . 5 𝐵 ⊆ (𝐴𝐵)
10 fssres 6726 . . . . 5 ((𝑥:(𝐴𝐵)⟶𝐶𝐵 ⊆ (𝐴𝐵)) → (𝑥𝐵):𝐵𝐶)
115, 9, 10sylancl 586 . . . 4 (𝑥 ∈ (𝐶m (𝐴𝐵)) → (𝑥𝐵):𝐵𝐶)
128, 11jca 511 . . 3 (𝑥 ∈ (𝐶m (𝐴𝐵)) → ((𝑥𝐴):𝐴𝐶 ∧ (𝑥𝐵):𝐵𝐶))
13 opelxp 5674 . . . 4 (⟨(𝑥𝐴), (𝑥𝐵)⟩ ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)) ↔ ((𝑥𝐴) ∈ (𝐶m 𝐴) ∧ (𝑥𝐵) ∈ (𝐶m 𝐵)))
14 simpl3 1194 . . . . . 6 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → 𝐶𝑋)
15 simpl1 1192 . . . . . 6 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → 𝐴𝑉)
1614, 15elmapd 8813 . . . . 5 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → ((𝑥𝐴) ∈ (𝐶m 𝐴) ↔ (𝑥𝐴):𝐴𝐶))
17 simpl2 1193 . . . . . 6 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → 𝐵𝑊)
1814, 17elmapd 8813 . . . . 5 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → ((𝑥𝐵) ∈ (𝐶m 𝐵) ↔ (𝑥𝐵):𝐵𝐶))
1916, 18anbi12d 632 . . . 4 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → (((𝑥𝐴) ∈ (𝐶m 𝐴) ∧ (𝑥𝐵) ∈ (𝐶m 𝐵)) ↔ ((𝑥𝐴):𝐴𝐶 ∧ (𝑥𝐵):𝐵𝐶)))
2013, 19bitrid 283 . . 3 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → (⟨(𝑥𝐴), (𝑥𝐵)⟩ ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)) ↔ ((𝑥𝐴):𝐴𝐶 ∧ (𝑥𝐵):𝐵𝐶)))
2112, 20imbitrrid 246 . 2 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → (𝑥 ∈ (𝐶m (𝐴𝐵)) → ⟨(𝑥𝐴), (𝑥𝐵)⟩ ∈ ((𝐶m 𝐴) × (𝐶m 𝐵))))
22 xp1st 8000 . . . . . . 7 (𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)) → (1st𝑦) ∈ (𝐶m 𝐴))
2322adantl 481 . . . . . 6 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵))) → (1st𝑦) ∈ (𝐶m 𝐴))
24 elmapi 8822 . . . . . 6 ((1st𝑦) ∈ (𝐶m 𝐴) → (1st𝑦):𝐴𝐶)
2523, 24syl 17 . . . . 5 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵))) → (1st𝑦):𝐴𝐶)
26 xp2nd 8001 . . . . . . 7 (𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)) → (2nd𝑦) ∈ (𝐶m 𝐵))
2726adantl 481 . . . . . 6 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵))) → (2nd𝑦) ∈ (𝐶m 𝐵))
28 elmapi 8822 . . . . . 6 ((2nd𝑦) ∈ (𝐶m 𝐵) → (2nd𝑦):𝐵𝐶)
2927, 28syl 17 . . . . 5 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵))) → (2nd𝑦):𝐵𝐶)
30 simplr 768 . . . . 5 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵))) → (𝐴𝐵) = ∅)
3125, 29, 30fun2d 6724 . . . 4 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵))) → ((1st𝑦) ∪ (2nd𝑦)):(𝐴𝐵)⟶𝐶)
3231ex 412 . . 3 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → (𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)) → ((1st𝑦) ∪ (2nd𝑦)):(𝐴𝐵)⟶𝐶))
33 unexg 7719 . . . . 5 ((𝐴𝑉𝐵𝑊) → (𝐴𝐵) ∈ V)
3415, 17, 33syl2anc 584 . . . 4 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → (𝐴𝐵) ∈ V)
3514, 34elmapd 8813 . . 3 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → (((1st𝑦) ∪ (2nd𝑦)) ∈ (𝐶m (𝐴𝐵)) ↔ ((1st𝑦) ∪ (2nd𝑦)):(𝐴𝐵)⟶𝐶))
3632, 35sylibrd 259 . 2 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → (𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)) → ((1st𝑦) ∪ (2nd𝑦)) ∈ (𝐶m (𝐴𝐵))))
37 1st2nd2 8007 . . . . . . 7 (𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)) → 𝑦 = ⟨(1st𝑦), (2nd𝑦)⟩)
3837ad2antll 729 . . . . . 6 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → 𝑦 = ⟨(1st𝑦), (2nd𝑦)⟩)
3925adantrl 716 . . . . . . . 8 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → (1st𝑦):𝐴𝐶)
4029adantrl 716 . . . . . . . 8 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → (2nd𝑦):𝐵𝐶)
41 res0 5954 . . . . . . . . . 10 ((1st𝑦) ↾ ∅) = ∅
42 res0 5954 . . . . . . . . . 10 ((2nd𝑦) ↾ ∅) = ∅
4341, 42eqtr4i 2755 . . . . . . . . 9 ((1st𝑦) ↾ ∅) = ((2nd𝑦) ↾ ∅)
44 simplr 768 . . . . . . . . . 10 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → (𝐴𝐵) = ∅)
4544reseq2d 5950 . . . . . . . . 9 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → ((1st𝑦) ↾ (𝐴𝐵)) = ((1st𝑦) ↾ ∅))
4644reseq2d 5950 . . . . . . . . 9 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → ((2nd𝑦) ↾ (𝐴𝐵)) = ((2nd𝑦) ↾ ∅))
4743, 45, 463eqtr4a 2790 . . . . . . . 8 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → ((1st𝑦) ↾ (𝐴𝐵)) = ((2nd𝑦) ↾ (𝐴𝐵)))
48 fresaunres1 6733 . . . . . . . 8 (((1st𝑦):𝐴𝐶 ∧ (2nd𝑦):𝐵𝐶 ∧ ((1st𝑦) ↾ (𝐴𝐵)) = ((2nd𝑦) ↾ (𝐴𝐵))) → (((1st𝑦) ∪ (2nd𝑦)) ↾ 𝐴) = (1st𝑦))
4939, 40, 47, 48syl3anc 1373 . . . . . . 7 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → (((1st𝑦) ∪ (2nd𝑦)) ↾ 𝐴) = (1st𝑦))
50 fresaunres2 6732 . . . . . . . 8 (((1st𝑦):𝐴𝐶 ∧ (2nd𝑦):𝐵𝐶 ∧ ((1st𝑦) ↾ (𝐴𝐵)) = ((2nd𝑦) ↾ (𝐴𝐵))) → (((1st𝑦) ∪ (2nd𝑦)) ↾ 𝐵) = (2nd𝑦))
5139, 40, 47, 50syl3anc 1373 . . . . . . 7 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → (((1st𝑦) ∪ (2nd𝑦)) ↾ 𝐵) = (2nd𝑦))
5249, 51opeq12d 4845 . . . . . 6 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → ⟨(((1st𝑦) ∪ (2nd𝑦)) ↾ 𝐴), (((1st𝑦) ∪ (2nd𝑦)) ↾ 𝐵)⟩ = ⟨(1st𝑦), (2nd𝑦)⟩)
5338, 52eqtr4d 2767 . . . . 5 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → 𝑦 = ⟨(((1st𝑦) ∪ (2nd𝑦)) ↾ 𝐴), (((1st𝑦) ∪ (2nd𝑦)) ↾ 𝐵)⟩)
54 reseq1 5944 . . . . . . 7 (𝑥 = ((1st𝑦) ∪ (2nd𝑦)) → (𝑥𝐴) = (((1st𝑦) ∪ (2nd𝑦)) ↾ 𝐴))
55 reseq1 5944 . . . . . . 7 (𝑥 = ((1st𝑦) ∪ (2nd𝑦)) → (𝑥𝐵) = (((1st𝑦) ∪ (2nd𝑦)) ↾ 𝐵))
5654, 55opeq12d 4845 . . . . . 6 (𝑥 = ((1st𝑦) ∪ (2nd𝑦)) → ⟨(𝑥𝐴), (𝑥𝐵)⟩ = ⟨(((1st𝑦) ∪ (2nd𝑦)) ↾ 𝐴), (((1st𝑦) ∪ (2nd𝑦)) ↾ 𝐵)⟩)
5756eqeq2d 2740 . . . . 5 (𝑥 = ((1st𝑦) ∪ (2nd𝑦)) → (𝑦 = ⟨(𝑥𝐴), (𝑥𝐵)⟩ ↔ 𝑦 = ⟨(((1st𝑦) ∪ (2nd𝑦)) ↾ 𝐴), (((1st𝑦) ∪ (2nd𝑦)) ↾ 𝐵)⟩))
5853, 57syl5ibrcom 247 . . . 4 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → (𝑥 = ((1st𝑦) ∪ (2nd𝑦)) → 𝑦 = ⟨(𝑥𝐴), (𝑥𝐵)⟩))
59 ffn 6688 . . . . . . . 8 (𝑥:(𝐴𝐵)⟶𝐶𝑥 Fn (𝐴𝐵))
60 fnresdm 6637 . . . . . . . 8 (𝑥 Fn (𝐴𝐵) → (𝑥 ↾ (𝐴𝐵)) = 𝑥)
615, 59, 603syl 18 . . . . . . 7 (𝑥 ∈ (𝐶m (𝐴𝐵)) → (𝑥 ↾ (𝐴𝐵)) = 𝑥)
6261ad2antrl 728 . . . . . 6 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → (𝑥 ↾ (𝐴𝐵)) = 𝑥)
6362eqcomd 2735 . . . . 5 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → 𝑥 = (𝑥 ↾ (𝐴𝐵)))
64 vex 3451 . . . . . . . . . 10 𝑥 ∈ V
6564resex 6000 . . . . . . . . 9 (𝑥𝐴) ∈ V
6664resex 6000 . . . . . . . . 9 (𝑥𝐵) ∈ V
6765, 66op1std 7978 . . . . . . . 8 (𝑦 = ⟨(𝑥𝐴), (𝑥𝐵)⟩ → (1st𝑦) = (𝑥𝐴))
6865, 66op2ndd 7979 . . . . . . . 8 (𝑦 = ⟨(𝑥𝐴), (𝑥𝐵)⟩ → (2nd𝑦) = (𝑥𝐵))
6967, 68uneq12d 4132 . . . . . . 7 (𝑦 = ⟨(𝑥𝐴), (𝑥𝐵)⟩ → ((1st𝑦) ∪ (2nd𝑦)) = ((𝑥𝐴) ∪ (𝑥𝐵)))
70 resundi 5964 . . . . . . 7 (𝑥 ↾ (𝐴𝐵)) = ((𝑥𝐴) ∪ (𝑥𝐵))
7169, 70eqtr4di 2782 . . . . . 6 (𝑦 = ⟨(𝑥𝐴), (𝑥𝐵)⟩ → ((1st𝑦) ∪ (2nd𝑦)) = (𝑥 ↾ (𝐴𝐵)))
7271eqeq2d 2740 . . . . 5 (𝑦 = ⟨(𝑥𝐴), (𝑥𝐵)⟩ → (𝑥 = ((1st𝑦) ∪ (2nd𝑦)) ↔ 𝑥 = (𝑥 ↾ (𝐴𝐵))))
7363, 72syl5ibrcom 247 . . . 4 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → (𝑦 = ⟨(𝑥𝐴), (𝑥𝐵)⟩ → 𝑥 = ((1st𝑦) ∪ (2nd𝑦))))
7458, 73impbid 212 . . 3 ((((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) ∧ (𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵)))) → (𝑥 = ((1st𝑦) ∪ (2nd𝑦)) ↔ 𝑦 = ⟨(𝑥𝐴), (𝑥𝐵)⟩))
7574ex 412 . 2 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → ((𝑥 ∈ (𝐶m (𝐴𝐵)) ∧ 𝑦 ∈ ((𝐶m 𝐴) × (𝐶m 𝐵))) → (𝑥 = ((1st𝑦) ∪ (2nd𝑦)) ↔ 𝑦 = ⟨(𝑥𝐴), (𝑥𝐵)⟩)))
761, 4, 21, 36, 75en3d 8960 1 (((𝐴𝑉𝐵𝑊𝐶𝑋) ∧ (𝐴𝐵) = ∅) → (𝐶m (𝐴𝐵)) ≈ ((𝐶m 𝐴) × (𝐶m 𝐵)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1540  wcel 2109  Vcvv 3447  cun 3912  cin 3913  wss 3914  c0 4296  cop 4595   class class class wbr 5107   × cxp 5636  cres 5640   Fn wfn 6506  wf 6507  cfv 6511  (class class class)co 7387  1st c1st 7966  2nd c2nd 7967  m cmap 8799  cen 8915
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-sep 5251  ax-nul 5261  ax-pow 5320  ax-pr 5387  ax-un 7711
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-ral 3045  df-rex 3054  df-rab 3406  df-v 3449  df-sbc 3754  df-csb 3863  df-dif 3917  df-un 3919  df-in 3921  df-ss 3931  df-nul 4297  df-if 4489  df-pw 4565  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4872  df-iun 4957  df-br 5108  df-opab 5170  df-mpt 5189  df-id 5533  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-iota 6464  df-fun 6513  df-fn 6514  df-f 6515  df-f1 6516  df-fo 6517  df-f1o 6518  df-fv 6519  df-ov 7390  df-oprab 7391  df-mpo 7392  df-1st 7968  df-2nd 7969  df-map 8801  df-en 8919
This theorem is referenced by:  map2xp  9111  mapdom2  9112  mapdjuen  10134  ackbij1lem5  10176  hashmap  14400  mpct  45195
  Copyright terms: Public domain W3C validator