Proof of Theorem asymref
| Step | Hyp | Ref
| Expression |
| 1 | | df-br 5126 |
. . . . . . . . . . 11
⊢ (𝑥𝑅𝑦 ↔ 〈𝑥, 𝑦〉 ∈ 𝑅) |
| 2 | | vex 3468 |
. . . . . . . . . . . 12
⊢ 𝑥 ∈ V |
| 3 | | vex 3468 |
. . . . . . . . . . . 12
⊢ 𝑦 ∈ V |
| 4 | 2, 3 | opeluu 5457 |
. . . . . . . . . . 11
⊢
(〈𝑥, 𝑦〉 ∈ 𝑅 → (𝑥 ∈ ∪ ∪ 𝑅
∧ 𝑦 ∈ ∪ ∪ 𝑅)) |
| 5 | 1, 4 | sylbi 217 |
. . . . . . . . . 10
⊢ (𝑥𝑅𝑦 → (𝑥 ∈ ∪ ∪ 𝑅
∧ 𝑦 ∈ ∪ ∪ 𝑅)) |
| 6 | 5 | simpld 494 |
. . . . . . . . 9
⊢ (𝑥𝑅𝑦 → 𝑥 ∈ ∪ ∪ 𝑅) |
| 7 | 6 | adantr 480 |
. . . . . . . 8
⊢ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥) → 𝑥 ∈ ∪ ∪ 𝑅) |
| 8 | 7 | pm4.71ri 560 |
. . . . . . 7
⊢ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥) ↔ (𝑥 ∈ ∪ ∪ 𝑅
∧ (𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥))) |
| 9 | 8 | bibi1i 338 |
. . . . . 6
⊢ (((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥) ↔ (𝑥 ∈ ∪ ∪ 𝑅
∧ 𝑥 = 𝑦)) ↔ ((𝑥 ∈ ∪ ∪ 𝑅
∧ (𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥)) ↔ (𝑥 ∈ ∪ ∪ 𝑅
∧ 𝑥 = 𝑦))) |
| 10 | | elin 3949 |
. . . . . . . 8
⊢
(〈𝑥, 𝑦〉 ∈ (𝑅 ∩ ◡𝑅) ↔ (〈𝑥, 𝑦〉 ∈ 𝑅 ∧ 〈𝑥, 𝑦〉 ∈ ◡𝑅)) |
| 11 | 2, 3 | brcnv 5875 |
. . . . . . . . . 10
⊢ (𝑥◡𝑅𝑦 ↔ 𝑦𝑅𝑥) |
| 12 | | df-br 5126 |
. . . . . . . . . 10
⊢ (𝑥◡𝑅𝑦 ↔ 〈𝑥, 𝑦〉 ∈ ◡𝑅) |
| 13 | 11, 12 | bitr3i 277 |
. . . . . . . . 9
⊢ (𝑦𝑅𝑥 ↔ 〈𝑥, 𝑦〉 ∈ ◡𝑅) |
| 14 | 1, 13 | anbi12i 628 |
. . . . . . . 8
⊢ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥) ↔ (〈𝑥, 𝑦〉 ∈ 𝑅 ∧ 〈𝑥, 𝑦〉 ∈ ◡𝑅)) |
| 15 | 10, 14 | bitr4i 278 |
. . . . . . 7
⊢
(〈𝑥, 𝑦〉 ∈ (𝑅 ∩ ◡𝑅) ↔ (𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥)) |
| 16 | 3 | opelresi 5987 |
. . . . . . . 8
⊢
(〈𝑥, 𝑦〉 ∈ ( I ↾ ∪ ∪ 𝑅) ↔ (𝑥 ∈ ∪ ∪ 𝑅
∧ 〈𝑥, 𝑦〉 ∈ I
)) |
| 17 | | df-br 5126 |
. . . . . . . . . 10
⊢ (𝑥 I 𝑦 ↔ 〈𝑥, 𝑦〉 ∈ I ) |
| 18 | 3 | ideq 5845 |
. . . . . . . . . 10
⊢ (𝑥 I 𝑦 ↔ 𝑥 = 𝑦) |
| 19 | 17, 18 | bitr3i 277 |
. . . . . . . . 9
⊢
(〈𝑥, 𝑦〉 ∈ I ↔ 𝑥 = 𝑦) |
| 20 | 19 | anbi2i 623 |
. . . . . . . 8
⊢ ((𝑥 ∈ ∪ ∪ 𝑅 ∧ 〈𝑥, 𝑦〉 ∈ I ) ↔ (𝑥 ∈ ∪ ∪ 𝑅
∧ 𝑥 = 𝑦)) |
| 21 | 16, 20 | bitri 275 |
. . . . . . 7
⊢
(〈𝑥, 𝑦〉 ∈ ( I ↾ ∪ ∪ 𝑅) ↔ (𝑥 ∈ ∪ ∪ 𝑅
∧ 𝑥 = 𝑦)) |
| 22 | 15, 21 | bibi12i 339 |
. . . . . 6
⊢
((〈𝑥, 𝑦〉 ∈ (𝑅 ∩ ◡𝑅) ↔ 〈𝑥, 𝑦〉 ∈ ( I ↾ ∪ ∪ 𝑅)) ↔ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥) ↔ (𝑥 ∈ ∪ ∪ 𝑅
∧ 𝑥 = 𝑦))) |
| 23 | | pm5.32 573 |
. . . . . 6
⊢ ((𝑥 ∈ ∪ ∪ 𝑅 → ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥) ↔ 𝑥 = 𝑦)) ↔ ((𝑥 ∈ ∪ ∪ 𝑅
∧ (𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥)) ↔ (𝑥 ∈ ∪ ∪ 𝑅
∧ 𝑥 = 𝑦))) |
| 24 | 9, 22, 23 | 3bitr4i 303 |
. . . . 5
⊢
((〈𝑥, 𝑦〉 ∈ (𝑅 ∩ ◡𝑅) ↔ 〈𝑥, 𝑦〉 ∈ ( I ↾ ∪ ∪ 𝑅)) ↔ (𝑥 ∈ ∪ ∪ 𝑅
→ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥) ↔ 𝑥 = 𝑦))) |
| 25 | 24 | albii 1818 |
. . . 4
⊢
(∀𝑦(〈𝑥, 𝑦〉 ∈ (𝑅 ∩ ◡𝑅) ↔ 〈𝑥, 𝑦〉 ∈ ( I ↾ ∪ ∪ 𝑅)) ↔ ∀𝑦(𝑥 ∈ ∪ ∪ 𝑅
→ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥) ↔ 𝑥 = 𝑦))) |
| 26 | | 19.21v 1938 |
. . . 4
⊢
(∀𝑦(𝑥 ∈ ∪ ∪ 𝑅 → ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥) ↔ 𝑥 = 𝑦)) ↔ (𝑥 ∈ ∪ ∪ 𝑅
→ ∀𝑦((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥) ↔ 𝑥 = 𝑦))) |
| 27 | 25, 26 | bitri 275 |
. . 3
⊢
(∀𝑦(〈𝑥, 𝑦〉 ∈ (𝑅 ∩ ◡𝑅) ↔ 〈𝑥, 𝑦〉 ∈ ( I ↾ ∪ ∪ 𝑅)) ↔ (𝑥 ∈ ∪ ∪ 𝑅
→ ∀𝑦((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥) ↔ 𝑥 = 𝑦))) |
| 28 | 27 | albii 1818 |
. 2
⊢
(∀𝑥∀𝑦(〈𝑥, 𝑦〉 ∈ (𝑅 ∩ ◡𝑅) ↔ 〈𝑥, 𝑦〉 ∈ ( I ↾ ∪ ∪ 𝑅)) ↔ ∀𝑥(𝑥 ∈ ∪ ∪ 𝑅
→ ∀𝑦((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥) ↔ 𝑥 = 𝑦))) |
| 29 | | relcnv 6104 |
. . . 4
⊢ Rel ◡𝑅 |
| 30 | | relin2 5805 |
. . . 4
⊢ (Rel
◡𝑅 → Rel (𝑅 ∩ ◡𝑅)) |
| 31 | 29, 30 | ax-mp 5 |
. . 3
⊢ Rel
(𝑅 ∩ ◡𝑅) |
| 32 | | relres 6005 |
. . 3
⊢ Rel ( I
↾ ∪ ∪ 𝑅) |
| 33 | | eqrel 5776 |
. . 3
⊢ ((Rel
(𝑅 ∩ ◡𝑅) ∧ Rel ( I ↾ ∪ ∪ 𝑅)) → ((𝑅 ∩ ◡𝑅) = ( I ↾ ∪
∪ 𝑅) ↔ ∀𝑥∀𝑦(〈𝑥, 𝑦〉 ∈ (𝑅 ∩ ◡𝑅) ↔ 〈𝑥, 𝑦〉 ∈ ( I ↾ ∪ ∪ 𝑅)))) |
| 34 | 31, 32, 33 | mp2an 692 |
. 2
⊢ ((𝑅 ∩ ◡𝑅) = ( I ↾ ∪
∪ 𝑅) ↔ ∀𝑥∀𝑦(〈𝑥, 𝑦〉 ∈ (𝑅 ∩ ◡𝑅) ↔ 〈𝑥, 𝑦〉 ∈ ( I ↾ ∪ ∪ 𝑅))) |
| 35 | | df-ral 3051 |
. 2
⊢
(∀𝑥 ∈
∪ ∪ 𝑅∀𝑦((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥) ↔ 𝑥 = 𝑦) ↔ ∀𝑥(𝑥 ∈ ∪ ∪ 𝑅
→ ∀𝑦((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥) ↔ 𝑥 = 𝑦))) |
| 36 | 28, 34, 35 | 3bitr4i 303 |
1
⊢ ((𝑅 ∩ ◡𝑅) = ( I ↾ ∪
∪ 𝑅) ↔ ∀𝑥 ∈ ∪ ∪ 𝑅∀𝑦((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑥) ↔ 𝑥 = 𝑦)) |