Theorem atlex 40123

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

Hypotheses

Ref	Expression
atlex.b	⊢ 𝐵 = (Base‘𝐾)
atlex.l	⊢ ≤ = (le‘𝐾)
atlex.z	⊢ 0 = (0.‘𝐾)
atlex.a	⊢ 𝐴 = (Atoms‘𝐾)

Assertion

Ref	Expression
atlex	⊢ ((𝐾 ∈ AtLat ∧ 𝑋 ∈ 𝐵 ∧ 𝑋 ≠ 0 ) → ∃𝑦 ∈ 𝐴 𝑦 ≤ 𝑋)

Distinct variable groups:   𝑦,𝐴   𝑦,𝐾   𝑦,𝑋

Allowed substitution hints:   𝐵(𝑦)   ≤ (𝑦)   0 (𝑦)

Proof of Theorem atlex

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		atlex.b	. . . . 5 ⊢ 𝐵 = (Base‘𝐾)
2		eqid 2765	. . . . 5 ⊢ (glb‘𝐾) = (glb‘𝐾)
3		atlex.l	. . . . 5 ⊢ ≤ = (le‘𝐾)
4		atlex.z	. . . . 5 ⊢ 0 = (0.‘𝐾)
5		atlex.a	. . . . 5 ⊢ 𝐴 = (Atoms‘𝐾)
6	1, 2, 3, 4, 5	isatl 40106	. . . 4 ⊢ (𝐾 ∈ AtLat ↔ (𝐾 ∈ Lat ∧ 𝐵 ∈ dom (glb‘𝐾) ∧ ∀𝑥 ∈ 𝐵 (𝑥 ≠ 0 → ∃𝑦 ∈ 𝐴 𝑦 ≤ 𝑥)))
7	6	simp3bi 1165	. . 3 ⊢ (𝐾 ∈ AtLat → ∀𝑥 ∈ 𝐵 (𝑥 ≠ 0 → ∃𝑦 ∈ 𝐴 𝑦 ≤ 𝑥))
8		neeq1 3022	. . . . 5 ⊢ (𝑥 = 𝑋 → (𝑥 ≠ 0 ↔ 𝑋 ≠ 0 ))
9		breq2 5115	. . . . . 6 ⊢ (𝑥 = 𝑋 → (𝑦 ≤ 𝑥 ↔ 𝑦 ≤ 𝑋))
10	9	rexbidv 3191	. . . . 5 ⊢ (𝑥 = 𝑋 → (∃𝑦 ∈ 𝐴 𝑦 ≤ 𝑥 ↔ ∃𝑦 ∈ 𝐴 𝑦 ≤ 𝑋))
11	8, 10	imbi12d 347	. . . 4 ⊢ (𝑥 = 𝑋 → ((𝑥 ≠ 0 → ∃𝑦 ∈ 𝐴 𝑦 ≤ 𝑥) ↔ (𝑋 ≠ 0 → ∃𝑦 ∈ 𝐴 𝑦 ≤ 𝑋)))
12	11	rspccv 3580	. . 3 ⊢ (∀𝑥 ∈ 𝐵 (𝑥 ≠ 0 → ∃𝑦 ∈ 𝐴 𝑦 ≤ 𝑥) → (𝑋 ∈ 𝐵 → (𝑋 ≠ 0 → ∃𝑦 ∈ 𝐴 𝑦 ≤ 𝑋)))
13	7, 12	syl 18	. 2 ⊢ (𝐾 ∈ AtLat → (𝑋 ∈ 𝐵 → (𝑋 ≠ 0 → ∃𝑦 ∈ 𝐴 𝑦 ≤ 𝑋)))
14	13	3imp 1128	1 ⊢ ((𝐾 ∈ AtLat ∧ 𝑋 ∈ 𝐵 ∧ 𝑋 ≠ 0 ) → ∃𝑦 ∈ 𝐴 𝑦 ≤ 𝑋)

This proof depends on syntax axioms:   → wi 4   ∧ w3a 1103   = wceq 1570   ∈ wcel 2146   ≠ wne 2960  ∀wral 3081  ∃wrex 3091   class class class wbr 5111  dom cdm 5663  ‘cfv 6540  Basecbs 17287  lecple 17335  glbcglb 18384  0.cp0 18495  Latclat 18505  Atomscatm 40070  AtLatcal 40071

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-ext 2737

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-sb 2100  df-clab 2744  df-cleq 2757  df-clel 2840  df-ne 2961  df-ral 3082  df-rex 3092  df-rab 3419  df-v 3459  df-dif 3909  df-un 3911  df-ss 3923  df-nul 4287  df-if 4490  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4875  df-br 5112  df-dm 5673  df-iota 6496  df-fv 6548  df-atl 40105

This theorem is used by:  atnle  40124  atlatmstc  40126  cvratlem  40228  cvrat4  40250  2llnmat  40331  2lnat  40591