Step | Hyp | Ref
| Expression |
1 | | f1oun2prg 13512 |
. . . . . 6
⊢ (((𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑆 ∧ 𝐷 ∈ 𝑆)) → (((𝐴 ≠ 𝐵 ∧ 𝐴 ≠ 𝐶 ∧ 𝐴 ≠ 𝐷) ∧ (𝐵 ≠ 𝐶 ∧ 𝐵 ≠ 𝐷 ∧ 𝐶 ≠ 𝐷)) → ({〈0, 𝐴〉, 〈1, 𝐵〉} ∪ {〈2, 𝐶〉, 〈3, 𝐷〉}):({0, 1} ∪ {2, 3})–1-1-onto→({𝐴, 𝐵} ∪ {𝐶, 𝐷}))) |
2 | 1 | imp 444 |
. . . . 5
⊢ ((((𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑆 ∧ 𝐷 ∈ 𝑆)) ∧ ((𝐴 ≠ 𝐵 ∧ 𝐴 ≠ 𝐶 ∧ 𝐴 ≠ 𝐷) ∧ (𝐵 ≠ 𝐶 ∧ 𝐵 ≠ 𝐷 ∧ 𝐶 ≠ 𝐷))) → ({〈0, 𝐴〉, 〈1, 𝐵〉} ∪ {〈2, 𝐶〉, 〈3, 𝐷〉}):({0, 1} ∪ {2, 3})–1-1-onto→({𝐴, 𝐵} ∪ {𝐶, 𝐷})) |
3 | 2 | adantr 480 |
. . . 4
⊢
(((((𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑆 ∧ 𝐷 ∈ 𝑆)) ∧ ((𝐴 ≠ 𝐵 ∧ 𝐴 ≠ 𝐶 ∧ 𝐴 ≠ 𝐷) ∧ (𝐵 ≠ 𝐶 ∧ 𝐵 ≠ 𝐷 ∧ 𝐶 ≠ 𝐷))) ∧ 𝐸 = 〈“𝐴𝐵𝐶𝐷”〉) → ({〈0, 𝐴〉, 〈1, 𝐵〉} ∪ {〈2, 𝐶〉, 〈3, 𝐷〉}):({0, 1} ∪ {2,
3})–1-1-onto→({𝐴, 𝐵} ∪ {𝐶, 𝐷})) |
4 | | s4prop 13505 |
. . . . . . . . 9
⊢ (((𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑆 ∧ 𝐷 ∈ 𝑆)) → 〈“𝐴𝐵𝐶𝐷”〉 = ({〈0, 𝐴〉, 〈1, 𝐵〉} ∪ {〈2, 𝐶〉, 〈3, 𝐷〉})) |
5 | 4 | adantr 480 |
. . . . . . . 8
⊢ ((((𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑆 ∧ 𝐷 ∈ 𝑆)) ∧ ((𝐴 ≠ 𝐵 ∧ 𝐴 ≠ 𝐶 ∧ 𝐴 ≠ 𝐷) ∧ (𝐵 ≠ 𝐶 ∧ 𝐵 ≠ 𝐷 ∧ 𝐶 ≠ 𝐷))) → 〈“𝐴𝐵𝐶𝐷”〉 = ({〈0, 𝐴〉, 〈1, 𝐵〉} ∪ {〈2, 𝐶〉, 〈3, 𝐷〉})) |
6 | 5 | eqeq2d 2620 |
. . . . . . 7
⊢ ((((𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑆 ∧ 𝐷 ∈ 𝑆)) ∧ ((𝐴 ≠ 𝐵 ∧ 𝐴 ≠ 𝐶 ∧ 𝐴 ≠ 𝐷) ∧ (𝐵 ≠ 𝐶 ∧ 𝐵 ≠ 𝐷 ∧ 𝐶 ≠ 𝐷))) → (𝐸 = 〈“𝐴𝐵𝐶𝐷”〉 ↔ 𝐸 = ({〈0, 𝐴〉, 〈1, 𝐵〉} ∪ {〈2, 𝐶〉, 〈3, 𝐷〉}))) |
7 | 6 | biimpa 500 |
. . . . . 6
⊢
(((((𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑆 ∧ 𝐷 ∈ 𝑆)) ∧ ((𝐴 ≠ 𝐵 ∧ 𝐴 ≠ 𝐶 ∧ 𝐴 ≠ 𝐷) ∧ (𝐵 ≠ 𝐶 ∧ 𝐵 ≠ 𝐷 ∧ 𝐶 ≠ 𝐷))) ∧ 𝐸 = 〈“𝐴𝐵𝐶𝐷”〉) → 𝐸 = ({〈0, 𝐴〉, 〈1, 𝐵〉} ∪ {〈2, 𝐶〉, 〈3, 𝐷〉})) |
8 | 7 | eqcomd 2616 |
. . . . 5
⊢
(((((𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑆 ∧ 𝐷 ∈ 𝑆)) ∧ ((𝐴 ≠ 𝐵 ∧ 𝐴 ≠ 𝐶 ∧ 𝐴 ≠ 𝐷) ∧ (𝐵 ≠ 𝐶 ∧ 𝐵 ≠ 𝐷 ∧ 𝐶 ≠ 𝐷))) ∧ 𝐸 = 〈“𝐴𝐵𝐶𝐷”〉) → ({〈0, 𝐴〉, 〈1, 𝐵〉} ∪ {〈2, 𝐶〉, 〈3, 𝐷〉}) = 𝐸) |
9 | | eqidd 2611 |
. . . . 5
⊢
(((((𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑆 ∧ 𝐷 ∈ 𝑆)) ∧ ((𝐴 ≠ 𝐵 ∧ 𝐴 ≠ 𝐶 ∧ 𝐴 ≠ 𝐷) ∧ (𝐵 ≠ 𝐶 ∧ 𝐵 ≠ 𝐷 ∧ 𝐶 ≠ 𝐷))) ∧ 𝐸 = 〈“𝐴𝐵𝐶𝐷”〉) → ({0, 1} ∪ {2, 3})
= ({0, 1} ∪ {2, 3})) |
10 | | eqidd 2611 |
. . . . 5
⊢
(((((𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑆 ∧ 𝐷 ∈ 𝑆)) ∧ ((𝐴 ≠ 𝐵 ∧ 𝐴 ≠ 𝐶 ∧ 𝐴 ≠ 𝐷) ∧ (𝐵 ≠ 𝐶 ∧ 𝐵 ≠ 𝐷 ∧ 𝐶 ≠ 𝐷))) ∧ 𝐸 = 〈“𝐴𝐵𝐶𝐷”〉) → ({𝐴, 𝐵} ∪ {𝐶, 𝐷}) = ({𝐴, 𝐵} ∪ {𝐶, 𝐷})) |
11 | 8, 9, 10 | f1oeq123d 6046 |
. . . 4
⊢
(((((𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑆 ∧ 𝐷 ∈ 𝑆)) ∧ ((𝐴 ≠ 𝐵 ∧ 𝐴 ≠ 𝐶 ∧ 𝐴 ≠ 𝐷) ∧ (𝐵 ≠ 𝐶 ∧ 𝐵 ≠ 𝐷 ∧ 𝐶 ≠ 𝐷))) ∧ 𝐸 = 〈“𝐴𝐵𝐶𝐷”〉) → (({〈0, 𝐴〉, 〈1, 𝐵〉} ∪ {〈2, 𝐶〉, 〈3, 𝐷〉}):({0, 1} ∪ {2,
3})–1-1-onto→({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ↔ 𝐸:({0, 1} ∪ {2, 3})–1-1-onto→({𝐴, 𝐵} ∪ {𝐶, 𝐷}))) |
12 | 3, 11 | mpbid 221 |
. . 3
⊢
(((((𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑆 ∧ 𝐷 ∈ 𝑆)) ∧ ((𝐴 ≠ 𝐵 ∧ 𝐴 ≠ 𝐶 ∧ 𝐴 ≠ 𝐷) ∧ (𝐵 ≠ 𝐶 ∧ 𝐵 ≠ 𝐷 ∧ 𝐶 ≠ 𝐷))) ∧ 𝐸 = 〈“𝐴𝐵𝐶𝐷”〉) → 𝐸:({0, 1} ∪ {2, 3})–1-1-onto→({𝐴, 𝐵} ∪ {𝐶, 𝐷})) |
13 | | dff1o5 6059 |
. . . . . . 7
⊢ (𝐸:({0, 1} ∪ {2,
3})–1-1-onto→({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ↔ (𝐸:({0, 1} ∪ {2, 3})–1-1→({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ran 𝐸 = ({𝐴, 𝐵} ∪ {𝐶, 𝐷}))) |
14 | | dff12 6013 |
. . . . . . . . 9
⊢ (𝐸:({0, 1} ∪ {2,
3})–1-1→({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ↔ (𝐸:({0, 1} ∪ {2, 3})⟶({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ∀𝑦∃*𝑥 𝑥𝐸𝑦)) |
15 | 14 | bicomi 213 |
. . . . . . . 8
⊢ ((𝐸:({0, 1} ∪ {2,
3})⟶({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ∀𝑦∃*𝑥 𝑥𝐸𝑦) ↔ 𝐸:({0, 1} ∪ {2, 3})–1-1→({𝐴, 𝐵} ∪ {𝐶, 𝐷})) |
16 | 15 | anbi1i 727 |
. . . . . . 7
⊢ (((𝐸:({0, 1} ∪ {2,
3})⟶({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ∀𝑦∃*𝑥 𝑥𝐸𝑦) ∧ ran 𝐸 = ({𝐴, 𝐵} ∪ {𝐶, 𝐷})) ↔ (𝐸:({0, 1} ∪ {2, 3})–1-1→({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ran 𝐸 = ({𝐴, 𝐵} ∪ {𝐶, 𝐷}))) |
17 | 13, 16 | sylbb2 227 |
. . . . . 6
⊢ (𝐸:({0, 1} ∪ {2,
3})–1-1-onto→({𝐴, 𝐵} ∪ {𝐶, 𝐷}) → ((𝐸:({0, 1} ∪ {2, 3})⟶({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ∀𝑦∃*𝑥 𝑥𝐸𝑦) ∧ ran 𝐸 = ({𝐴, 𝐵} ∪ {𝐶, 𝐷}))) |
18 | | ffdm 5975 |
. . . . . . . . 9
⊢ (𝐸:({0, 1} ∪ {2,
3})⟶({𝐴, 𝐵} ∪ {𝐶, 𝐷}) → (𝐸:dom 𝐸⟶({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ dom 𝐸 ⊆ ({0, 1} ∪ {2,
3}))) |
19 | 18 | simpld 474 |
. . . . . . . 8
⊢ (𝐸:({0, 1} ∪ {2,
3})⟶({𝐴, 𝐵} ∪ {𝐶, 𝐷}) → 𝐸:dom 𝐸⟶({𝐴, 𝐵} ∪ {𝐶, 𝐷})) |
20 | 19 | anim1i 590 |
. . . . . . 7
⊢ ((𝐸:({0, 1} ∪ {2,
3})⟶({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ∀𝑦∃*𝑥 𝑥𝐸𝑦) → (𝐸:dom 𝐸⟶({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ∀𝑦∃*𝑥 𝑥𝐸𝑦)) |
21 | 20 | anim1i 590 |
. . . . . 6
⊢ (((𝐸:({0, 1} ∪ {2,
3})⟶({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ∀𝑦∃*𝑥 𝑥𝐸𝑦) ∧ ran 𝐸 = ({𝐴, 𝐵} ∪ {𝐶, 𝐷})) → ((𝐸:dom 𝐸⟶({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ∀𝑦∃*𝑥 𝑥𝐸𝑦) ∧ ran 𝐸 = ({𝐴, 𝐵} ∪ {𝐶, 𝐷}))) |
22 | 17, 21 | syl 17 |
. . . . 5
⊢ (𝐸:({0, 1} ∪ {2,
3})–1-1-onto→({𝐴, 𝐵} ∪ {𝐶, 𝐷}) → ((𝐸:dom 𝐸⟶({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ∀𝑦∃*𝑥 𝑥𝐸𝑦) ∧ ran 𝐸 = ({𝐴, 𝐵} ∪ {𝐶, 𝐷}))) |
23 | | dff12 6013 |
. . . . . 6
⊢ (𝐸:dom 𝐸–1-1→({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ↔ (𝐸:dom 𝐸⟶({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ∀𝑦∃*𝑥 𝑥𝐸𝑦)) |
24 | 23 | anbi1i 727 |
. . . . 5
⊢ ((𝐸:dom 𝐸–1-1→({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ran 𝐸 = ({𝐴, 𝐵} ∪ {𝐶, 𝐷})) ↔ ((𝐸:dom 𝐸⟶({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ∀𝑦∃*𝑥 𝑥𝐸𝑦) ∧ ran 𝐸 = ({𝐴, 𝐵} ∪ {𝐶, 𝐷}))) |
25 | 22, 24 | sylibr 223 |
. . . 4
⊢ (𝐸:({0, 1} ∪ {2,
3})–1-1-onto→({𝐴, 𝐵} ∪ {𝐶, 𝐷}) → (𝐸:dom 𝐸–1-1→({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ran 𝐸 = ({𝐴, 𝐵} ∪ {𝐶, 𝐷}))) |
26 | | dff1o5 6059 |
. . . 4
⊢ (𝐸:dom 𝐸–1-1-onto→({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ↔ (𝐸:dom 𝐸–1-1→({𝐴, 𝐵} ∪ {𝐶, 𝐷}) ∧ ran 𝐸 = ({𝐴, 𝐵} ∪ {𝐶, 𝐷}))) |
27 | 25, 26 | sylibr 223 |
. . 3
⊢ (𝐸:({0, 1} ∪ {2,
3})–1-1-onto→({𝐴, 𝐵} ∪ {𝐶, 𝐷}) → 𝐸:dom 𝐸–1-1-onto→({𝐴, 𝐵} ∪ {𝐶, 𝐷})) |
28 | 12, 27 | syl 17 |
. 2
⊢
(((((𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑆 ∧ 𝐷 ∈ 𝑆)) ∧ ((𝐴 ≠ 𝐵 ∧ 𝐴 ≠ 𝐶 ∧ 𝐴 ≠ 𝐷) ∧ (𝐵 ≠ 𝐶 ∧ 𝐵 ≠ 𝐷 ∧ 𝐶 ≠ 𝐷))) ∧ 𝐸 = 〈“𝐴𝐵𝐶𝐷”〉) → 𝐸:dom 𝐸–1-1-onto→({𝐴, 𝐵} ∪ {𝐶, 𝐷})) |
29 | 28 | exp31 628 |
1
⊢ (((𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑆 ∧ 𝐷 ∈ 𝑆)) → (((𝐴 ≠ 𝐵 ∧ 𝐴 ≠ 𝐶 ∧ 𝐴 ≠ 𝐷) ∧ (𝐵 ≠ 𝐶 ∧ 𝐵 ≠ 𝐷 ∧ 𝐶 ≠ 𝐷)) → (𝐸 = 〈“𝐴𝐵𝐶𝐷”〉 → 𝐸:dom 𝐸–1-1-onto→({𝐴, 𝐵} ∪ {𝐶, 𝐷})))) |