Proof of Theorem laspwcl
| Step | Hyp | Ref
| Expression |
| 1 | | isla.1 |
. . . . 5
⊢ X = dom R |
| 2 | 1 | isla 8929 |
. . . 4
⊢ (R ∈ Lat ↔
(R ∈
Poset ⋀ ∀x ∈ X ∀y ∈ X ((R supw {x, y}) ∈ X ⋀ (R
infw {x, y}) ∈ X))) |
| 3 | | pm3.26 317 |
. . . . . . 7
⊢ (((R supw {x, y}) ∈ X ⋀ (R
infw {x, y}) ∈ X) → (R
supw {x, y}) ∈ X) |
| 4 | 3 | r19.20si 1752 |
. . . . . 6
⊢ (∀y ∈ X ((R supw {x, y}) ∈ X ⋀ (R
infw {x, y}) ∈ X) → ∀y ∈ X (R supw {x, y}) ∈ X) |
| 5 | 4 | r19.20si 1752 |
. . . . 5
⊢ (∀x ∈ X ∀y ∈ X ((R supw {x, y}) ∈ X ⋀ (R
infw {x, y}) ∈ X) → ∀x ∈ X ∀y ∈ X (R supw {x, y}) ∈ X) |
| 6 | 5 | adantl 388 |
. . . 4
⊢ ((R ∈ Poset ⋀ ∀x ∈ X ∀y ∈ X ((R
supw {x, y}) ∈ X ⋀ (R infw {x, y}) ∈ X)) →
∀x
∈ X ∀y ∈ X (R supw {x, y}) ∈ X) |
| 7 | 2, 6 | sylbi 197 |
. . 3
⊢ (R ∈ Lat →
∀x
∈ X ∀y ∈ X (R supw {x, y}) ∈ X) |
| 8 | | preq1 2509 |
. . . . . 6
⊢ (x = A →
{x, y}
= {A, y}) |
| 9 | 8 | opreq2d 4034 |
. . . . 5
⊢ (x = A →
(R supw {x, y}) =
(R supw {A, y})) |
| 10 | 9 | eleq1d 1583 |
. . . 4
⊢ (x = A →
((R supw {x, y}) ∈ X ↔
(R supw {A, y}) ∈ X)) |
| 11 | | preq2 2510 |
. . . . . 6
⊢ (y = B →
{A, y}
= {A, B}) |
| 12 | 11 | opreq2d 4034 |
. . . . 5
⊢ (y = B →
(R supw {A, y}) =
(R supw {A, B})) |
| 13 | 12 | eleq1d 1583 |
. . . 4
⊢ (y = B →
((R supw {A, y}) ∈ X ↔
(R supw {A, B}) ∈ X)) |
| 14 | 10, 13 | rcla42v 1926 |
. . 3
⊢ ((A ∈ X ⋀ B ∈ X) → (∀x ∈ X ∀y ∈ X (R supw {x, y}) ∈ X →
(R supw {A, B}) ∈ X)) |
| 15 | 7, 14 | mpan9 472 |
. 2
⊢ ((R ∈ Lat ⋀ (A ∈ X ⋀ B ∈ X)) →
(R supw {A, B}) ∈ X) |
| 16 | 15 | 3impb 835 |
1
⊢ ((R ∈ Lat ⋀ A ∈ X ⋀ B ∈ X) →
(R supw {A, B}) ∈ X) |