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