Metamath Proof Explorer


Theorem latnle

Description: Equivalent expressions for "not less than" in a lattice. ( chnle analog.) (Contributed by NM, 16-Nov-2011)

Ref Expression
Hypotheses latnle.b B = Base K
latnle.l ˙ = K
latnle.s < ˙ = < K
latnle.j ˙ = join K
Assertion latnle K Lat X B Y B ¬ Y ˙ X X < ˙ X ˙ Y

Proof

Step Hyp Ref Expression
1 latnle.b B = Base K
2 latnle.l ˙ = K
3 latnle.s < ˙ = < K
4 latnle.j ˙ = join K
5 1 2 4 latlej1 K Lat X B Y B X ˙ X ˙ Y
6 5 biantrurd K Lat X B Y B X X ˙ Y X ˙ X ˙ Y X X ˙ Y
7 1 2 4 latleeqj1 K Lat Y B X B Y ˙ X Y ˙ X = X
8 7 3com23 K Lat X B Y B Y ˙ X Y ˙ X = X
9 eqcom Y ˙ X = X X = Y ˙ X
10 8 9 bitrdi K Lat X B Y B Y ˙ X X = Y ˙ X
11 1 4 latjcom K Lat X B Y B X ˙ Y = Y ˙ X
12 11 eqeq2d K Lat X B Y B X = X ˙ Y X = Y ˙ X
13 10 12 bitr4d K Lat X B Y B Y ˙ X X = X ˙ Y
14 13 necon3bbid K Lat X B Y B ¬ Y ˙ X X X ˙ Y
15 1 4 latjcl K Lat X B Y B X ˙ Y B
16 2 3 pltval K Lat X B X ˙ Y B X < ˙ X ˙ Y X ˙ X ˙ Y X X ˙ Y
17 15 16 syld3an3 K Lat X B Y B X < ˙ X ˙ Y X ˙ X ˙ Y X X ˙ Y
18 6 14 17 3bitr4d K Lat X B Y B ¬ Y ˙ X X < ˙ X ˙ Y