Metamath Proof Explorer


Theorem cmtbr4N

Description: Alternate definition for the commutes relation. ( cmbr4i analog.) (Contributed by NM, 10-Nov-2011) (New usage is discouraged.)

Ref Expression
Hypotheses cmtbr4.b ⊢ B = Base K
cmtbr4.l ⊢ ≤ ˙ = ≤ K
cmtbr4.j ⊢ ∨ ˙ = join ⁡ K
cmtbr4.m ⊢ ∧ ˙ = meet ⁡ K
cmtbr4.o ⊢ ⊥ ˙ = oc ⁡ K
cmtbr4.c ⊢ C = cm ⁡ K
Assertion cmtbr4N ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X C Y ↔ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ Y

Proof

Step Hyp Ref Expression
1 cmtbr4.b ⊢ B = Base K
2 cmtbr4.l ⊢ ≤ ˙ = ≤ K
3 cmtbr4.j ⊢ ∨ ˙ = join ⁡ K
4 cmtbr4.m ⊢ ∧ ˙ = meet ⁡ K
5 cmtbr4.o ⊢ ⊥ ˙ = oc ⁡ K
6 cmtbr4.c ⊢ C = cm ⁡ K
7 1 3 4 5 6 cmtbr3N ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X C Y ↔ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y = X ∧ ˙ Y
8 omllat ⊢ K ∈ OML → K ∈ Lat
9 1 2 4 latmle2 ⊢ K ∈ Lat ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ Y ≤ ˙ Y
10 8 9 syl3an1 ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ Y ≤ ˙ Y
11 breq1 ⊢ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y = X ∧ ˙ Y → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ Y ↔ X ∧ ˙ Y ≤ ˙ Y
12 10 11 syl5ibrcom ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y = X ∧ ˙ Y → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ Y
13 8 3ad2ant1 ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → K ∈ Lat
14 simp2 ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X ∈ B
15 omlop ⊢ K ∈ OML → K ∈ OP
16 15 3ad2ant1 ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → K ∈ OP
17 1 5 opoccl ⊢ K ∈ OP ∧ X ∈ B → ⊥ ˙ ⁡ X ∈ B
18 16 14 17 syl2anc ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ X ∈ B
19 simp3 ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → Y ∈ B
20 1 3 latjcl ⊢ K ∈ Lat ∧ ⊥ ˙ ⁡ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ X ∨ ˙ Y ∈ B
21 13 18 19 20 syl3anc ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ X ∨ ˙ Y ∈ B
22 1 2 4 latmle1 ⊢ K ∈ Lat ∧ X ∈ B ∧ ⊥ ˙ ⁡ X ∨ ˙ Y ∈ B → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ X
23 13 14 21 22 syl3anc ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ X
24 23 anim1i ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ Y → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ X ∧ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ Y
25 24 ex ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ Y → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ X ∧ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ Y
26 1 4 latmcl ⊢ K ∈ Lat ∧ X ∈ B ∧ ⊥ ˙ ⁡ X ∨ ˙ Y ∈ B → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ∈ B
27 13 14 21 26 syl3anc ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ∈ B
28 1 2 4 latlem12 ⊢ K ∈ Lat ∧ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ∈ B ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ X ∧ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ Y ↔ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ X ∧ ˙ Y
29 13 27 14 19 28 syl13anc ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ X ∧ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ Y ↔ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ X ∧ ˙ Y
30 25 29 sylibd ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ Y → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ X ∧ ˙ Y
31 1 2 3 latlej2 ⊢ K ∈ Lat ∧ ⊥ ˙ ⁡ X ∈ B ∧ Y ∈ B → Y ≤ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y
32 13 18 19 31 syl3anc ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → Y ≤ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y
33 1 2 4 latmlem2 ⊢ K ∈ Lat ∧ Y ∈ B ∧ ⊥ ˙ ⁡ X ∨ ˙ Y ∈ B ∧ X ∈ B → Y ≤ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y → X ∧ ˙ Y ≤ ˙ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y
34 13 19 21 14 33 syl13anc ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → Y ≤ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y → X ∧ ˙ Y ≤ ˙ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y
35 32 34 mpd ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ Y ≤ ˙ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y
36 30 35 jctird ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ Y → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ X ∧ ˙ Y ∧ X ∧ ˙ Y ≤ ˙ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y
37 1 4 latmcl ⊢ K ∈ Lat ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ Y ∈ B
38 8 37 syl3an1 ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ Y ∈ B
39 1 2 latasymb ⊢ K ∈ Lat ∧ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ∈ B ∧ X ∧ ˙ Y ∈ B → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ X ∧ ˙ Y ∧ X ∧ ˙ Y ≤ ˙ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ↔ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y = X ∧ ˙ Y
40 13 27 38 39 syl3anc ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ X ∧ ˙ Y ∧ X ∧ ˙ Y ≤ ˙ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ↔ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y = X ∧ ˙ Y
41 36 40 sylibd ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ Y → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y = X ∧ ˙ Y
42 12 41 impbid ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y = X ∧ ˙ Y ↔ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ Y
43 7 42 bitrd ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B → X C Y ↔ X ∧ ˙ ⊥ ˙ ⁡ X ∨ ˙ Y ≤ ˙ Y