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 37793
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 30623 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 37777 . . . . 5 (𝐾 ∈ OML → 𝐾 ∈ Lat)
2 omlfh1.b . . . . . 6 𝐵 = (Base‘𝐾)
3 eqid 2731 . . . . . 6 (le‘𝐾) = (le‘𝐾)
4 omlfh1.j . . . . . 6 = (join‘𝐾)
5 omlfh1.m . . . . . 6 = (meet‘𝐾)
62, 3, 4, 5latledi 18380 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑋 𝑌) (𝑋 𝑍))(le‘𝐾)(𝑋 (𝑌 𝑍)))
71, 6sylan 580 . . . 4 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑋 𝑌) (𝑋 𝑍))(le‘𝐾)(𝑋 (𝑌 𝑍)))
873adant3 1132 . . 3 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((𝑋 𝑌) (𝑋 𝑍))(le‘𝐾)(𝑋 (𝑌 𝑍)))
91adantr 481 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝐾 ∈ Lat)
10 simpr1 1194 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝑋𝐵)
11 simpr2 1195 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝑌𝐵)
12 simpr3 1196 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝑍𝐵)
132, 4latjcl 18342 . . . . . . . 8 ((𝐾 ∈ Lat ∧ 𝑌𝐵𝑍𝐵) → (𝑌 𝑍) ∈ 𝐵)
149, 11, 12, 13syl3anc 1371 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑌 𝑍) ∈ 𝐵)
152, 5latmcom 18366 . . . . . . 7 ((𝐾 ∈ Lat ∧ 𝑋𝐵 ∧ (𝑌 𝑍) ∈ 𝐵) → (𝑋 (𝑌 𝑍)) = ((𝑌 𝑍) 𝑋))
169, 10, 14, 15syl3anc 1371 . . . . . 6 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 (𝑌 𝑍)) = ((𝑌 𝑍) 𝑋))
17 omlol 37775 . . . . . . . . 9 (𝐾 ∈ OML → 𝐾 ∈ OL)
1817adantr 481 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝐾 ∈ OL)
192, 5latmcl 18343 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑌𝐵) → (𝑋 𝑌) ∈ 𝐵)
209, 10, 11, 19syl3anc 1371 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 𝑌) ∈ 𝐵)
212, 5latmcl 18343 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑍𝐵) → (𝑋 𝑍) ∈ 𝐵)
229, 10, 12, 21syl3anc 1371 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 𝑍) ∈ 𝐵)
23 eqid 2731 . . . . . . . . 9 (oc‘𝐾) = (oc‘𝐾)
242, 4, 5, 23oldmj1 37756 . . . . . . . 8 ((𝐾 ∈ OL ∧ (𝑋 𝑌) ∈ 𝐵 ∧ (𝑋 𝑍) ∈ 𝐵) → ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍))) = (((oc‘𝐾)‘(𝑋 𝑌)) ((oc‘𝐾)‘(𝑋 𝑍))))
2518, 20, 22, 24syl3anc 1371 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍))) = (((oc‘𝐾)‘(𝑋 𝑌)) ((oc‘𝐾)‘(𝑋 𝑍))))
262, 4, 5, 23oldmm1 37752 . . . . . . . . 9 ((𝐾 ∈ OL ∧ 𝑋𝐵𝑌𝐵) → ((oc‘𝐾)‘(𝑋 𝑌)) = (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)))
2718, 10, 11, 26syl3anc 1371 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘(𝑋 𝑌)) = (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)))
282, 4, 5, 23oldmm1 37752 . . . . . . . . 9 ((𝐾 ∈ OL ∧ 𝑋𝐵𝑍𝐵) → ((oc‘𝐾)‘(𝑋 𝑍)) = (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))
2918, 10, 12, 28syl3anc 1371 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘(𝑋 𝑍)) = (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))
3027, 29oveq12d 7380 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (((oc‘𝐾)‘(𝑋 𝑌)) ((oc‘𝐾)‘(𝑋 𝑍))) = ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))))
3125, 30eqtrd 2771 . . . . . 6 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍))) = ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))))
3216, 31oveq12d 7380 . . . . 5 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑋 (𝑌 𝑍)) ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍)))) = (((𝑌 𝑍) 𝑋) ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))))
33323adant3 1132 . . . 4 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((𝑋 (𝑌 𝑍)) ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍)))) = (((𝑌 𝑍) 𝑋) ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))))
34 omlop 37776 . . . . . . . . . . 11 (𝐾 ∈ OML → 𝐾 ∈ OP)
3534adantr 481 . . . . . . . . . 10 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝐾 ∈ OP)
362, 23opoccl 37729 . . . . . . . . . 10 ((𝐾 ∈ OP ∧ 𝑋𝐵) → ((oc‘𝐾)‘𝑋) ∈ 𝐵)
3735, 10, 36syl2anc 584 . . . . . . . . 9 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘𝑋) ∈ 𝐵)
382, 23opoccl 37729 . . . . . . . . . 10 ((𝐾 ∈ OP ∧ 𝑌𝐵) → ((oc‘𝐾)‘𝑌) ∈ 𝐵)
3935, 11, 38syl2anc 584 . . . . . . . . 9 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘𝑌) ∈ 𝐵)
402, 4latjcl 18342 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ ((oc‘𝐾)‘𝑋) ∈ 𝐵 ∧ ((oc‘𝐾)‘𝑌) ∈ 𝐵) → (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) ∈ 𝐵)
419, 37, 39, 40syl3anc 1371 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) ∈ 𝐵)
422, 23opoccl 37729 . . . . . . . . . 10 ((𝐾 ∈ OP ∧ 𝑍𝐵) → ((oc‘𝐾)‘𝑍) ∈ 𝐵)
4335, 12, 42syl2anc 584 . . . . . . . . 9 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘𝑍) ∈ 𝐵)
442, 4latjcl 18342 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ ((oc‘𝐾)‘𝑋) ∈ 𝐵 ∧ ((oc‘𝐾)‘𝑍) ∈ 𝐵) → (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)) ∈ 𝐵)
459, 37, 43, 44syl3anc 1371 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)) ∈ 𝐵)
462, 5latmcl 18343 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) ∈ 𝐵 ∧ (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)) ∈ 𝐵) → ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) ∈ 𝐵)
479, 41, 45, 46syl3anc 1371 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) ∈ 𝐵)
482, 5latmassOLD 37764 . . . . . . 7 ((𝐾 ∈ OL ∧ ((𝑌 𝑍) ∈ 𝐵𝑋𝐵 ∧ ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) ∈ 𝐵)) → (((𝑌 𝑍) 𝑋) ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = ((𝑌 𝑍) (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))))))
4918, 14, 10, 47, 48syl13anc 1372 . . . . . 6 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (((𝑌 𝑍) 𝑋) ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = ((𝑌 𝑍) (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))))))
50493adant3 1132 . . . . 5 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (((𝑌 𝑍) 𝑋) ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = ((𝑌 𝑍) (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))))))
51 omlfh1.c . . . . . . . . . . . . . 14 𝐶 = (cm‘𝐾)
522, 23, 51cmt2N 37785 . . . . . . . . . . . . 13 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (𝑋𝐶𝑌𝑋𝐶((oc‘𝐾)‘𝑌)))
53523adant3r3 1184 . . . . . . . . . . . 12 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋𝐶𝑌𝑋𝐶((oc‘𝐾)‘𝑌)))
54 simpl 483 . . . . . . . . . . . . 13 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝐾 ∈ OML)
552, 4, 5, 23, 51cmtbr3N 37789 . . . . . . . . . . . . 13 ((𝐾 ∈ OML ∧ 𝑋𝐵 ∧ ((oc‘𝐾)‘𝑌) ∈ 𝐵) → (𝑋𝐶((oc‘𝐾)‘𝑌) ↔ (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) = (𝑋 ((oc‘𝐾)‘𝑌))))
5654, 10, 39, 55syl3anc 1371 . . . . . . . . . . . 12 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋𝐶((oc‘𝐾)‘𝑌) ↔ (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) = (𝑋 ((oc‘𝐾)‘𝑌))))
5753, 56bitrd 278 . . . . . . . . . . 11 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋𝐶𝑌 ↔ (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) = (𝑋 ((oc‘𝐾)‘𝑌))))
5857biimpa 477 . . . . . . . . . 10 (((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ 𝑋𝐶𝑌) → (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) = (𝑋 ((oc‘𝐾)‘𝑌)))
5958adantrr 715 . . . . . . . . 9 (((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) = (𝑋 ((oc‘𝐾)‘𝑌)))
60593impa 1110 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) = (𝑋 ((oc‘𝐾)‘𝑌)))
612, 23, 51cmt2N 37785 . . . . . . . . . . . . 13 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑍𝐵) → (𝑋𝐶𝑍𝑋𝐶((oc‘𝐾)‘𝑍)))
62613adant3r2 1183 . . . . . . . . . . . 12 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋𝐶𝑍𝑋𝐶((oc‘𝐾)‘𝑍)))
632, 4, 5, 23, 51cmtbr3N 37789 . . . . . . . . . . . . 13 ((𝐾 ∈ OML ∧ 𝑋𝐵 ∧ ((oc‘𝐾)‘𝑍) ∈ 𝐵) → (𝑋𝐶((oc‘𝐾)‘𝑍) ↔ (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) = (𝑋 ((oc‘𝐾)‘𝑍))))
6454, 10, 43, 63syl3anc 1371 . . . . . . . . . . . 12 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋𝐶((oc‘𝐾)‘𝑍) ↔ (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) = (𝑋 ((oc‘𝐾)‘𝑍))))
6562, 64bitrd 278 . . . . . . . . . . 11 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋𝐶𝑍 ↔ (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) = (𝑋 ((oc‘𝐾)‘𝑍))))
6665biimpa 477 . . . . . . . . . 10 (((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ 𝑋𝐶𝑍) → (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) = (𝑋 ((oc‘𝐾)‘𝑍)))
6766adantrl 714 . . . . . . . . 9 (((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) = (𝑋 ((oc‘𝐾)‘𝑍)))
68673impa 1110 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))) = (𝑋 ((oc‘𝐾)‘𝑍)))
6960, 68oveq12d 7380 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = ((𝑋 ((oc‘𝐾)‘𝑌)) (𝑋 ((oc‘𝐾)‘𝑍))))
702, 5latmmdiN 37769 . . . . . . . . 9 ((𝐾 ∈ OL ∧ (𝑋𝐵 ∧ (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) ∈ 𝐵 ∧ (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)) ∈ 𝐵)) → (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = ((𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))))
7118, 10, 41, 45, 70syl13anc 1372 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = ((𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))))
72713adant3 1132 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = ((𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌))) (𝑋 (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))))
732, 5latmmdiN 37769 . . . . . . . . 9 ((𝐾 ∈ OL ∧ (𝑋𝐵 ∧ ((oc‘𝐾)‘𝑌) ∈ 𝐵 ∧ ((oc‘𝐾)‘𝑍) ∈ 𝐵)) → (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍))) = ((𝑋 ((oc‘𝐾)‘𝑌)) (𝑋 ((oc‘𝐾)‘𝑍))))
7418, 10, 39, 43, 73syl13anc 1372 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍))) = ((𝑋 ((oc‘𝐾)‘𝑌)) (𝑋 ((oc‘𝐾)‘𝑍))))
75743adant3 1132 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍))) = ((𝑋 ((oc‘𝐾)‘𝑌)) (𝑋 ((oc‘𝐾)‘𝑍))))
7669, 72, 753eqtr4d 2781 . . . . . 6 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍))))
7776oveq2d 7378 . . . . 5 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((𝑌 𝑍) (𝑋 ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍))))) = ((𝑌 𝑍) (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))))
782, 5latmcl 18343 . . . . . . . 8 ((𝐾 ∈ Lat ∧ ((oc‘𝐾)‘𝑌) ∈ 𝐵 ∧ ((oc‘𝐾)‘𝑍) ∈ 𝐵) → (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)) ∈ 𝐵)
799, 39, 43, 78syl3anc 1371 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)) ∈ 𝐵)
802, 5latm12 37765 . . . . . . 7 ((𝐾 ∈ OL ∧ ((𝑌 𝑍) ∈ 𝐵𝑋𝐵 ∧ (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)) ∈ 𝐵)) → ((𝑌 𝑍) (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))) = (𝑋 ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))))
8118, 14, 10, 79, 80syl13anc 1372 . . . . . 6 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑌 𝑍) (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))) = (𝑋 ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))))
82813adant3 1132 . . . . 5 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((𝑌 𝑍) (𝑋 (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))) = (𝑋 ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))))
8350, 77, 823eqtrd 2775 . . . 4 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (((𝑌 𝑍) 𝑋) ((((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑌)) (((oc‘𝐾)‘𝑋) ((oc‘𝐾)‘𝑍)))) = (𝑋 ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))))
842, 4, 5, 23oldmj1 37756 . . . . . . . . . 10 ((𝐾 ∈ OL ∧ 𝑌𝐵𝑍𝐵) → ((oc‘𝐾)‘(𝑌 𝑍)) = (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))
8518, 11, 12, 84syl3anc 1371 . . . . . . . . 9 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘(𝑌 𝑍)) = (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))
8685oveq2d 7378 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑌 𝑍) ((oc‘𝐾)‘(𝑌 𝑍))) = ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍))))
87 eqid 2731 . . . . . . . . . 10 (0.‘𝐾) = (0.‘𝐾)
882, 23, 5, 87opnoncon 37743 . . . . . . . . 9 ((𝐾 ∈ OP ∧ (𝑌 𝑍) ∈ 𝐵) → ((𝑌 𝑍) ((oc‘𝐾)‘(𝑌 𝑍))) = (0.‘𝐾))
8935, 14, 88syl2anc 584 . . . . . . . 8 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑌 𝑍) ((oc‘𝐾)‘(𝑌 𝑍))) = (0.‘𝐾))
9086, 89eqtr3d 2773 . . . . . . 7 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍))) = (0.‘𝐾))
9190oveq2d 7378 . . . . . 6 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))) = (𝑋 (0.‘𝐾)))
922, 5, 87olm01 37771 . . . . . . 7 ((𝐾 ∈ OL ∧ 𝑋𝐵) → (𝑋 (0.‘𝐾)) = (0.‘𝐾))
9318, 10, 92syl2anc 584 . . . . . 6 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 (0.‘𝐾)) = (0.‘𝐾))
9491, 93eqtrd 2771 . . . . 5 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))) = (0.‘𝐾))
95943adant3 1132 . . . 4 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 ((𝑌 𝑍) (((oc‘𝐾)‘𝑌) ((oc‘𝐾)‘𝑍)))) = (0.‘𝐾))
9633, 83, 953eqtrd 2775 . . 3 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((𝑋 (𝑌 𝑍)) ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍)))) = (0.‘𝐾))
972, 4latjcl 18342 . . . . . 6 ((𝐾 ∈ Lat ∧ (𝑋 𝑌) ∈ 𝐵 ∧ (𝑋 𝑍) ∈ 𝐵) → ((𝑋 𝑌) (𝑋 𝑍)) ∈ 𝐵)
989, 20, 22, 97syl3anc 1371 . . . . 5 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑋 𝑌) (𝑋 𝑍)) ∈ 𝐵)
992, 5latmcl 18343 . . . . . 6 ((𝐾 ∈ Lat ∧ 𝑋𝐵 ∧ (𝑌 𝑍) ∈ 𝐵) → (𝑋 (𝑌 𝑍)) ∈ 𝐵)
1009, 10, 14, 99syl3anc 1371 . . . . 5 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 (𝑌 𝑍)) ∈ 𝐵)
1012, 3, 5, 23, 87omllaw3 37780 . . . . 5 ((𝐾 ∈ OML ∧ ((𝑋 𝑌) (𝑋 𝑍)) ∈ 𝐵 ∧ (𝑋 (𝑌 𝑍)) ∈ 𝐵) → ((((𝑋 𝑌) (𝑋 𝑍))(le‘𝐾)(𝑋 (𝑌 𝑍)) ∧ ((𝑋 (𝑌 𝑍)) ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍)))) = (0.‘𝐾)) → ((𝑋 𝑌) (𝑋 𝑍)) = (𝑋 (𝑌 𝑍))))
10254, 98, 100, 101syl3anc 1371 . . . 4 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((((𝑋 𝑌) (𝑋 𝑍))(le‘𝐾)(𝑋 (𝑌 𝑍)) ∧ ((𝑋 (𝑌 𝑍)) ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍)))) = (0.‘𝐾)) → ((𝑋 𝑌) (𝑋 𝑍)) = (𝑋 (𝑌 𝑍))))
1031023adant3 1132 . . 3 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((((𝑋 𝑌) (𝑋 𝑍))(le‘𝐾)(𝑋 (𝑌 𝑍)) ∧ ((𝑋 (𝑌 𝑍)) ((oc‘𝐾)‘((𝑋 𝑌) (𝑋 𝑍)))) = (0.‘𝐾)) → ((𝑋 𝑌) (𝑋 𝑍)) = (𝑋 (𝑌 𝑍))))
1048, 96, 103mp2and 697 . 2 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → ((𝑋 𝑌) (𝑋 𝑍)) = (𝑋 (𝑌 𝑍)))
105104eqcomd 2737 1 ((𝐾 ∈ OML ∧ (𝑋𝐵𝑌𝐵𝑍𝐵) ∧ (𝑋𝐶𝑌𝑋𝐶𝑍)) → (𝑋 (𝑌 𝑍)) = ((𝑋 𝑌) (𝑋 𝑍)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 396  w3a 1087   = wceq 1541  wcel 2106   class class class wbr 5110  cfv 6501  (class class class)co 7362  Basecbs 17094  lecple 17154  occoc 17155  joincjn 18214  meetcmee 18215  0.cp0 18326  Latclat 18334  OPcops 37707  cmccmtN 37708  OLcol 37709  OMLcoml 37710
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2702  ax-rep 5247  ax-sep 5261  ax-nul 5268  ax-pow 5325  ax-pr 5389  ax-un 7677
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-ral 3061  df-rex 3070  df-reu 3352  df-rab 3406  df-v 3448  df-sbc 3743  df-csb 3859  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-nul 4288  df-if 4492  df-pw 4567  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4871  df-iun 4961  df-br 5111  df-opab 5173  df-mpt 5194  df-id 5536  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-iota 6453  df-fun 6503  df-fn 6504  df-f 6505  df-f1 6506  df-fo 6507  df-f1o 6508  df-fv 6509  df-riota 7318  df-ov 7365  df-oprab 7366  df-proset 18198  df-poset 18216  df-lub 18249  df-glb 18250  df-join 18251  df-meet 18252  df-p0 18328  df-lat 18335  df-oposet 37711  df-cmtN 37712  df-ol 37713  df-oml 37714
This theorem is referenced by:  omlfh3N  37794  omlmod1i2N  37795
  Copyright terms: Public domain W3C validator