Metamath Proof Explorer


Theorem atcvrlln

Description: An element covering an atom is a lattice line and vice-versa. (Contributed by NM, 18-Jun-2012)

Ref Expression
Hypotheses atcvrlln.b ⊢ B = Base K
atcvrlln.c ⊢ C = ⋖ K
atcvrlln.a ⊢ A = Atoms ⁡ K
atcvrlln.n ⊢ N = LLines ⁡ K
Assertion atcvrlln ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y → X ∈ A ↔ Y ∈ N

Proof

Step Hyp Ref Expression
1 atcvrlln.b ⊢ B = Base K
2 atcvrlln.c ⊢ C = ⋖ K
3 atcvrlln.a ⊢ A = Atoms ⁡ K
4 atcvrlln.n ⊢ N = LLines ⁡ K
5 simpll1 ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ X ∈ A → K ∈ HL
6 simpll3 ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ X ∈ A → Y ∈ B
7 simpr ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ X ∈ A → X ∈ A
8 simplr ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ X ∈ A → X C Y
9 1 2 3 4 llni ⊢ K ∈ HL ∧ Y ∈ B ∧ X ∈ A ∧ X C Y → Y ∈ N
10 5 6 7 8 9 syl31anc ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ X ∈ A → Y ∈ N
11 simpr ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ Y ∈ N → Y ∈ N
12 simpll1 ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ Y ∈ N → K ∈ HL
13 simpll3 ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ Y ∈ N → Y ∈ B
14 eqid ⊢ join ⁡ K = join ⁡ K
15 1 14 3 4 islln3 ⊢ K ∈ HL ∧ Y ∈ B → Y ∈ N ↔ ∃ p ∈ A ∃ q ∈ A p ≠ q ∧ Y = p join ⁡ K q
16 12 13 15 syl2anc ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ Y ∈ N → Y ∈ N ↔ ∃ p ∈ A ∃ q ∈ A p ≠ q ∧ Y = p join ⁡ K q
17 11 16 mpbid ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ Y ∈ N → ∃ p ∈ A ∃ q ∈ A p ≠ q ∧ Y = p join ⁡ K q
18 simp1l1 ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ p ∈ A ∧ q ∈ A ∧ p ≠ q ∧ Y = p join ⁡ K q → K ∈ HL
19 simp1l2 ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ p ∈ A ∧ q ∈ A ∧ p ≠ q ∧ Y = p join ⁡ K q → X ∈ B
20 simp2l ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ p ∈ A ∧ q ∈ A ∧ p ≠ q ∧ Y = p join ⁡ K q → p ∈ A
21 simp2r ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ p ∈ A ∧ q ∈ A ∧ p ≠ q ∧ Y = p join ⁡ K q → q ∈ A
22 simp3l ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ p ∈ A ∧ q ∈ A ∧ p ≠ q ∧ Y = p join ⁡ K q → p ≠ q
23 simp1r ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ p ∈ A ∧ q ∈ A ∧ p ≠ q ∧ Y = p join ⁡ K q → X C Y
24 simp3r ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ p ∈ A ∧ q ∈ A ∧ p ≠ q ∧ Y = p join ⁡ K q → Y = p join ⁡ K q
25 23 24 breqtrd ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ p ∈ A ∧ q ∈ A ∧ p ≠ q ∧ Y = p join ⁡ K q → X C p join ⁡ K q
26 1 14 2 3 cvrat2 ⊢ K ∈ HL ∧ X ∈ B ∧ p ∈ A ∧ q ∈ A ∧ p ≠ q ∧ X C p join ⁡ K q → X ∈ A
27 18 19 20 21 22 25 26 syl132anc ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ p ∈ A ∧ q ∈ A ∧ p ≠ q ∧ Y = p join ⁡ K q → X ∈ A
28 27 3exp ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y → p ∈ A ∧ q ∈ A → p ≠ q ∧ Y = p join ⁡ K q → X ∈ A
29 28 rexlimdvv ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y → ∃ p ∈ A ∃ q ∈ A p ≠ q ∧ Y = p join ⁡ K q → X ∈ A
30 29 adantr ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ Y ∈ N → ∃ p ∈ A ∃ q ∈ A p ≠ q ∧ Y = p join ⁡ K q → X ∈ A
31 17 30 mpd ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y ∧ Y ∈ N → X ∈ A
32 10 31 impbida ⊢ K ∈ HL ∧ X ∈ B ∧ Y ∈ B ∧ X C Y → X ∈ A ↔ Y ∈ N