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

Theorem latmassOLD 34988
Description: Ortholattice meet is associative. (This can also be proved for lattices with a longer proof.) (inass 3954 analog.) (Contributed by NM, 7-Nov-2011.) (Proof modification is discouraged.) (New usage is discouraged.)
Hypotheses
Ref Expression
olmass.b 𝐵 = (Base‘𝐾)
olmass.m = (meet‘𝐾)
Assertion
Ref Expression
latmassOLD ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑋 𝑌) 𝑍) = (𝑋 (𝑌 𝑍)))

Proof of Theorem latmassOLD
StepHypRef Expression
1 simpl 474 . . . 4 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝐾 ∈ OL)
2 ollat 34972 . . . . . 6 (𝐾 ∈ OL → 𝐾 ∈ Lat)
32adantr 472 . . . . 5 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝐾 ∈ Lat)
4 olop 34973 . . . . . . 7 (𝐾 ∈ OL → 𝐾 ∈ OP)
54adantr 472 . . . . . 6 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝐾 ∈ OP)
6 simpr1 1210 . . . . . 6 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝑋𝐵)
7 olmass.b . . . . . . 7 𝐵 = (Base‘𝐾)
8 eqid 2748 . . . . . . 7 (oc‘𝐾) = (oc‘𝐾)
97, 8opoccl 34953 . . . . . 6 ((𝐾 ∈ OP ∧ 𝑋𝐵) → ((oc‘𝐾)‘𝑋) ∈ 𝐵)
105, 6, 9syl2anc 696 . . . . 5 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘𝑋) ∈ 𝐵)
11 simpr2 1212 . . . . . 6 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝑌𝐵)
127, 8opoccl 34953 . . . . . 6 ((𝐾 ∈ OP ∧ 𝑌𝐵) → ((oc‘𝐾)‘𝑌) ∈ 𝐵)
135, 11, 12syl2anc 696 . . . . 5 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘𝑌) ∈ 𝐵)
14 eqid 2748 . . . . . 6 (join‘𝐾) = (join‘𝐾)
157, 14latjcl 17223 . . . . 5 ((𝐾 ∈ Lat ∧ ((oc‘𝐾)‘𝑋) ∈ 𝐵 ∧ ((oc‘𝐾)‘𝑌) ∈ 𝐵) → (((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)) ∈ 𝐵)
163, 10, 13, 15syl3anc 1463 . . . 4 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)) ∈ 𝐵)
17 simpr3 1214 . . . 4 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → 𝑍𝐵)
18 olmass.m . . . . 5 = (meet‘𝐾)
197, 14, 18, 8oldmj3 34982 . . . 4 ((𝐾 ∈ OL ∧ (((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌)) ∈ 𝐵𝑍𝐵) → ((oc‘𝐾)‘((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(join‘𝐾)((oc‘𝐾)‘𝑍))) = (((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))) 𝑍))
201, 16, 17, 19syl3anc 1463 . . 3 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(join‘𝐾)((oc‘𝐾)‘𝑍))) = (((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))) 𝑍))
217, 8opoccl 34953 . . . . . 6 ((𝐾 ∈ OP ∧ 𝑍𝐵) → ((oc‘𝐾)‘𝑍) ∈ 𝐵)
225, 17, 21syl2anc 696 . . . . 5 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘𝑍) ∈ 𝐵)
237, 14latjass 17267 . . . . 5 ((𝐾 ∈ Lat ∧ (((oc‘𝐾)‘𝑋) ∈ 𝐵 ∧ ((oc‘𝐾)‘𝑌) ∈ 𝐵 ∧ ((oc‘𝐾)‘𝑍) ∈ 𝐵)) → ((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(join‘𝐾)((oc‘𝐾)‘𝑍)) = (((oc‘𝐾)‘𝑋)(join‘𝐾)(((oc‘𝐾)‘𝑌)(join‘𝐾)((oc‘𝐾)‘𝑍))))
243, 10, 13, 22, 23syl13anc 1465 . . . 4 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(join‘𝐾)((oc‘𝐾)‘𝑍)) = (((oc‘𝐾)‘𝑋)(join‘𝐾)(((oc‘𝐾)‘𝑌)(join‘𝐾)((oc‘𝐾)‘𝑍))))
2524fveq2d 6344 . . 3 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘((((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))(join‘𝐾)((oc‘𝐾)‘𝑍))) = ((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)(((oc‘𝐾)‘𝑌)(join‘𝐾)((oc‘𝐾)‘𝑍)))))
267, 14, 18, 8oldmj4 34983 . . . . 5 ((𝐾 ∈ OL ∧ 𝑋𝐵𝑌𝐵) → ((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))) = (𝑋 𝑌))
27263adant3r3 1176 . . . 4 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))) = (𝑋 𝑌))
2827oveq1d 6816 . . 3 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)((oc‘𝐾)‘𝑌))) 𝑍) = ((𝑋 𝑌) 𝑍))
2920, 25, 283eqtr3rd 2791 . 2 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑋 𝑌) 𝑍) = ((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)(((oc‘𝐾)‘𝑌)(join‘𝐾)((oc‘𝐾)‘𝑍)))))
307, 14latjcl 17223 . . . 4 ((𝐾 ∈ Lat ∧ ((oc‘𝐾)‘𝑌) ∈ 𝐵 ∧ ((oc‘𝐾)‘𝑍) ∈ 𝐵) → (((oc‘𝐾)‘𝑌)(join‘𝐾)((oc‘𝐾)‘𝑍)) ∈ 𝐵)
313, 13, 22, 30syl3anc 1463 . . 3 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (((oc‘𝐾)‘𝑌)(join‘𝐾)((oc‘𝐾)‘𝑍)) ∈ 𝐵)
327, 14, 18, 8oldmj2 34981 . . 3 ((𝐾 ∈ OL ∧ 𝑋𝐵 ∧ (((oc‘𝐾)‘𝑌)(join‘𝐾)((oc‘𝐾)‘𝑍)) ∈ 𝐵) → ((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)(((oc‘𝐾)‘𝑌)(join‘𝐾)((oc‘𝐾)‘𝑍)))) = (𝑋 ((oc‘𝐾)‘(((oc‘𝐾)‘𝑌)(join‘𝐾)((oc‘𝐾)‘𝑍)))))
331, 6, 31, 32syl3anc 1463 . 2 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘(((oc‘𝐾)‘𝑋)(join‘𝐾)(((oc‘𝐾)‘𝑌)(join‘𝐾)((oc‘𝐾)‘𝑍)))) = (𝑋 ((oc‘𝐾)‘(((oc‘𝐾)‘𝑌)(join‘𝐾)((oc‘𝐾)‘𝑍)))))
347, 14, 18, 8oldmj4 34983 . . . 4 ((𝐾 ∈ OL ∧ 𝑌𝐵𝑍𝐵) → ((oc‘𝐾)‘(((oc‘𝐾)‘𝑌)(join‘𝐾)((oc‘𝐾)‘𝑍))) = (𝑌 𝑍))
35343adant3r1 1174 . . 3 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((oc‘𝐾)‘(((oc‘𝐾)‘𝑌)(join‘𝐾)((oc‘𝐾)‘𝑍))) = (𝑌 𝑍))
3635oveq2d 6817 . 2 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → (𝑋 ((oc‘𝐾)‘(((oc‘𝐾)‘𝑌)(join‘𝐾)((oc‘𝐾)‘𝑍)))) = (𝑋 (𝑌 𝑍)))
3729, 33, 363eqtrd 2786 1 ((𝐾 ∈ OL ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑋 𝑌) 𝑍) = (𝑋 (𝑌 𝑍)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 383  w3a 1072   = wceq 1620  wcel 2127  cfv 6037  (class class class)co 6801  Basecbs 16030  occoc 16122  joincjn 17116  meetcmee 17117  Latclat 17217  OPcops 34931  OLcol 34933
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1859  ax-4 1874  ax-5 1976  ax-6 2042  ax-7 2078  ax-8 2129  ax-9 2136  ax-10 2156  ax-11 2171  ax-12 2184  ax-13 2379  ax-ext 2728  ax-rep 4911  ax-sep 4921  ax-nul 4929  ax-pow 4980  ax-pr 5043  ax-un 7102
This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3an 1074  df-tru 1623  df-ex 1842  df-nf 1847  df-sb 2035  df-eu 2599  df-mo 2600  df-clab 2735  df-cleq 2741  df-clel 2744  df-nfc 2879  df-ne 2921  df-ral 3043  df-rex 3044  df-reu 3045  df-rab 3047  df-v 3330  df-sbc 3565  df-csb 3663  df-dif 3706  df-un 3708  df-in 3710  df-ss 3717  df-nul 4047  df-if 4219  df-pw 4292  df-sn 4310  df-pr 4312  df-op 4316  df-uni 4577  df-iun 4662  df-br 4793  df-opab 4853  df-mpt 4870  df-id 5162  df-xp 5260  df-rel 5261  df-cnv 5262  df-co 5263  df-dm 5264  df-rn 5265  df-res 5266  df-ima 5267  df-iota 6000  df-fun 6039  df-fn 6040  df-f 6041  df-f1 6042  df-fo 6043  df-f1o 6044  df-fv 6045  df-riota 6762  df-ov 6804  df-oprab 6805  df-preset 17100  df-poset 17118  df-lub 17146  df-glb 17147  df-join 17148  df-meet 17149  df-lat 17218  df-oposet 34935  df-ol 34937
This theorem is referenced by:  latm12  34989  latm32  34990  latmrot  34991  latm4  34992  cmtcomlemN  35007  cmtbr3N  35013  omlfh1N  35017  dalawlem2  35630  dalawlem7  35635  dalawlem11  35639  dalawlem12  35640  lhp2at0  35790  cdleme20d  36071  cdleme23b  36109  cdlemh2  36575  dia2dimlem2  36825  dihmeetbclemN  37064
  Copyright terms: Public domain W3C validator