Proof of Theorem funcnvtp
Step | Hyp | Ref
| Expression |
1 | | simp1 1134 |
. . . 4
⊢ ((𝐴 ∈ 𝑈 ∧ 𝐶 ∈ 𝑉 ∧ 𝐸 ∈ 𝑊) → 𝐴 ∈ 𝑈) |
2 | | simp2 1135 |
. . . 4
⊢ ((𝐴 ∈ 𝑈 ∧ 𝐶 ∈ 𝑉 ∧ 𝐸 ∈ 𝑊) → 𝐶 ∈ 𝑉) |
3 | | simp1 1134 |
. . . 4
⊢ ((𝐵 ≠ 𝐷 ∧ 𝐵 ≠ 𝐹 ∧ 𝐷 ≠ 𝐹) → 𝐵 ≠ 𝐷) |
4 | | funcnvpr 6492 |
. . . 4
⊢ ((𝐴 ∈ 𝑈 ∧ 𝐶 ∈ 𝑉 ∧ 𝐵 ≠ 𝐷) → Fun ◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉}) |
5 | 1, 2, 3, 4 | syl2an3an 1420 |
. . 3
⊢ (((𝐴 ∈ 𝑈 ∧ 𝐶 ∈ 𝑉 ∧ 𝐸 ∈ 𝑊) ∧ (𝐵 ≠ 𝐷 ∧ 𝐵 ≠ 𝐹 ∧ 𝐷 ≠ 𝐹)) → Fun ◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉}) |
6 | | funcnvsn 6480 |
. . . 4
⊢ Fun ◡{〈𝐸, 𝐹〉} |
7 | 6 | a1i 11 |
. . 3
⊢ (((𝐴 ∈ 𝑈 ∧ 𝐶 ∈ 𝑉 ∧ 𝐸 ∈ 𝑊) ∧ (𝐵 ≠ 𝐷 ∧ 𝐵 ≠ 𝐹 ∧ 𝐷 ≠ 𝐹)) → Fun ◡{〈𝐸, 𝐹〉}) |
8 | | df-rn 5599 |
. . . . . . 7
⊢ ran
{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} = dom ◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} |
9 | | rnpropg 6122 |
. . . . . . 7
⊢ ((𝐴 ∈ 𝑈 ∧ 𝐶 ∈ 𝑉) → ran {〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} = {𝐵, 𝐷}) |
10 | 8, 9 | eqtr3id 2793 |
. . . . . 6
⊢ ((𝐴 ∈ 𝑈 ∧ 𝐶 ∈ 𝑉) → dom ◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} = {𝐵, 𝐷}) |
11 | 10 | 3adant3 1130 |
. . . . 5
⊢ ((𝐴 ∈ 𝑈 ∧ 𝐶 ∈ 𝑉 ∧ 𝐸 ∈ 𝑊) → dom ◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} = {𝐵, 𝐷}) |
12 | | df-rn 5599 |
. . . . . . 7
⊢ ran
{〈𝐸, 𝐹〉} = dom ◡{〈𝐸, 𝐹〉} |
13 | | rnsnopg 6121 |
. . . . . . 7
⊢ (𝐸 ∈ 𝑊 → ran {〈𝐸, 𝐹〉} = {𝐹}) |
14 | 12, 13 | eqtr3id 2793 |
. . . . . 6
⊢ (𝐸 ∈ 𝑊 → dom ◡{〈𝐸, 𝐹〉} = {𝐹}) |
15 | 14 | 3ad2ant3 1133 |
. . . . 5
⊢ ((𝐴 ∈ 𝑈 ∧ 𝐶 ∈ 𝑉 ∧ 𝐸 ∈ 𝑊) → dom ◡{〈𝐸, 𝐹〉} = {𝐹}) |
16 | 11, 15 | ineq12d 4152 |
. . . 4
⊢ ((𝐴 ∈ 𝑈 ∧ 𝐶 ∈ 𝑉 ∧ 𝐸 ∈ 𝑊) → (dom ◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} ∩ dom ◡{〈𝐸, 𝐹〉}) = ({𝐵, 𝐷} ∩ {𝐹})) |
17 | | disjprsn 4655 |
. . . . 5
⊢ ((𝐵 ≠ 𝐹 ∧ 𝐷 ≠ 𝐹) → ({𝐵, 𝐷} ∩ {𝐹}) = ∅) |
18 | 17 | 3adant1 1128 |
. . . 4
⊢ ((𝐵 ≠ 𝐷 ∧ 𝐵 ≠ 𝐹 ∧ 𝐷 ≠ 𝐹) → ({𝐵, 𝐷} ∩ {𝐹}) = ∅) |
19 | 16, 18 | sylan9eq 2799 |
. . 3
⊢ (((𝐴 ∈ 𝑈 ∧ 𝐶 ∈ 𝑉 ∧ 𝐸 ∈ 𝑊) ∧ (𝐵 ≠ 𝐷 ∧ 𝐵 ≠ 𝐹 ∧ 𝐷 ≠ 𝐹)) → (dom ◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} ∩ dom ◡{〈𝐸, 𝐹〉}) = ∅) |
20 | | funun 6476 |
. . 3
⊢ (((Fun
◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} ∧ Fun ◡{〈𝐸, 𝐹〉}) ∧ (dom ◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} ∩ dom ◡{〈𝐸, 𝐹〉}) = ∅) → Fun (◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} ∪ ◡{〈𝐸, 𝐹〉})) |
21 | 5, 7, 19, 20 | syl21anc 834 |
. 2
⊢ (((𝐴 ∈ 𝑈 ∧ 𝐶 ∈ 𝑉 ∧ 𝐸 ∈ 𝑊) ∧ (𝐵 ≠ 𝐷 ∧ 𝐵 ≠ 𝐹 ∧ 𝐷 ≠ 𝐹)) → Fun (◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} ∪ ◡{〈𝐸, 𝐹〉})) |
22 | | df-tp 4571 |
. . . . 5
⊢
{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉, 〈𝐸, 𝐹〉} = ({〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} ∪ {〈𝐸, 𝐹〉}) |
23 | 22 | cnveqi 5780 |
. . . 4
⊢ ◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉, 〈𝐸, 𝐹〉} = ◡({〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} ∪ {〈𝐸, 𝐹〉}) |
24 | | cnvun 6043 |
. . . 4
⊢ ◡({〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} ∪ {〈𝐸, 𝐹〉}) = (◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} ∪ ◡{〈𝐸, 𝐹〉}) |
25 | 23, 24 | eqtri 2767 |
. . 3
⊢ ◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉, 〈𝐸, 𝐹〉} = (◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} ∪ ◡{〈𝐸, 𝐹〉}) |
26 | 25 | funeqi 6451 |
. 2
⊢ (Fun
◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉, 〈𝐸, 𝐹〉} ↔ Fun (◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉} ∪ ◡{〈𝐸, 𝐹〉})) |
27 | 21, 26 | sylibr 233 |
1
⊢ (((𝐴 ∈ 𝑈 ∧ 𝐶 ∈ 𝑉 ∧ 𝐸 ∈ 𝑊) ∧ (𝐵 ≠ 𝐷 ∧ 𝐵 ≠ 𝐹 ∧ 𝐷 ≠ 𝐹)) → Fun ◡{〈𝐴, 𝐵〉, 〈𝐶, 𝐷〉, 〈𝐸, 𝐹〉}) |