Metamath Proof Explorer


Theorem poslubdg

Description: Properties which determine the least upper bound in a poset. (Contributed by Stefan O'Rear, 31-Jan-2015)

Ref Expression
Hypotheses poslubdg.l ⊢ ≤ ˙ = ≤ K
poslubdg.b ⊢ φ → B = Base K
poslubdg.u ⊢ φ → U = lub ⁡ K
poslubdg.k ⊢ φ → K ∈ Poset
poslubdg.s ⊢ φ → S ⊆ B
poslubdg.t ⊢ φ → T ∈ B
poslubdg.ub ⊢ φ ∧ x ∈ S → x ≤ ˙ T
poslubdg.le ⊢ φ ∧ y ∈ B ∧ ∀ x ∈ S x ≤ ˙ y → T ≤ ˙ y
Assertion poslubdg ⊢ φ → U ⁡ S = T

Proof

Step Hyp Ref Expression
1 poslubdg.l ⊢ ≤ ˙ = ≤ K
2 poslubdg.b ⊢ φ → B = Base K
3 poslubdg.u ⊢ φ → U = lub ⁡ K
4 poslubdg.k ⊢ φ → K ∈ Poset
5 poslubdg.s ⊢ φ → S ⊆ B
6 poslubdg.t ⊢ φ → T ∈ B
7 poslubdg.ub ⊢ φ ∧ x ∈ S → x ≤ ˙ T
8 poslubdg.le ⊢ φ ∧ y ∈ B ∧ ∀ x ∈ S x ≤ ˙ y → T ≤ ˙ y
9 3 fveq1d ⊢ φ → U ⁡ S = lub ⁡ K ⁡ S
10 eqid ⊢ Base K = Base K
11 eqid ⊢ lub ⁡ K = lub ⁡ K
12 5 2 sseqtrd ⊢ φ → S ⊆ Base K
13 6 2 eleqtrd ⊢ φ → T ∈ Base K
14 2 eleq2d ⊢ φ → y ∈ B ↔ y ∈ Base K
15 14 biimpar ⊢ φ ∧ y ∈ Base K → y ∈ B
16 15 3adant3 ⊢ φ ∧ y ∈ Base K ∧ ∀ x ∈ S x ≤ ˙ y → y ∈ B
17 16 8 syld3an2 ⊢ φ ∧ y ∈ Base K ∧ ∀ x ∈ S x ≤ ˙ y → T ≤ ˙ y
18 1 10 11 4 12 13 7 17 poslubd ⊢ φ → lub ⁡ K ⁡ S = T
19 9 18 eqtrd ⊢ φ → U ⁡ S = T