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

Theorem 4atlem0a 40027
Description: Lemma for 4at 40047. (Contributed by NM, 10-Jul-2012.)
Hypotheses
Ref Expression
4at.l = (le‘𝐾)
4at.j = (join‘𝐾)
4at.a 𝐴 = (Atoms‘𝐾)
Assertion
Ref Expression
4atlem0a (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → ¬ 𝑅 ((𝑃 𝑄) 𝑆))

Proof of Theorem 4atlem0a
StepHypRef Expression
1 simprr 773 . 2 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → ¬ 𝑆 ((𝑃 𝑄) 𝑅))
2 simpl1 1193 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → 𝐾 ∈ HL)
3 simpl3l 1230 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → 𝑅𝐴)
4 simpl3r 1231 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → 𝑆𝐴)
5 simpl2l 1228 . . . 4 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → 𝑃𝐴)
6 simpl2r 1229 . . . 4 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → 𝑄𝐴)
7 eqid 2735 . . . . 5 (Base‘𝐾) = (Base‘𝐾)
8 4at.j . . . . 5 = (join‘𝐾)
9 4at.a . . . . 5 𝐴 = (Atoms‘𝐾)
107, 8, 9hlatjcl 39801 . . . 4 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → (𝑃 𝑄) ∈ (Base‘𝐾))
112, 5, 6, 10syl3anc 1374 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → (𝑃 𝑄) ∈ (Base‘𝐾))
12 simprl 771 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → ¬ 𝑅 (𝑃 𝑄))
13 4at.l . . . 4 = (le‘𝐾)
147, 13, 8, 9hlexch1 39816 . . 3 ((𝐾 ∈ HL ∧ (𝑅𝐴𝑆𝐴 ∧ (𝑃 𝑄) ∈ (Base‘𝐾)) ∧ ¬ 𝑅 (𝑃 𝑄)) → (𝑅 ((𝑃 𝑄) 𝑆) → 𝑆 ((𝑃 𝑄) 𝑅)))
152, 3, 4, 11, 12, 14syl131anc 1386 . 2 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → (𝑅 ((𝑃 𝑄) 𝑆) → 𝑆 ((𝑃 𝑄) 𝑅)))
161, 15mtod 198 1 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → ¬ 𝑅 ((𝑃 𝑄) 𝑆))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  w3a 1087   = wceq 1542  wcel 2114   class class class wbr 5074  cfv 6487  (class class class)co 7356  Basecbs 17168  lecple 17216  joincjn 18266  Atomscatm 39697  HLchlt 39784
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 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2184  ax-ext 2707  ax-rep 5201  ax-sep 5220  ax-nul 5230  ax-pow 5296  ax-pr 5364  ax-un 7678
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2538  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2810  df-nfc 2884  df-ne 2931  df-ral 3050  df-rex 3060  df-rmo 3340  df-reu 3341  df-rab 3388  df-v 3429  df-sbc 3726  df-csb 3834  df-dif 3888  df-un 3890  df-in 3892  df-ss 3902  df-nul 4264  df-if 4457  df-pw 4533  df-sn 4558  df-pr 4560  df-op 4564  df-uni 4841  df-iun 4925  df-br 5075  df-opab 5137  df-mpt 5156  df-id 5515  df-xp 5626  df-rel 5627  df-cnv 5628  df-co 5629  df-dm 5630  df-rn 5631  df-res 5632  df-ima 5633  df-iota 6443  df-fun 6489  df-fn 6490  df-f 6491  df-f1 6492  df-fo 6493  df-f1o 6494  df-fv 6495  df-riota 7313  df-ov 7359  df-oprab 7360  df-lub 18299  df-glb 18300  df-join 18301  df-meet 18302  df-lat 18387  df-ats 39701  df-atl 39732  df-cvlat 39756  df-hlat 39785
This theorem is referenced by:  4atlem10  40040
  Copyright terms: Public domain W3C validator