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

Theorem cmtcomlemN 39230
Description: Lemma for cmtcomN 39231. (cmcmlem 31620 analog.) (Contributed by NM, 7-Nov-2011.) (New usage is discouraged.)
Hypotheses
Ref Expression
cmtcom.b 𝐵 = (Base‘𝐾)
cmtcom.c 𝐶 = (cm‘𝐾)
Assertion
Ref Expression
cmtcomlemN ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (𝑋𝐶𝑌𝑌𝐶𝑋))

Proof of Theorem cmtcomlemN
StepHypRef Expression
1 omllat 39224 . . . . . . . . . . . 12 (𝐾 ∈ OML → 𝐾 ∈ Lat)
213ad2ant1 1132 . . . . . . . . . . 11 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → 𝐾 ∈ Lat)
3 omlop 39223 . . . . . . . . . . . . 13 (𝐾 ∈ OML → 𝐾 ∈ OP)
4 cmtcom.b . . . . . . . . . . . . . 14 𝐵 = (Base‘𝐾)
5 eqid 2735 . . . . . . . . . . . . . 14 (oc‘𝐾) = (oc‘𝐾)
64, 5opoccl 39176 . . . . . . . . . . . . 13 ((𝐾 ∈ OP ∧ 𝑋𝐵) → ((oc‘𝐾)‘𝑋) ∈ 𝐵)
73, 6sylan 580 . . . . . . . . . . . 12 ((𝐾 ∈ OML ∧ 𝑋𝐵) → ((oc‘𝐾)‘𝑋) ∈ 𝐵)
873adant3 1131 . . . . . . . . . . 11 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → ((oc‘𝐾)‘𝑋) ∈ 𝐵)
9 simp3 1137 . . . . . . . . . . 11 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → 𝑌𝐵)
10 eqid 2735 . . . . . . . . . . . 12 (le‘𝐾) = (le‘𝐾)
11 eqid 2735 . . . . . . . . . . . 12 (join‘𝐾) = (join‘𝐾)
124, 10, 11latlej2 18507 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ ((oc‘𝐾)‘𝑋) ∈ 𝐵𝑌𝐵) → 𝑌(le‘𝐾)(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌))
132, 8, 9, 12syl3anc 1370 . . . . . . . . . 10 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → 𝑌(le‘𝐾)(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌))
144, 11latjcl 18497 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ ((oc‘𝐾)‘𝑋) ∈ 𝐵𝑌𝐵) → (((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌) ∈ 𝐵)
152, 8, 9, 14syl3anc 1370 . . . . . . . . . . 11 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌) ∈ 𝐵)
16 eqid 2735 . . . . . . . . . . . 12 (meet‘𝐾) = (meet‘𝐾)
174, 10, 16latleeqm2 18526 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ 𝑌𝐵 ∧ (((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌) ∈ 𝐵) → (𝑌(le‘𝐾)(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌) ↔ ((((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)(meet‘𝐾)𝑌) = 𝑌))
182, 9, 15, 17syl3anc 1370 . . . . . . . . . 10 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (𝑌(le‘𝐾)(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌) ↔ ((((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)(meet‘𝐾)𝑌) = 𝑌))
1913, 18mpbid 232 . . . . . . . . 9 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → ((((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)(meet‘𝐾)𝑌) = 𝑌)
2019oveq2d 7447 . . . . . . . 8 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → ((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(meet‘𝐾)((((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)(meet‘𝐾)𝑌)) = ((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(meet‘𝐾)𝑌))
21 omlol 39222 . . . . . . . . . 10 (𝐾 ∈ OML → 𝐾 ∈ OL)
22213ad2ant1 1132 . . . . . . . . 9 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → 𝐾 ∈ OL)
2333ad2ant1 1132 . . . . . . . . . . 11 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → 𝐾 ∈ OP)
244, 5opoccl 39176 . . . . . . . . . . 11 ((𝐾 ∈ OP ∧ 𝑌𝐵) → ((oc‘𝐾)‘𝑌) ∈ 𝐵)
2523, 9, 24syl2anc 584 . . . . . . . . . 10 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → ((oc‘𝐾)‘𝑌) ∈ 𝐵)
264, 11latjcl 18497 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ ((oc‘𝐾)‘𝑋) ∈ 𝐵 ∧ ((oc‘𝐾)‘𝑌) ∈ 𝐵) → (((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)) ∈ 𝐵)
272, 8, 25, 26syl3anc 1370 . . . . . . . . 9 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)) ∈ 𝐵)
284, 16latmassOLD 39211 . . . . . . . . 9 ((𝐾 ∈ OL ∧ ((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)) ∈ 𝐵 ∧ (((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌) ∈ 𝐵𝑌𝐵)) → (((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(meet‘𝐾)(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌))(meet‘𝐾)𝑌) = ((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(meet‘𝐾)((((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)(meet‘𝐾)𝑌)))
2922, 27, 15, 9, 28syl13anc 1371 . . . . . . . 8 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(meet‘𝐾)(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌))(meet‘𝐾)𝑌) = ((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(meet‘𝐾)((((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)(meet‘𝐾)𝑌)))
304, 11, 16, 5oldmm1 39199 . . . . . . . . . 10 ((𝐾 ∈ OL ∧ 𝑋𝐵𝑌𝐵) → ((oc‘𝐾)‘(𝑋(meet‘𝐾)𝑌)) = (((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)))
3121, 30syl3an1 1162 . . . . . . . . 9 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → ((oc‘𝐾)‘(𝑋(meet‘𝐾)𝑌)) = (((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)))
3231oveq1d 7446 . . . . . . . 8 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (((oc‘𝐾)‘(𝑋(meet‘𝐾)𝑌))(meet‘𝐾)𝑌) = ((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(meet‘𝐾)𝑌))
3320, 29, 323eqtr4rd 2786 . . . . . . 7 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (((oc‘𝐾)‘(𝑋(meet‘𝐾)𝑌))(meet‘𝐾)𝑌) = (((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(meet‘𝐾)(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌))(meet‘𝐾)𝑌))
3433adantr 480 . . . . . 6 (((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋 = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌)))) → (((oc‘𝐾)‘(𝑋(meet‘𝐾)𝑌))(meet‘𝐾)𝑌) = (((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(meet‘𝐾)(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌))(meet‘𝐾)𝑌))
354, 11, 16, 5oldmj4 39206 . . . . . . . . . . . . 13 ((𝐾 ∈ OL ∧ 𝑋𝐵𝑌𝐵) → ((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))) = (𝑋(meet‘𝐾)𝑌))
3621, 35syl3an1 1162 . . . . . . . . . . . 12 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → ((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))) = (𝑋(meet‘𝐾)𝑌))
374, 11, 16, 5oldmj2 39204 . . . . . . . . . . . . 13 ((𝐾 ∈ OL ∧ 𝑋𝐵𝑌𝐵) → ((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)) = (𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌)))
3821, 37syl3an1 1162 . . . . . . . . . . . 12 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → ((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)) = (𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌)))
3936, 38oveq12d 7449 . . . . . . . . . . 11 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)))(join‘𝐾)((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌))) = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌))))
4039eqeq2d 2746 . . . . . . . . . 10 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (𝑋 = (((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)))(join‘𝐾)((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌))) ↔ 𝑋 = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌)))))
4140biimpar 477 . . . . . . . . 9 (((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋 = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌)))) → 𝑋 = (((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)))(join‘𝐾)((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌))))
4241fveq2d 6911 . . . . . . . 8 (((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋 = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌)))) → ((oc‘𝐾)‘𝑋) = ((oc‘𝐾)‘(((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)))(join‘𝐾)((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)))))
434, 11, 16, 5oldmj4 39206 . . . . . . . . . 10 ((𝐾 ∈ OL ∧ (((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)) ∈ 𝐵 ∧ (((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌) ∈ 𝐵) → ((oc‘𝐾)‘(((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)))(join‘𝐾)((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)))) = ((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(meet‘𝐾)(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)))
4422, 27, 15, 43syl3anc 1370 . . . . . . . . 9 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → ((oc‘𝐾)‘(((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)))(join‘𝐾)((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)))) = ((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(meet‘𝐾)(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)))
4544adantr 480 . . . . . . . 8 (((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋 = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌)))) → ((oc‘𝐾)‘(((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)))(join‘𝐾)((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)))) = ((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(meet‘𝐾)(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)))
4642, 45eqtr2d 2776 . . . . . . 7 (((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋 = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌)))) → ((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(meet‘𝐾)(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌)) = ((oc‘𝐾)‘𝑋))
4746oveq1d 7446 . . . . . 6 (((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋 = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌)))) → (((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(meet‘𝐾)(((oc‘𝐾)‘𝑋)(join‘𝐾)𝑌))(meet‘𝐾)𝑌) = (((oc‘𝐾)‘𝑋)(meet‘𝐾)𝑌))
4834, 47eqtrd 2775 . . . . 5 (((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋 = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌)))) → (((oc‘𝐾)‘(𝑋(meet‘𝐾)𝑌))(meet‘𝐾)𝑌) = (((oc‘𝐾)‘𝑋)(meet‘𝐾)𝑌))
4948oveq2d 7447 . . . 4 (((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋 = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌)))) → ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(((oc‘𝐾)‘(𝑋(meet‘𝐾)𝑌))(meet‘𝐾)𝑌)) = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(((oc‘𝐾)‘𝑋)(meet‘𝐾)𝑌)))
50 simp1 1135 . . . . . . 7 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → 𝐾 ∈ OML)
514, 16latmcl 18498 . . . . . . . 8 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑌𝐵) → (𝑋(meet‘𝐾)𝑌) ∈ 𝐵)
521, 51syl3an1 1162 . . . . . . 7 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (𝑋(meet‘𝐾)𝑌) ∈ 𝐵)
5350, 52, 93jca 1127 . . . . . 6 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (𝐾 ∈ OML ∧ (𝑋(meet‘𝐾)𝑌) ∈ 𝐵𝑌𝐵))
544, 10, 16latmle2 18523 . . . . . . 7 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑌𝐵) → (𝑋(meet‘𝐾)𝑌)(le‘𝐾)𝑌)
551, 54syl3an1 1162 . . . . . 6 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (𝑋(meet‘𝐾)𝑌)(le‘𝐾)𝑌)
564, 10, 11, 16, 5omllaw2N 39226 . . . . . 6 ((𝐾 ∈ OML ∧ (𝑋(meet‘𝐾)𝑌) ∈ 𝐵𝑌𝐵) → ((𝑋(meet‘𝐾)𝑌)(le‘𝐾)𝑌 → ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(((oc‘𝐾)‘(𝑋(meet‘𝐾)𝑌))(meet‘𝐾)𝑌)) = 𝑌))
5753, 55, 56sylc 65 . . . . 5 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(((oc‘𝐾)‘(𝑋(meet‘𝐾)𝑌))(meet‘𝐾)𝑌)) = 𝑌)
5857adantr 480 . . . 4 (((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋 = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌)))) → ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(((oc‘𝐾)‘(𝑋(meet‘𝐾)𝑌))(meet‘𝐾)𝑌)) = 𝑌)
594, 16latmcom 18521 . . . . . . 7 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑌𝐵) → (𝑋(meet‘𝐾)𝑌) = (𝑌(meet‘𝐾)𝑋))
601, 59syl3an1 1162 . . . . . 6 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (𝑋(meet‘𝐾)𝑌) = (𝑌(meet‘𝐾)𝑋))
614, 16latmcom 18521 . . . . . . 7 ((𝐾 ∈ Lat ∧ ((oc‘𝐾)‘𝑋) ∈ 𝐵𝑌𝐵) → (((oc‘𝐾)‘𝑋)(meet‘𝐾)𝑌) = (𝑌(meet‘𝐾)((oc‘𝐾)‘𝑋)))
622, 8, 9, 61syl3anc 1370 . . . . . 6 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (((oc‘𝐾)‘𝑋)(meet‘𝐾)𝑌) = (𝑌(meet‘𝐾)((oc‘𝐾)‘𝑋)))
6360, 62oveq12d 7449 . . . . 5 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(((oc‘𝐾)‘𝑋)(meet‘𝐾)𝑌)) = ((𝑌(meet‘𝐾)𝑋)(join‘𝐾)(𝑌(meet‘𝐾)((oc‘𝐾)‘𝑋))))
6463adantr 480 . . . 4 (((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋 = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌)))) → ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(((oc‘𝐾)‘𝑋)(meet‘𝐾)𝑌)) = ((𝑌(meet‘𝐾)𝑋)(join‘𝐾)(𝑌(meet‘𝐾)((oc‘𝐾)‘𝑋))))
6549, 58, 643eqtr3d 2783 . . 3 (((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋 = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌)))) → 𝑌 = ((𝑌(meet‘𝐾)𝑋)(join‘𝐾)(𝑌(meet‘𝐾)((oc‘𝐾)‘𝑋))))
6665ex 412 . 2 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (𝑋 = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌))) → 𝑌 = ((𝑌(meet‘𝐾)𝑋)(join‘𝐾)(𝑌(meet‘𝐾)((oc‘𝐾)‘𝑋)))))
67 cmtcom.c . . 3 𝐶 = (cm‘𝐾)
684, 11, 16, 5, 67cmtvalN 39193 . 2 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (𝑋𝐶𝑌𝑋 = ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)(𝑋(meet‘𝐾)((oc‘𝐾)‘𝑌)))))
694, 11, 16, 5, 67cmtvalN 39193 . . 3 ((𝐾 ∈ OML ∧ 𝑌𝐵𝑋𝐵) → (𝑌𝐶𝑋𝑌 = ((𝑌(meet‘𝐾)𝑋)(join‘𝐾)(𝑌(meet‘𝐾)((oc‘𝐾)‘𝑋)))))
70693com23 1125 . 2 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (𝑌𝐶𝑋𝑌 = ((𝑌(meet‘𝐾)𝑋)(join‘𝐾)(𝑌(meet‘𝐾)((oc‘𝐾)‘𝑋)))))
7166, 68, 703imtr4d 294 1 ((𝐾 ∈ OML ∧ 𝑋𝐵𝑌𝐵) → (𝑋𝐶𝑌𝑌𝐶𝑋))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1537  wcel 2106   class class class wbr 5148  cfv 6563  (class class class)co 7431  Basecbs 17245  lecple 17305  occoc 17306  joincjn 18369  meetcmee 18370  Latclat 18489  OPcops 39154  cmccmtN 39155  OLcol 39156  OMLcoml 39157
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1908  ax-6 1965  ax-7 2005  ax-8 2108  ax-9 2116  ax-10 2139  ax-11 2155  ax-12 2175  ax-ext 2706  ax-rep 5285  ax-sep 5302  ax-nul 5312  ax-pow 5371  ax-pr 5438  ax-un 7754
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1540  df-fal 1550  df-ex 1777  df-nf 1781  df-sb 2063  df-mo 2538  df-eu 2567  df-clab 2713  df-cleq 2727  df-clel 2814  df-nfc 2890  df-ne 2939  df-ral 3060  df-rex 3069  df-rmo 3378  df-reu 3379  df-rab 3434  df-v 3480  df-sbc 3792  df-csb 3909  df-dif 3966  df-un 3968  df-in 3970  df-ss 3980  df-nul 4340  df-if 4532  df-pw 4607  df-sn 4632  df-pr 4634  df-op 4638  df-uni 4913  df-iun 4998  df-br 5149  df-opab 5211  df-mpt 5232  df-id 5583  df-xp 5695  df-rel 5696  df-cnv 5697  df-co 5698  df-dm 5699  df-rn 5700  df-res 5701  df-ima 5702  df-iota 6516  df-fun 6565  df-fn 6566  df-f 6567  df-f1 6568  df-fo 6569  df-f1o 6570  df-fv 6571  df-riota 7388  df-ov 7434  df-oprab 7435  df-proset 18352  df-poset 18371  df-lub 18404  df-glb 18405  df-join 18406  df-meet 18407  df-lat 18490  df-oposet 39158  df-cmtN 39159  df-ol 39160  df-oml 39161
This theorem is referenced by:  cmtcomN  39231
  Copyright terms: Public domain W3C validator