Proof of Theorem dffun2
Step | Hyp | Ref
| Expression |
1 | | df-fun 6435 |
. 2
⊢ (Fun
𝐴 ↔ (Rel 𝐴 ∧ (𝐴 ∘ ◡𝐴) ⊆ I )) |
2 | | relco 6148 |
. . . . 5
⊢ Rel
(𝐴 ∘ ◡𝐴) |
3 | | ssrel 5693 |
. . . . 5
⊢ (Rel
(𝐴 ∘ ◡𝐴) → ((𝐴 ∘ ◡𝐴) ⊆ I ↔ ∀𝑦∀𝑧(〈𝑦, 𝑧〉 ∈ (𝐴 ∘ ◡𝐴) → 〈𝑦, 𝑧〉 ∈ I ))) |
4 | 2, 3 | ax-mp 5 |
. . . 4
⊢ ((𝐴 ∘ ◡𝐴) ⊆ I ↔ ∀𝑦∀𝑧(〈𝑦, 𝑧〉 ∈ (𝐴 ∘ ◡𝐴) → 〈𝑦, 𝑧〉 ∈ I )) |
5 | | vex 3436 |
. . . . . . . 8
⊢ 𝑦 ∈ V |
6 | | vex 3436 |
. . . . . . . 8
⊢ 𝑧 ∈ V |
7 | 5, 6 | opelco 5780 |
. . . . . . 7
⊢
(〈𝑦, 𝑧〉 ∈ (𝐴 ∘ ◡𝐴) ↔ ∃𝑥(𝑦◡𝐴𝑥 ∧ 𝑥𝐴𝑧)) |
8 | | vex 3436 |
. . . . . . . . . 10
⊢ 𝑥 ∈ V |
9 | 5, 8 | brcnv 5791 |
. . . . . . . . 9
⊢ (𝑦◡𝐴𝑥 ↔ 𝑥𝐴𝑦) |
10 | 9 | anbi1i 624 |
. . . . . . . 8
⊢ ((𝑦◡𝐴𝑥 ∧ 𝑥𝐴𝑧) ↔ (𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧)) |
11 | 10 | exbii 1850 |
. . . . . . 7
⊢
(∃𝑥(𝑦◡𝐴𝑥 ∧ 𝑥𝐴𝑧) ↔ ∃𝑥(𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧)) |
12 | 7, 11 | bitri 274 |
. . . . . 6
⊢
(〈𝑦, 𝑧〉 ∈ (𝐴 ∘ ◡𝐴) ↔ ∃𝑥(𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧)) |
13 | | df-br 5075 |
. . . . . . 7
⊢ (𝑦 I 𝑧 ↔ 〈𝑦, 𝑧〉 ∈ I ) |
14 | 6 | ideq 5761 |
. . . . . . 7
⊢ (𝑦 I 𝑧 ↔ 𝑦 = 𝑧) |
15 | 13, 14 | bitr3i 276 |
. . . . . 6
⊢
(〈𝑦, 𝑧〉 ∈ I ↔ 𝑦 = 𝑧) |
16 | 12, 15 | imbi12i 351 |
. . . . 5
⊢
((〈𝑦, 𝑧〉 ∈ (𝐴 ∘ ◡𝐴) → 〈𝑦, 𝑧〉 ∈ I ) ↔ (∃𝑥(𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧) → 𝑦 = 𝑧)) |
17 | 16 | 2albii 1823 |
. . . 4
⊢
(∀𝑦∀𝑧(〈𝑦, 𝑧〉 ∈ (𝐴 ∘ ◡𝐴) → 〈𝑦, 𝑧〉 ∈ I ) ↔ ∀𝑦∀𝑧(∃𝑥(𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧) → 𝑦 = 𝑧)) |
18 | | alrot3 2157 |
. . . . 5
⊢
(∀𝑥∀𝑦∀𝑧((𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧) → 𝑦 = 𝑧) ↔ ∀𝑦∀𝑧∀𝑥((𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧) → 𝑦 = 𝑧)) |
19 | | 19.23v 1945 |
. . . . . 6
⊢
(∀𝑥((𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧) → 𝑦 = 𝑧) ↔ (∃𝑥(𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧) → 𝑦 = 𝑧)) |
20 | 19 | 2albii 1823 |
. . . . 5
⊢
(∀𝑦∀𝑧∀𝑥((𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧) → 𝑦 = 𝑧) ↔ ∀𝑦∀𝑧(∃𝑥(𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧) → 𝑦 = 𝑧)) |
21 | 18, 20 | bitr2i 275 |
. . . 4
⊢
(∀𝑦∀𝑧(∃𝑥(𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧) → 𝑦 = 𝑧) ↔ ∀𝑥∀𝑦∀𝑧((𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧) → 𝑦 = 𝑧)) |
22 | 4, 17, 21 | 3bitri 297 |
. . 3
⊢ ((𝐴 ∘ ◡𝐴) ⊆ I ↔ ∀𝑥∀𝑦∀𝑧((𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧) → 𝑦 = 𝑧)) |
23 | 22 | anbi2i 623 |
. 2
⊢ ((Rel
𝐴 ∧ (𝐴 ∘ ◡𝐴) ⊆ I ) ↔ (Rel 𝐴 ∧ ∀𝑥∀𝑦∀𝑧((𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧) → 𝑦 = 𝑧))) |
24 | 1, 23 | bitri 274 |
1
⊢ (Fun
𝐴 ↔ (Rel 𝐴 ∧ ∀𝑥∀𝑦∀𝑧((𝑥𝐴𝑦 ∧ 𝑥𝐴𝑧) → 𝑦 = 𝑧))) |