Theorem cmtbr3N 39878

Description: Alternate definition for the commutes relation. Lemma 3 of [Kalmbach] p. 23. (cmbr3 31811 analog.) (Contributed by NM, 8-Nov-2011.) (New usage is discouraged.)

Hypotheses

Ref	Expression
cmtbr2.b	⊢ 𝐵 = (Base‘𝐾)
cmtbr2.j	⊢ ∨ = (join‘𝐾)
cmtbr2.m	⊢ ∧ = (meet‘𝐾)
cmtbr2.o	⊢ ⊥ = (oc‘𝐾)
cmtbr2.c	⊢ 𝐶 = (cm‘𝐾)

Assertion

Ref	Expression
cmtbr3N	⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋𝐶𝑌 ↔ (𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)) = (𝑋 ∧ 𝑌)))

Proof of Theorem cmtbr3N

Step	Hyp	Ref	Expression
1		cmtbr2.b	. . . . 5 ⊢ 𝐵 = (Base‘𝐾)
2		cmtbr2.c	. . . . 5 ⊢ 𝐶 = (cm‘𝐾)
3	1, 2	cmtcomN 39873	. . . 4 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋𝐶𝑌 ↔ 𝑌𝐶𝑋))
4		cmtbr2.j	. . . . . 6 ⊢ ∨ = (join‘𝐾)
5		cmtbr2.m	. . . . . 6 ⊢ ∧ = (meet‘𝐾)
6		cmtbr2.o	. . . . . 6 ⊢ ⊥ = (oc‘𝐾)
7	1, 4, 5, 6, 2	cmtbr2N 39877	. . . . 5 ⊢ ((𝐾 ∈ OML ∧ 𝑌 ∈ 𝐵 ∧ 𝑋 ∈ 𝐵) → (𝑌𝐶𝑋 ↔ 𝑌 = ((𝑌 ∨ 𝑋) ∧ (𝑌 ∨ ( ⊥ ‘𝑋)))))
8	7	3com23 1139	. . . 4 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑌𝐶𝑋 ↔ 𝑌 = ((𝑌 ∨ 𝑋) ∧ (𝑌 ∨ ( ⊥ ‘𝑋)))))
9	3, 8	bitrd 281	. . 3 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋𝐶𝑌 ↔ 𝑌 = ((𝑌 ∨ 𝑋) ∧ (𝑌 ∨ ( ⊥ ‘𝑋)))))
10		oveq2 7404	. . . . . 6 ⊢ (𝑌 = ((𝑌 ∨ 𝑋) ∧ (𝑌 ∨ ( ⊥ ‘𝑋))) → (𝑋 ∧ 𝑌) = (𝑋 ∧ ((𝑌 ∨ 𝑋) ∧ (𝑌 ∨ ( ⊥ ‘𝑋)))))
11	10	adantl 485	. . . . 5 ⊢ (((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑌 = ((𝑌 ∨ 𝑋) ∧ (𝑌 ∨ ( ⊥ ‘𝑋)))) → (𝑋 ∧ 𝑌) = (𝑋 ∧ ((𝑌 ∨ 𝑋) ∧ (𝑌 ∨ ( ⊥ ‘𝑋)))))
12		omlol 39864	. . . . . . . . 9 ⊢ (𝐾 ∈ OML → 𝐾 ∈ OL)
13	12	3ad2ant1 1146	. . . . . . . 8 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → 𝐾 ∈ OL)
14		simp2 1150	. . . . . . . 8 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → 𝑋 ∈ 𝐵)
15		omllat 39866	. . . . . . . . . 10 ⊢ (𝐾 ∈ OML → 𝐾 ∈ Lat)
16	15	3ad2ant1 1146	. . . . . . . . 9 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → 𝐾 ∈ Lat)
17		simp3 1151	. . . . . . . . 9 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → 𝑌 ∈ 𝐵)
18	1, 4	latjcl 18471	. . . . . . . . 9 ⊢ ((𝐾 ∈ Lat ∧ 𝑌 ∈ 𝐵 ∧ 𝑋 ∈ 𝐵) → (𝑌 ∨ 𝑋) ∈ 𝐵)
19	16, 17, 14, 18	syl3anc 1390	. . . . . . . 8 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑌 ∨ 𝑋) ∈ 𝐵)
20		omlop 39865	. . . . . . . . . . 11 ⊢ (𝐾 ∈ OML → 𝐾 ∈ OP)
21	20	3ad2ant1 1146	. . . . . . . . . 10 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → 𝐾 ∈ OP)
22	1, 6	opoccl 39818	. . . . . . . . . 10 ⊢ ((𝐾 ∈ OP ∧ 𝑋 ∈ 𝐵) → ( ⊥ ‘𝑋) ∈ 𝐵)
23	21, 14, 22	syl2anc 593	. . . . . . . . 9 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ( ⊥ ‘𝑋) ∈ 𝐵)
24	1, 4	latjcl 18471	. . . . . . . . 9 ⊢ ((𝐾 ∈ Lat ∧ 𝑌 ∈ 𝐵 ∧ ( ⊥ ‘𝑋) ∈ 𝐵) → (𝑌 ∨ ( ⊥ ‘𝑋)) ∈ 𝐵)
25	16, 17, 23, 24	syl3anc 1390	. . . . . . . 8 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑌 ∨ ( ⊥ ‘𝑋)) ∈ 𝐵)
26	1, 5	latmassOLD 39853	. . . . . . . 8 ⊢ ((𝐾 ∈ OL ∧ (𝑋 ∈ 𝐵 ∧ (𝑌 ∨ 𝑋) ∈ 𝐵 ∧ (𝑌 ∨ ( ⊥ ‘𝑋)) ∈ 𝐵)) → ((𝑋 ∧ (𝑌 ∨ 𝑋)) ∧ (𝑌 ∨ ( ⊥ ‘𝑋))) = (𝑋 ∧ ((𝑌 ∨ 𝑋) ∧ (𝑌 ∨ ( ⊥ ‘𝑋)))))
27	13, 14, 19, 25, 26	syl13anc 1391	. . . . . . 7 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ((𝑋 ∧ (𝑌 ∨ 𝑋)) ∧ (𝑌 ∨ ( ⊥ ‘𝑋))) = (𝑋 ∧ ((𝑌 ∨ 𝑋) ∧ (𝑌 ∨ ( ⊥ ‘𝑋)))))
28	1, 4	latjcom 18479	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ Lat ∧ 𝑌 ∈ 𝐵 ∧ 𝑋 ∈ 𝐵) → (𝑌 ∨ 𝑋) = (𝑋 ∨ 𝑌))
29	16, 17, 14, 28	syl3anc 1390	. . . . . . . . . 10 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑌 ∨ 𝑋) = (𝑋 ∨ 𝑌))
30	29	oveq2d 7412	. . . . . . . . 9 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ (𝑌 ∨ 𝑋)) = (𝑋 ∧ (𝑋 ∨ 𝑌)))
31	1, 4, 5	latabs2 18508	. . . . . . . . . 10 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ (𝑋 ∨ 𝑌)) = 𝑋)
32	15, 31	syl3an1 1176	. . . . . . . . 9 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ (𝑋 ∨ 𝑌)) = 𝑋)
33	30, 32	eqtrd 2797	. . . . . . . 8 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ (𝑌 ∨ 𝑋)) = 𝑋)
34	1, 4	latjcom 18479	. . . . . . . . 9 ⊢ ((𝐾 ∈ Lat ∧ 𝑌 ∈ 𝐵 ∧ ( ⊥ ‘𝑋) ∈ 𝐵) → (𝑌 ∨ ( ⊥ ‘𝑋)) = (( ⊥ ‘𝑋) ∨ 𝑌))
35	16, 17, 23, 34	syl3anc 1390	. . . . . . . 8 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑌 ∨ ( ⊥ ‘𝑋)) = (( ⊥ ‘𝑋) ∨ 𝑌))
36	33, 35	oveq12d 7414	. . . . . . 7 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ((𝑋 ∧ (𝑌 ∨ 𝑋)) ∧ (𝑌 ∨ ( ⊥ ‘𝑋))) = (𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)))
37	27, 36	eqtr3d 2799	. . . . . 6 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ ((𝑌 ∨ 𝑋) ∧ (𝑌 ∨ ( ⊥ ‘𝑋)))) = (𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)))
38	37	adantr 484	. . . . 5 ⊢ (((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑌 = ((𝑌 ∨ 𝑋) ∧ (𝑌 ∨ ( ⊥ ‘𝑋)))) → (𝑋 ∧ ((𝑌 ∨ 𝑋) ∧ (𝑌 ∨ ( ⊥ ‘𝑋)))) = (𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)))
39	11, 38	eqtr2d 2798	. . . 4 ⊢ (((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑌 = ((𝑌 ∨ 𝑋) ∧ (𝑌 ∨ ( ⊥ ‘𝑋)))) → (𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)) = (𝑋 ∧ 𝑌))
40	39	ex 416	. . 3 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑌 = ((𝑌 ∨ 𝑋) ∧ (𝑌 ∨ ( ⊥ ‘𝑋))) → (𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)) = (𝑋 ∧ 𝑌)))
41	9, 40	sylbid 242	. 2 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋𝐶𝑌 → (𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)) = (𝑋 ∧ 𝑌)))
42		simp1 1149	. . . . . . . . 9 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → 𝐾 ∈ OML)
43	1, 6	opoccl 39818	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ OP ∧ 𝑌 ∈ 𝐵) → ( ⊥ ‘𝑌) ∈ 𝐵)
44	21, 17, 43	syl2anc 593	. . . . . . . . . 10 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ( ⊥ ‘𝑌) ∈ 𝐵)
45	1, 5	latmcl 18472	. . . . . . . . . 10 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ ( ⊥ ‘𝑌) ∈ 𝐵) → (𝑋 ∧ ( ⊥ ‘𝑌)) ∈ 𝐵)
46	16, 14, 44, 45	syl3anc 1390	. . . . . . . . 9 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ ( ⊥ ‘𝑌)) ∈ 𝐵)
47	42, 46, 14	3jca 1141	. . . . . . . 8 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝐾 ∈ OML ∧ (𝑋 ∧ ( ⊥ ‘𝑌)) ∈ 𝐵 ∧ 𝑋 ∈ 𝐵))
48		eqid 2762	. . . . . . . . . 10 ⊢ (le‘𝐾) = (le‘𝐾)
49	1, 48, 5	latmle1 18496	. . . . . . . . 9 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ ( ⊥ ‘𝑌) ∈ 𝐵) → (𝑋 ∧ ( ⊥ ‘𝑌))(le‘𝐾)𝑋)
50	16, 14, 44, 49	syl3anc 1390	. . . . . . . 8 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ ( ⊥ ‘𝑌))(le‘𝐾)𝑋)
51	1, 48, 4, 5, 6	omllaw2N 39868	. . . . . . . 8 ⊢ ((𝐾 ∈ OML ∧ (𝑋 ∧ ( ⊥ ‘𝑌)) ∈ 𝐵 ∧ 𝑋 ∈ 𝐵) → ((𝑋 ∧ ( ⊥ ‘𝑌))(le‘𝐾)𝑋 → ((𝑋 ∧ ( ⊥ ‘𝑌)) ∨ (( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋)) = 𝑋))
52	47, 50, 51	sylc 65	. . . . . . 7 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ((𝑋 ∧ ( ⊥ ‘𝑌)) ∨ (( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋)) = 𝑋)
53	1, 6	opoccl 39818	. . . . . . . . . 10 ⊢ ((𝐾 ∈ OP ∧ (𝑋 ∧ ( ⊥ ‘𝑌)) ∈ 𝐵) → ( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∈ 𝐵)
54	21, 46, 53	syl2anc 593	. . . . . . . . 9 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∈ 𝐵)
55	1, 5	latmcl 18472	. . . . . . . . 9 ⊢ ((𝐾 ∈ Lat ∧ ( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∈ 𝐵 ∧ 𝑋 ∈ 𝐵) → (( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋) ∈ 𝐵)
56	16, 54, 14, 55	syl3anc 1390	. . . . . . . 8 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋) ∈ 𝐵)
57	1, 4	latjcom 18479	. . . . . . . 8 ⊢ ((𝐾 ∈ Lat ∧ (𝑋 ∧ ( ⊥ ‘𝑌)) ∈ 𝐵 ∧ (( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋) ∈ 𝐵) → ((𝑋 ∧ ( ⊥ ‘𝑌)) ∨ (( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋)) = ((( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋) ∨ (𝑋 ∧ ( ⊥ ‘𝑌))))
58	16, 46, 56, 57	syl3anc 1390	. . . . . . 7 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ((𝑋 ∧ ( ⊥ ‘𝑌)) ∨ (( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋)) = ((( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋) ∨ (𝑋 ∧ ( ⊥ ‘𝑌))))
59	52, 58	eqtr3d 2799	. . . . . 6 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → 𝑋 = ((( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋) ∨ (𝑋 ∧ ( ⊥ ‘𝑌))))
60	59	adantr 484	. . . . 5 ⊢ (((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)) = (𝑋 ∧ 𝑌)) → 𝑋 = ((( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋) ∨ (𝑋 ∧ ( ⊥ ‘𝑌))))
61	1, 4, 5, 6	oldmm3N 39843	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ OL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) = (( ⊥ ‘𝑋) ∨ 𝑌))
62	12, 61	syl3an1 1176	. . . . . . . . . 10 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) = (( ⊥ ‘𝑋) ∨ 𝑌))
63	62	oveq2d 7412	. . . . . . . . 9 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ ( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌)))) = (𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)))
64	1, 5	latmcom 18495	. . . . . . . . . 10 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ ( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∈ 𝐵) → (𝑋 ∧ ( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌)))) = (( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋))
65	16, 14, 54, 64	syl3anc 1390	. . . . . . . . 9 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ ( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌)))) = (( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋))
66	63, 65	eqtr3d 2799	. . . . . . . 8 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)) = (( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋))
67	66	eqeq1d 2764	. . . . . . 7 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ((𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)) = (𝑋 ∧ 𝑌) ↔ (( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋) = (𝑋 ∧ 𝑌)))
68		oveq1 7403	. . . . . . 7 ⊢ ((( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋) = (𝑋 ∧ 𝑌) → ((( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋) ∨ (𝑋 ∧ ( ⊥ ‘𝑌))) = ((𝑋 ∧ 𝑌) ∨ (𝑋 ∧ ( ⊥ ‘𝑌))))
69	67, 68	biimtrdi 255	. . . . . 6 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ((𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)) = (𝑋 ∧ 𝑌) → ((( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋) ∨ (𝑋 ∧ ( ⊥ ‘𝑌))) = ((𝑋 ∧ 𝑌) ∨ (𝑋 ∧ ( ⊥ ‘𝑌)))))
70	69	imp 410	. . . . 5 ⊢ (((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)) = (𝑋 ∧ 𝑌)) → ((( ⊥ ‘(𝑋 ∧ ( ⊥ ‘𝑌))) ∧ 𝑋) ∨ (𝑋 ∧ ( ⊥ ‘𝑌))) = ((𝑋 ∧ 𝑌) ∨ (𝑋 ∧ ( ⊥ ‘𝑌))))
71	60, 70	eqtrd 2797	. . . 4 ⊢ (((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)) = (𝑋 ∧ 𝑌)) → 𝑋 = ((𝑋 ∧ 𝑌) ∨ (𝑋 ∧ ( ⊥ ‘𝑌))))
72	71	ex 416	. . 3 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ((𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)) = (𝑋 ∧ 𝑌) → 𝑋 = ((𝑋 ∧ 𝑌) ∨ (𝑋 ∧ ( ⊥ ‘𝑌)))))
73	1, 4, 5, 6, 2	cmtvalN 39835	. . 3 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋𝐶𝑌 ↔ 𝑋 = ((𝑋 ∧ 𝑌) ∨ (𝑋 ∧ ( ⊥ ‘𝑌)))))
74	72, 73	sylibrd 261	. 2 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ((𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)) = (𝑋 ∧ 𝑌) → 𝑋𝐶𝑌))
75	41, 74	impbid 214	1 ⊢ ((𝐾 ∈ OML ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋𝐶𝑌 ↔ (𝑋 ∧ (( ⊥ ‘𝑋) ∨ 𝑌)) = (𝑋 ∧ 𝑌)))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 399   ∧ w3a 1098   = wceq 1560   ∈ wcel 2142   class class class wbr 5100  ‘cfv 6521  (class class class)co 7396  Basecbs 17245  lecple 17293  occoc 17294  joincjn 18343  meetcmee 18344  Latclat 18463  OPcops 39796  cmccmtN 39797  OLcol 39798  OMLcoml 39799

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5227  ax-sep 5246  ax-nul 5256  ax-pow 5322  ax-pr 5390  ax-un 7718

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3077  df-rex 3087  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3456  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4481  df-pw 4557  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-iun 4951  df-br 5101  df-opab 5163  df-mpt 5182  df-id 5542  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-iota 6477  df-fun 6523  df-fn 6524  df-f 6525  df-f1 6526  df-fo 6527  df-f1o 6528  df-fv 6529  df-riota 7353  df-ov 7399  df-oprab 7400  df-proset 18326  df-poset 18345  df-lub 18376  df-glb 18377  df-join 18378  df-meet 18379  df-lat 18464  df-oposet 39800  df-cmtN 39801  df-ol 39802  df-oml 39803

This theorem is referenced by:  cmtbr4N  39879  omlfh1N  39882