Users' Mathboxes Mathbox for Norm Megill < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  omlfh1N Structured version   Visualization version   GIF version

Theorem omlfh1N 39820
Description: Foulis-Holland Theorem, part 1. If any 2 pairs in a triple of orthomodular lattice elements commute, the triple is distributive. Part of Theorem 5 in [Kalmbach] p. 25. (fh1 31756 analog.) (Contributed by NM, 8-Nov-2011.) (New usage is discouraged.)
Hypotheses
Ref Expression
omlfh1.b 𝐵 = (Base‘𝐾)
omlfh1.j = (join‘𝐾)
omlfh1.m = (meet‘𝐾)
omlfh1.c 𝐶 = (cm‘𝐾)
Assertion
Ref Expression
omlfh1N ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 (𝑌 𝑍)) = ((𝑋 𝑌) (𝑋 𝑍)))

Proof of Theorem omlfh1N
StepHypRef Expression
1 omllat 39804 . . . . 5 (𝐾 ∈ OML → 𝐾 ∈ Lat)
2 omlfh1.b . . . . . 6 𝐵 = (Base‘𝐾)
3 eqid 2752 . . . . . 6 (le‘𝐾) = (le‘𝐾)
4 omlfh1.j . . . . . 6 = (join‘𝐾)
5 omlfh1.m . . . . . 6 = (meet‘𝐾)
62, 3, 4, 5latledi 18481 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑋 𝑌) (𝑋 𝑍))(le‘𝐾)(𝑋 (𝑌 𝑍)))
71, 6sylan 588 . . . 4 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑋 𝑌) (𝑋 𝑍))(le‘𝐾)(𝑋 (𝑌 𝑍)))
873adant3 1141 . . 3 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((𝑋 𝑌) (𝑋 𝑍))(le‘𝐾)(𝑋 (𝑌 𝑍)))
91adantr 483 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝐾 ∈ Lat)
10 simpr1 1204 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝑋𝐵)
11 simpr2 1205 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝑌𝐵)
12 simpr3 1206 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝑍𝐵)
132, 4latjcl 18443 . . . . . . . 8 ((𝐾 ∈ Lat ∧ 𝑌𝐵𝑍𝐵) → (𝑌 𝑍) ∈ 𝐵)
149, 11, 12, 13syl3anc 1382 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑌 𝑍) ∈ 𝐵)
152, 5latmcom 18467 . . . . . . 7 ((𝐾 ∈ Lat ∧ 𝑋𝐵 ∧ (𝑌 𝑍) ∈ 𝐵) → (𝑋 (𝑌 𝑍)) = ((𝑌 𝑍) 𝑋))
169, 10, 14, 15syl3anc 1382 . . . . . 6 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 (𝑌 𝑍)) = ((𝑌 𝑍) 𝑋))
17 omlol 39802 . . . . . . . . 9 (𝐾 ∈ OML → 𝐾 ∈ OL)
1817adantr 483 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝐾 ∈ OL)
192, 5latmcl 18444 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑌𝐵) → (𝑋 𝑌) ∈ 𝐵)
209, 10, 11, 19syl3anc 1382 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 𝑌) ∈ 𝐵)
212, 5latmcl 18444 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑍𝐵) → (𝑋 𝑍) ∈ 𝐵)
229, 10, 12, 21syl3anc 1382 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 𝑍) ∈ 𝐵)
23 eqid 2752 . . . . . . . . 9 (oc‘𝐾) = (oc‘𝐾)
242, 4, 5, 23oldmj1 39783 . . . . . . . 8 ((𝐾 ∈ OL ∧ (𝑋 𝑌) ∈ 𝐵 ∧ (𝑋 𝑍) ∈ 𝐵) → ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍))) = (((oc‘𝐾)‘(𝑋 𝑌)) ((oc‘𝐾)‘(𝑋 𝑍))))
2518, 20, 22, 24syl3anc 1382 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍))) = (((oc‘𝐾)‘(𝑋 𝑌)) ((oc‘𝐾)‘(𝑋 𝑍))))
262, 4, 5, 23oldmm1 39779 . . . . . . . . 9 ((𝐾 ∈ OL ∧ 𝑋𝐵𝑌𝐵) → ((oc‘𝐾)‘(𝑋 𝑌)) = (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)))
2718, 10, 11, 26syl3anc 1382 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘(𝑋 𝑌)) = (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)))
282, 4, 5, 23oldmm1 39779 . . . . . . . . 9 ((𝐾 ∈ OL ∧ 𝑋𝐵𝑍𝐵) → ((oc‘𝐾)‘(𝑋 𝑍)) = (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))
2918, 10, 12, 28syl3anc 1382 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘(𝑋 𝑍)) = (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))
3027, 29oveq12d 7399 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (((oc‘𝐾)‘(𝑋 𝑌)) ((oc‘𝐾)‘(𝑋 𝑍))) = ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))))
3125, 30eqtrd 2787 . . . . . 6 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍))) = ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))))
3216, 31oveq12d 7399 . . . . 5 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑋 (𝑌 𝑍)) ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍)))) = (((𝑌 𝑍) 𝑋) ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))))
33323adant3 1141 . . . 4 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((𝑋 (𝑌 𝑍)) ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍)))) = (((𝑌 𝑍) 𝑋) ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))))
34 omlop 39803 . . . . . . . . . . 11 (𝐾 ∈ OML → 𝐾 ∈ OP)
3534adantr 483 . . . . . . . . . 10 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝐾 ∈ OP)
362, 23opoccl 39756 . . . . . . . . . 10 ((𝐾 ∈ OP ∧ 𝑋𝐵) → ((oc‘𝐾)‘𝑋) ∈ 𝐵)
3735, 10, 36syl2anc 592 . . . . . . . . 9 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘𝑋) ∈ 𝐵)
382, 23opoccl 39756 . . . . . . . . . 10 ((𝐾 ∈ OP ∧ 𝑌𝐵) → ((oc‘𝐾)‘𝑌) ∈ 𝐵)
3935, 11, 38syl2anc 592 . . . . . . . . 9 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘𝑌) ∈ 𝐵)
402, 4latjcl 18443 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ ((oc‘𝐾)‘𝑋) ∈ 𝐵 ∧ ((oc‘𝐾)‘𝑌) ∈ 𝐵) → (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) ∈ 𝐵)
419, 37, 39, 40syl3anc 1382 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) ∈ 𝐵)
422, 23opoccl 39756 . . . . . . . . . 10 ((𝐾 ∈ OP ∧ 𝑍𝐵) → ((oc‘𝐾)‘𝑍) ∈ 𝐵)
4335, 12, 42syl2anc 592 . . . . . . . . 9 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘𝑍) ∈ 𝐵)
442, 4latjcl 18443 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ ((oc‘𝐾)‘𝑋) ∈ 𝐵 ∧ ((oc‘𝐾)‘𝑍) ∈ 𝐵) → (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)) ∈ 𝐵)
459, 37, 43, 44syl3anc 1382 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)) ∈ 𝐵)
462, 5latmcl 18444 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) ∈ 𝐵 ∧ (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)) ∈ 𝐵) → ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) ∈ 𝐵)
479, 41, 45, 46syl3anc 1382 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) ∈ 𝐵)
482, 5latmassOLD 39791 . . . . . . 7 ((𝐾 ∈ OL ∧ ((𝑌 𝑍) ∈ 𝐵𝑋𝐵 ∧ ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) ∈ 𝐵)) → (((𝑌 𝑍) 𝑋) ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = ((𝑌 𝑍) (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))))))
4918, 14, 10, 47, 48syl13anc 1383 . . . . . 6 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (((𝑌 𝑍) 𝑋) ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = ((𝑌 𝑍) (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))))))
50493adant3 1141 . . . . 5 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (((𝑌 𝑍) 𝑋) ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = ((𝑌 𝑍) (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))))))
51 omlfh1.c . . . . . . . . . . . . . 14 𝐶 = (cm‘𝐾)
522, 23, 51cmt2N 39812 . . . . . . . . . . . . 13 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (𝑋𝐶𝑌𝑋𝐶((oc‘𝐾)‘𝑌)))
53523adant3r3 1194 . . . . . . . . . . . 12 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋𝐶𝑌𝑋𝐶((oc‘𝐾)‘𝑌)))
54 simpl 485 . . . . . . . . . . . . 13 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝐾 ∈ OML)
552, 4, 5, 23, 51cmtbr3N 39816 . . . . . . . . . . . . 13 ((𝐾 ∈ OML ∧ 𝑋𝐵 ∧ ((oc‘𝐾)‘𝑌) ∈ 𝐵) → (𝑋𝐶((oc‘𝐾)‘𝑌) ↔ (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) = (𝑋 ((oc‘𝐾)‘𝑌))))
5654, 10, 39, 55syl3anc 1382 . . . . . . . . . . . 12 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋𝐶((oc‘𝐾)‘𝑌) ↔ (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) = (𝑋 ((oc‘𝐾)‘𝑌))))
5753, 56bitrd 281 . . . . . . . . . . 11 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋𝐶𝑌 ↔ (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) = (𝑋 ((oc‘𝐾)‘𝑌))))
5857biimpa 479 . . . . . . . . . 10 (((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ 𝑋𝐶𝑌) → (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) = (𝑋 ((oc‘𝐾)‘𝑌)))
5958adantrr 725 . . . . . . . . 9 (((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) = (𝑋 ((oc‘𝐾)‘𝑌)))
60593impa 1118 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) = (𝑋 ((oc‘𝐾)‘𝑌)))
612, 23, 51cmt2N 39812 . . . . . . . . . . . . 13 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑍𝐵) → (𝑋𝐶𝑍𝑋𝐶((oc‘𝐾)‘𝑍)))
62613adant3r2 1193 . . . . . . . . . . . 12 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋𝐶𝑍𝑋𝐶((oc‘𝐾)‘𝑍)))
632, 4, 5, 23, 51cmtbr3N 39816 . . . . . . . . . . . . 13 ((𝐾 ∈ OML ∧ 𝑋𝐵 ∧ ((oc‘𝐾)‘𝑍) ∈ 𝐵) → (𝑋𝐶((oc‘𝐾)‘𝑍) ↔ (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) = (𝑋 ((oc‘𝐾)‘𝑍))))
6454, 10, 43, 63syl3anc 1382 . . . . . . . . . . . 12 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋𝐶((oc‘𝐾)‘𝑍) ↔ (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) = (𝑋 ((oc‘𝐾)‘𝑍))))
6562, 64bitrd 281 . . . . . . . . . . 11 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋𝐶𝑍 ↔ (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) = (𝑋 ((oc‘𝐾)‘𝑍))))
6665biimpa 479 . . . . . . . . . 10 (((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ 𝑋𝐶𝑍) → (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) = (𝑋 ((oc‘𝐾)‘𝑍)))
6766adantrl 724 . . . . . . . . 9 (((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) = (𝑋 ((oc‘𝐾)‘𝑍)))
68673impa 1118 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) = (𝑋 ((oc‘𝐾)‘𝑍)))
6960, 68oveq12d 7399 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = ((𝑋 ((oc‘𝐾)‘𝑌)) (𝑋 ((oc‘𝐾)‘𝑍))))
702, 5latmmdiN 39796 . . . . . . . . 9 ((𝐾 ∈ OL ∧ (𝑋𝐵 ∧ (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) ∈ 𝐵 ∧ (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)) ∈ 𝐵)) → (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = ((𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))))
7118, 10, 41, 45, 70syl13anc 1383 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = ((𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))))
72713adant3 1141 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = ((𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))))
732, 5latmmdiN 39796 . . . . . . . . 9 ((𝐾 ∈ OL ∧ (𝑋𝐵 ∧ ((oc‘𝐾)‘𝑌) ∈ 𝐵 ∧ ((oc‘𝐾)‘𝑍) ∈ 𝐵)) → (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍))) = ((𝑋 ((oc‘𝐾)‘𝑌)) (𝑋 ((oc‘𝐾)‘𝑍))))
7418, 10, 39, 43, 73syl13anc 1383 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍))) = ((𝑋 ((oc‘𝐾)‘𝑌)) (𝑋 ((oc‘𝐾)‘𝑍))))
75743adant3 1141 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍))) = ((𝑋 ((oc‘𝐾)‘𝑌)) (𝑋 ((oc‘𝐾)‘𝑍))))
7669, 72, 753eqtr4d 2797 . . . . . 6 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍))))
7776oveq2d 7397 . . . . 5 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((𝑌 𝑍) (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))))) = ((𝑌 𝑍) (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))))
782, 5latmcl 18444 . . . . . . . 8 ((𝐾 ∈ Lat ∧ ((oc‘𝐾)‘𝑌) ∈ 𝐵 ∧ ((oc‘𝐾)‘𝑍) ∈ 𝐵) → (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)) ∈ 𝐵)
799, 39, 43, 78syl3anc 1382 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)) ∈ 𝐵)
802, 5latm12 39792 . . . . . . 7 ((𝐾 ∈ OL ∧ ((𝑌 𝑍) ∈ 𝐵𝑋𝐵 ∧ (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)) ∈ 𝐵)) → ((𝑌 𝑍) (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))) = (𝑋 ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))))
8118, 14, 10, 79, 80syl13anc 1383 . . . . . 6 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑌 𝑍) (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))) = (𝑋 ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))))
82813adant3 1141 . . . . 5 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((𝑌 𝑍) (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))) = (𝑋 ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))))
8350, 77, 823eqtrd 2791 . . . 4 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (((𝑌 𝑍) 𝑋) ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = (𝑋 ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))))
842, 4, 5, 23oldmj1 39783 . . . . . . . . . 10 ((𝐾 ∈ OL ∧ 𝑌𝐵𝑍𝐵) → ((oc‘𝐾)‘(𝑌 𝑍)) = (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))
8518, 11, 12, 84syl3anc 1382 . . . . . . . . 9 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘(𝑌 𝑍)) = (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))
8685oveq2d 7397 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑌 𝑍) ((oc‘𝐾)‘(𝑌 𝑍))) = ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍))))
87 eqid 2752 . . . . . . . . . 10 (0.‘𝐾) = (0.‘𝐾)
882, 23, 5, 87opnoncon 39770 . . . . . . . . 9 ((𝐾 ∈ OP ∧ (𝑌 𝑍) ∈ 𝐵) → ((𝑌 𝑍) ((oc‘𝐾)‘(𝑌 𝑍))) = (0.‘𝐾))
8935, 14, 88syl2anc 592 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑌 𝑍) ((oc‘𝐾)‘(𝑌 𝑍))) = (0.‘𝐾))
9086, 89eqtr3d 2789 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍))) = (0.‘𝐾))
9190oveq2d 7397 . . . . . 6 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))) = (𝑋 (0.‘𝐾)))
922, 5, 87olm01 39798 . . . . . . 7 ((𝐾 ∈ OL ∧ 𝑋𝐵) → (𝑋 (0.‘𝐾)) = (0.‘𝐾))
9318, 10, 92syl2anc 592 . . . . . 6 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 (0.‘𝐾)) = (0.‘𝐾))
9491, 93eqtrd 2787 . . . . 5 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))) = (0.‘𝐾))
95943adant3 1141 . . . 4 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))) = (0.‘𝐾))
9633, 83, 953eqtrd 2791 . . 3 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((𝑋 (𝑌 𝑍)) ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍)))) = (0.‘𝐾))
972, 4latjcl 18443 . . . . . 6 ((𝐾 ∈ Lat ∧ (𝑋 𝑌) ∈ 𝐵 ∧ (𝑋 𝑍) ∈ 𝐵) → ((𝑋 𝑌) (𝑋 𝑍)) ∈ 𝐵)
989, 20, 22, 97syl3anc 1382 . . . . 5 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑋 𝑌) (𝑋 𝑍)) ∈ 𝐵)
992, 5latmcl 18444 . . . . . 6 ((𝐾 ∈ Lat ∧ 𝑋𝐵 ∧ (𝑌 𝑍) ∈ 𝐵) → (𝑋 (𝑌 𝑍)) ∈ 𝐵)
1009, 10, 14, 99syl3anc 1382 . . . . 5 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 (𝑌 𝑍)) ∈ 𝐵)
1012, 3, 5, 23, 87omllaw3 39807 . . . . 5 ((𝐾 ∈ OML ∧ ((𝑋 𝑌) (𝑋 𝑍)) ∈ 𝐵 ∧ (𝑋 (𝑌 𝑍)) ∈ 𝐵) → ((((𝑋 𝑌) (𝑋 𝑍))(le‘𝐾)(𝑋 (𝑌 𝑍)) ∧ ((𝑋 (𝑌 𝑍)) ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍)))) = (0.‘𝐾)) → ((𝑋 𝑌) (𝑋 𝑍)) = (𝑋 (𝑌 𝑍))))
10254, 98, 100, 101syl3anc 1382 . . . 4 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((((𝑋 𝑌) (𝑋 𝑍))(le‘𝐾)(𝑋 (𝑌 𝑍)) ∧ ((𝑋 (𝑌 𝑍)) ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍)))) = (0.‘𝐾)) → ((𝑋 𝑌) (𝑋 𝑍)) = (𝑋 (𝑌 𝑍))))
1031023adant3 1141 . . 3 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((((𝑋 𝑌) (𝑋 𝑍))(le‘𝐾)(𝑋 (𝑌 𝑍)) ∧ ((𝑋 (𝑌 𝑍)) ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍)))) = (0.‘𝐾)) → ((𝑋 𝑌) (𝑋 𝑍)) = (𝑋 (𝑌 𝑍))))
1048, 96, 103mp2and 707 . 2 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((𝑋 𝑌) (𝑋 𝑍)) = (𝑋 (𝑌 𝑍)))
105104eqcomd 2758 1 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 (𝑌 𝑍)) = ((𝑋 𝑌) (𝑋 𝑍)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 398  w3a 1095   = wceq 1550  wcel 2132   class class class wbr 5090  cfv 6506  (class class class)co 7381  Basecbs 17217  lecple 17265  occoc 17266  joincjn 18315  meetcmee 18316  0.cp0 18425  Latclat 18435  OPcops 39734  cmccmtN 39735  OLcol 39736  OMLcoml 39737
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1805  ax-4 1819  ax-5 1920  ax-6 1977  ax-7 2018  ax-8 2134  ax-9 2142  ax-10 2165  ax-11 2181  ax-12 2202  ax-ext 2724  ax-rep 5217  ax-sep 5236  ax-nul 5246  ax-pow 5312  ax-pr 5380  ax-un 7703
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 857  df-3an 1097  df-tru 1553  df-fal 1563  df-ex 1790  df-nf 1794  df-sb 2081  df-mo 2556  df-eu 2586  df-clab 2731  df-cleq 2744  df-clel 2827  df-nfc 2901  df-ne 2948  df-ral 3067  df-rex 3077  df-rmo 3357  df-reu 3358  df-rab 3405  df-v 3446  df-sbc 3736  df-csb 3844  df-dif 3898  df-un 3900  df-in 3902  df-ss 3912  df-nul 4277  df-if 4471  df-pw 4547  df-sn 4573  df-pr 4575  df-op 4579  df-uni 4856  df-iun 4941  df-br 5091  df-opab 5153  df-mpt 5172  df-id 5531  df-xp 5642  df-rel 5643  df-cnv 5644  df-co 5645  df-dm 5646  df-rn 5647  df-res 5648  df-ima 5649  df-iota 6462  df-fun 6508  df-fn 6509  df-f 6510  df-f1 6511  df-fo 6512  df-f1o 6513  df-fv 6514  df-riota 7338  df-ov 7384  df-oprab 7385  df-proset 18298  df-poset 18317  df-lub 18348  df-glb 18349  df-join 18350  df-meet 18351  df-p0 18427  df-lat 18436  df-oposet 39738  df-cmtN 39739  df-ol 39740  df-oml 39741
This theorem is referenced by:  omlfh3N  39821  omlmod1i2N  39822
  Copyright terms: Public domain W3C validator