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

Theorem 4atlem4d 34368
Description: Lemma for 4at 34379. Frequently used associative law. (Contributed by NM, 9-Jul-2012.)
Hypotheses
Ref Expression
4at.l = (le‘𝐾)
4at.j = (join‘𝐾)
4at.a 𝐴 = (Atoms‘𝐾)
Assertion
Ref Expression
4atlem4d (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) → ((𝑃 𝑄) (𝑅 𝑆)) = (𝑆 ((𝑃 𝑄) 𝑅)))

Proof of Theorem 4atlem4d
StepHypRef Expression
1 simpl1 1062 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) → 𝐾 ∈ HL)
2 hllat 34130 . . . 4 (𝐾 ∈ HL → 𝐾 ∈ Lat)
31, 2syl 17 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) → 𝐾 ∈ Lat)
4 eqid 2621 . . . . 5 (Base‘𝐾) = (Base‘𝐾)
5 4at.j . . . . 5 = (join‘𝐾)
6 4at.a . . . . 5 𝐴 = (Atoms‘𝐾)
74, 5, 6hlatjcl 34133 . . . 4 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → (𝑃 𝑄) ∈ (Base‘𝐾))
87adantr 481 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) → (𝑃 𝑄) ∈ (Base‘𝐾))
94, 6atbase 34056 . . . 4 (𝑅𝐴𝑅 ∈ (Base‘𝐾))
109ad2antrl 763 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) → 𝑅 ∈ (Base‘𝐾))
114, 6atbase 34056 . . . 4 (𝑆𝐴𝑆 ∈ (Base‘𝐾))
1211ad2antll 764 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) → 𝑆 ∈ (Base‘𝐾))
134, 5latjass 17016 . . 3 ((𝐾 ∈ Lat ∧ ((𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾))) → (((𝑃 𝑄) 𝑅) 𝑆) = ((𝑃 𝑄) (𝑅 𝑆)))
143, 8, 10, 12, 13syl13anc 1325 . 2 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) → (((𝑃 𝑄) 𝑅) 𝑆) = ((𝑃 𝑄) (𝑅 𝑆)))
154, 5latjcl 16972 . . . 4 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾)) → ((𝑃 𝑄) 𝑅) ∈ (Base‘𝐾))
163, 8, 10, 15syl3anc 1323 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) → ((𝑃 𝑄) 𝑅) ∈ (Base‘𝐾))
174, 5latjcom 16980 . . 3 ((𝐾 ∈ Lat ∧ ((𝑃 𝑄) 𝑅) ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → (((𝑃 𝑄) 𝑅) 𝑆) = (𝑆 ((𝑃 𝑄) 𝑅)))
183, 16, 12, 17syl3anc 1323 . 2 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) → (((𝑃 𝑄) 𝑅) 𝑆) = (𝑆 ((𝑃 𝑄) 𝑅)))
1914, 18eqtr3d 2657 1 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) → ((𝑃 𝑄) (𝑅 𝑆)) = (𝑆 ((𝑃 𝑄) 𝑅)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 384  w3a 1036   = wceq 1480  wcel 1987  cfv 5847  (class class class)co 6604  Basecbs 15781  lecple 15869  joincjn 16865  Latclat 16966  Atomscatm 34030  HLchlt 34117
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1836  ax-6 1885  ax-7 1932  ax-8 1989  ax-9 1996  ax-10 2016  ax-11 2031  ax-12 2044  ax-13 2245  ax-ext 2601  ax-rep 4731  ax-sep 4741  ax-nul 4749  ax-pow 4803  ax-pr 4867  ax-un 6902
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1038  df-tru 1483  df-ex 1702  df-nf 1707  df-sb 1878  df-eu 2473  df-mo 2474  df-clab 2608  df-cleq 2614  df-clel 2617  df-nfc 2750  df-ne 2791  df-ral 2912  df-rex 2913  df-reu 2914  df-rab 2916  df-v 3188  df-sbc 3418  df-csb 3515  df-dif 3558  df-un 3560  df-in 3562  df-ss 3569  df-nul 3892  df-if 4059  df-pw 4132  df-sn 4149  df-pr 4151  df-op 4155  df-uni 4403  df-iun 4487  df-br 4614  df-opab 4674  df-mpt 4675  df-id 4989  df-xp 5080  df-rel 5081  df-cnv 5082  df-co 5083  df-dm 5084  df-rn 5085  df-res 5086  df-ima 5087  df-iota 5810  df-fun 5849  df-fn 5850  df-f 5851  df-f1 5852  df-fo 5853  df-f1o 5854  df-fv 5855  df-riota 6565  df-ov 6607  df-oprab 6608  df-preset 16849  df-poset 16867  df-lub 16895  df-glb 16896  df-join 16897  df-meet 16898  df-lat 16967  df-ats 34034  df-atl 34065  df-cvlat 34089  df-hlat 34118
This theorem is referenced by:  4atlem9  34369
  Copyright terms: Public domain W3C validator