Proof of Theorem er2
| Step | Hyp | Ref
| Expression |
| 1 | | df-er 3200 |
. 2
⊢ (Er R
↔ (◡R ∪ (R
∘ R)) ⊆ R) |
| 2 | | cnvsym 2626 |
. . . 4
⊢ (◡R
⊆ R ↔ ∀x∀y(xRy →
yRx)) |
| 3 | | cotr 2625 |
. . . 4
⊢ ((R
∘ R) ⊆ R ↔ ∀x∀y∀z((xRy ∧
yRz) →
xRz)) |
| 4 | 2, 3 | anbi12i 369 |
. . 3
⊢ ((◡R
⊆ R ∧ (R ∘ R)
⊆ R) ↔ (∀x∀y(xRy →
yRx) ∧
∀x∀y∀z((xRy ∧
yRz) →
xRz))) |
| 5 | | unss 1632 |
. . 3
⊢ ((◡R
⊆ R ∧ (R ∘ R)
⊆ R) ↔ (◡R ∪
(R ∘ R)) ⊆ R) |
| 6 | | 19.28v 957 |
. . . . . . 7
⊢ (∀z((xRy →
yRx) ∧
((xRy ∧
yRz) →
xRz)) ↔
((xRy →
yRx) ∧
∀z((xRy ∧ yRz) → xRz))) |
| 7 | 6 | bial 695 |
. . . . . 6
⊢ (∀y∀z((xRy →
yRx) ∧
((xRy ∧
yRz) →
xRz)) ↔
∀y((xRy → yRx) ∧ ∀z((xRy ∧
yRz) →
xRz))) |
| 8 | | 19.26 749 |
. . . . . 6
⊢ (∀y((xRy →
yRx) ∧
∀z((xRy ∧ yRz) → xRz)) ↔ (∀y(xRy →
yRx) ∧
∀y∀z((xRy ∧
yRz) →
xRz))) |
| 9 | 7, 8 | bitr 151 |
. . . . 5
⊢ (∀y∀z((xRy →
yRx) ∧
((xRy ∧
yRz) →
xRz)) ↔
(∀y(xRy → yRx) ∧ ∀y∀z((xRy ∧
yRz) →
xRz))) |
| 10 | 9 | bial 695 |
. . . 4
⊢ (∀x∀y∀z((xRy →
yRx) ∧
((xRy ∧
yRz) →
xRz)) ↔
∀x(∀y(xRy →
yRx) ∧
∀y∀z((xRy ∧
yRz) →
xRz))) |
| 11 | | 19.26 749 |
. . . 4
⊢ (∀x(∀y(xRy →
yRx) ∧
∀y∀z((xRy ∧
yRz) →
xRz)) ↔
(∀x∀y(xRy →
yRx) ∧
∀x∀y∀z((xRy ∧
yRz) →
xRz))) |
| 12 | 10, 11 | bitr2 152 |
. . 3
⊢ ((∀x∀y(xRy →
yRx) ∧
∀x∀y∀z((xRy ∧
yRz) →
xRz)) ↔
∀x∀y∀z((xRy →
yRx) ∧
((xRy ∧
yRz) →
xRz))) |
| 13 | 4, 5, 12 | 3bitr3 156 |
. 2
⊢ ((◡R ∪
(R ∘ R)) ⊆ R
↔ ∀x∀y∀z((xRy →
yRx) ∧
((xRy ∧
yRz) →
xRz))) |
| 14 | 1, 13 | bitr 151 |
1
⊢ (Er R
↔ ∀x∀y∀z((xRy →
yRx) ∧
((xRy ∧
yRz) →
xRz))) |