Metamath Proof Explorer


Theorem atlex

Description: Every nonzero element of an atomic lattice is greater than or equal to an atom. ( hatomic analog.) (Contributed by NM, 21-Oct-2011)

Ref Expression
Hypotheses atlex.b ⊢ B = Base K
atlex.l ⊢ ≤ ˙ = ≤ K
atlex.z ⊢ 0 ˙ = 0. ⁡ K
atlex.a ⊢ A = Atoms ⁡ K
Assertion atlex ⊢ K ∈ AtLat ∧ X ∈ B ∧ X ≠ 0 ˙ → ∃ y ∈ A y ≤ ˙ X

Proof

Step Hyp Ref Expression
1 atlex.b ⊢ B = Base K
2 atlex.l ⊢ ≤ ˙ = ≤ K
3 atlex.z ⊢ 0 ˙ = 0. ⁡ K
4 atlex.a ⊢ A = Atoms ⁡ K
5 eqid ⊢ glb ⁡ K = glb ⁡ K
6 1 5 2 3 4 isatl ⊢ K ∈ AtLat ↔ K ∈ Lat ∧ B ∈ dom ⁡ glb ⁡ K ∧ ∀ x ∈ B x ≠ 0 ˙ → ∃ y ∈ A y ≤ ˙ x
7 6 simp3bi ⊢ K ∈ AtLat → ∀ x ∈ B x ≠ 0 ˙ → ∃ y ∈ A y ≤ ˙ x
8 neeq1 ⊢ x = X → x ≠ 0 ˙ ↔ X ≠ 0 ˙
9 breq2 ⊢ x = X → y ≤ ˙ x ↔ y ≤ ˙ X
10 9 rexbidv ⊢ x = X → ∃ y ∈ A y ≤ ˙ x ↔ ∃ y ∈ A y ≤ ˙ X
11 8 10 imbi12d ⊢ x = X → x ≠ 0 ˙ → ∃ y ∈ A y ≤ ˙ x ↔ X ≠ 0 ˙ → ∃ y ∈ A y ≤ ˙ X
12 11 rspccv ⊢ ∀ x ∈ B x ≠ 0 ˙ → ∃ y ∈ A y ≤ ˙ x → X ∈ B → X ≠ 0 ˙ → ∃ y ∈ A y ≤ ˙ X
13 7 12 syl ⊢ K ∈ AtLat → X ∈ B → X ≠ 0 ˙ → ∃ y ∈ A y ≤ ˙ X
14 13 3imp ⊢ K ∈ AtLat ∧ X ∈ B ∧ X ≠ 0 ˙ → ∃ y ∈ A y ≤ ˙ X