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

Theorem 3dimlem2 40118
Description: Lemma for 3dim1 40126. (Contributed by NM, 25-Jul-2012.)
Hypotheses
Ref Expression
3dim0.j = (join‘𝐾)
3dim0.l = (le‘𝐾)
3dim0.a 𝐴 = (Atoms‘𝐾)
Assertion
Ref Expression
3dimlem2 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → (𝑃𝑄 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 ((𝑃 𝑄) 𝑆)))

Proof of Theorem 3dimlem2
StepHypRef Expression
1 simp3l 1218 . 2 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → 𝑃𝑄)
2 simp22 1224 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → ¬ 𝑆 (𝑄 𝑅))
3 3dim0.j . . . . . . 7 = (join‘𝐾)
4 3dim0.a . . . . . . 7 𝐴 = (Atoms‘𝐾)
53, 4hlatjcom 40027 . . . . . 6 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → (𝑃 𝑄) = (𝑄 𝑃))
653ad2ant1 1149 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → (𝑃 𝑄) = (𝑄 𝑃))
7 simp3r 1219 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → 𝑃 (𝑄 𝑅))
8 simp11 1220 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → 𝐾 ∈ HL)
9 simp12 1221 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → 𝑃𝐴)
10 simp21 1223 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → 𝑅𝐴)
11 simp13 1222 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → 𝑄𝐴)
12 3dim0.l . . . . . . . 8 = (le‘𝐾)
1312, 3, 4hlatexchb1 40052 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑅𝐴𝑄𝐴) ∧ 𝑃𝑄) → (𝑃 (𝑄 𝑅) ↔ (𝑄 𝑃) = (𝑄 𝑅)))
148, 9, 10, 11, 1, 13syl131anc 1408 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → (𝑃 (𝑄 𝑅) ↔ (𝑄 𝑃) = (𝑄 𝑅)))
157, 14mpbid 235 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → (𝑄 𝑃) = (𝑄 𝑅))
166, 15eqtrd 2804 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → (𝑃 𝑄) = (𝑄 𝑅))
1716breq2d 5122 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → (𝑆 (𝑃 𝑄) ↔ 𝑆 (𝑄 𝑅)))
182, 17mtbird 328 . 2 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → ¬ 𝑆 (𝑃 𝑄))
19 simp23 1225 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → ¬ 𝑇 ((𝑄 𝑅) 𝑆))
2016oveq1d 7423 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → ((𝑃 𝑄) 𝑆) = ((𝑄 𝑅) 𝑆))
2120breq2d 5122 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → (𝑇 ((𝑃 𝑄) 𝑆) ↔ 𝑇 ((𝑄 𝑅) 𝑆)))
2219, 21mtbird 328 . 2 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → ¬ 𝑇 ((𝑃 𝑄) 𝑆))
231, 18, 223jca 1144 1 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴 ∧ ¬ 𝑆 (𝑄 𝑅) ∧ ¬ 𝑇 ((𝑄 𝑅) 𝑆)) ∧ (𝑃𝑄𝑃 (𝑄 𝑅))) → (𝑃𝑄 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ ¬ 𝑇 ((𝑃 𝑄) 𝑆)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 400  w3a 1101   = wceq 1567  wcel 2149  wne 2964   class class class wbr 5110  cfv 6533  (class class class)co 7408  lecple 17313  joincjn 18363  Atomscatm 39922  HLchlt 40009
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5239  ax-sep 5258  ax-nul 5268  ax-pow 5334  ax-pr 5402  ax-un 7730
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-nul 4295  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4874  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-id 5554  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-riota 7365  df-ov 7411  df-oprab 7412  df-proset 18346  df-poset 18365  df-plt 18380  df-lub 18396  df-glb 18397  df-join 18398  df-meet 18399  df-p0 18475  df-lat 18484  df-covers 39925  df-ats 39926  df-atl 39957  df-cvlat 39981  df-hlat 40010
This theorem is referenced by:  3dim1  40126  3dim2  40127
  Copyright terms: Public domain W3C validator