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 35394
Description: Lemma for 4at 35414. (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 756 . 2 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → ¬ 𝑆 ((𝑃 𝑄) 𝑅))
2 simpl1 1227 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → 𝐾 ∈ HL)
3 simpl3l 1286 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → 𝑅𝐴)
4 simpl3r 1288 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → 𝑆𝐴)
5 simpl2l 1282 . . . 4 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → 𝑃𝐴)
6 simpl2r 1284 . . . 4 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → 𝑄𝐴)
7 eqid 2771 . . . . 5 (Base‘𝐾) = (Base‘𝐾)
8 4at.j . . . . 5 = (join‘𝐾)
9 4at.a . . . . 5 𝐴 = (Atoms‘𝐾)
107, 8, 9hlatjcl 35168 . . . 4 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → (𝑃 𝑄) ∈ (Base‘𝐾))
112, 5, 6, 10syl3anc 1476 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → (𝑃 𝑄) ∈ (Base‘𝐾))
12 simprl 754 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → ¬ 𝑅 (𝑃 𝑄))
13 4at.l . . . 4 = (le‘𝐾)
147, 13, 8, 9hlexch1 35183 . . 3 ((𝐾 ∈ HL ∧ (𝑅𝐴𝑆𝐴 ∧ (𝑃 𝑄) ∈ (Base‘𝐾)) ∧ ¬ 𝑅 (𝑃 𝑄)) → (𝑅 ((𝑃 𝑄) 𝑆) → 𝑆 ((𝑃 𝑄) 𝑅)))
152, 3, 4, 11, 12, 14syl131anc 1489 . 2 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → (𝑅 ((𝑃 𝑄) 𝑆) → 𝑆 ((𝑃 𝑄) 𝑅)))
161, 15mtod 189 1 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅))) → ¬ 𝑅 ((𝑃 𝑄) 𝑆))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 382  w3a 1071   = wceq 1631  wcel 2145   class class class wbr 4786  cfv 6029  (class class class)co 6791  Basecbs 16057  lecple 16149  joincjn 17145  Atomscatm 35065  HLchlt 35152
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1870  ax-4 1885  ax-5 1991  ax-6 2057  ax-7 2093  ax-8 2147  ax-9 2154  ax-10 2174  ax-11 2190  ax-12 2203  ax-13 2408  ax-ext 2751  ax-rep 4904  ax-sep 4915  ax-nul 4923  ax-pow 4974  ax-pr 5034  ax-un 7094
This theorem depends on definitions:  df-bi 197  df-an 383  df-or 837  df-3an 1073  df-tru 1634  df-ex 1853  df-nf 1858  df-sb 2050  df-eu 2622  df-mo 2623  df-clab 2758  df-cleq 2764  df-clel 2767  df-nfc 2902  df-ne 2944  df-ral 3066  df-rex 3067  df-reu 3068  df-rab 3070  df-v 3353  df-sbc 3588  df-csb 3683  df-dif 3726  df-un 3728  df-in 3730  df-ss 3737  df-nul 4064  df-if 4226  df-pw 4299  df-sn 4317  df-pr 4319  df-op 4323  df-uni 4575  df-iun 4656  df-br 4787  df-opab 4847  df-mpt 4864  df-id 5157  df-xp 5255  df-rel 5256  df-cnv 5257  df-co 5258  df-dm 5259  df-rn 5260  df-res 5261  df-ima 5262  df-iota 5992  df-fun 6031  df-fn 6032  df-f 6033  df-f1 6034  df-fo 6035  df-f1o 6036  df-fv 6037  df-riota 6752  df-ov 6794  df-oprab 6795  df-lub 17175  df-glb 17176  df-join 17177  df-meet 17178  df-lat 17247  df-ats 35069  df-atl 35100  df-cvlat 35124  df-hlat 35153
This theorem is referenced by:  4atlem10  35407
  Copyright terms: Public domain W3C validator