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

Theorem 3atlem4 35560
Description: Lemma for 3at 35564. (Contributed by NM, 23-Jun-2012.)
Hypotheses
Ref Expression
3at.l = (le‘𝐾)
3at.j = (join‘𝐾)
3at.a 𝐴 = (Atoms‘𝐾)
Assertion
Ref Expression
3atlem4 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → ((𝑃 𝑄) 𝑅) = ((𝑆 𝑇) 𝑅))

Proof of Theorem 3atlem4
StepHypRef Expression
1 simp11 1266 . 2 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → 𝐾 ∈ HL)
2 simp12 1267 . 2 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → (𝑃𝐴𝑄𝐴𝑅𝐴))
3 simp13l 1393 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → 𝑆𝐴)
4 simp13r 1394 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → 𝑇𝐴)
5 simp123 1412 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → 𝑅𝐴)
63, 4, 53jca 1164 . 2 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → (𝑆𝐴𝑇𝐴𝑅𝐴))
7 simp2l 1262 . 2 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → ¬ 𝑅 (𝑃 𝑄))
81hllatd 35438 . . . 4 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → 𝐾 ∈ Lat)
9 eqid 2824 . . . . . 6 (Base‘𝐾) = (Base‘𝐾)
10 3at.a . . . . . 6 𝐴 = (Atoms‘𝐾)
119, 10atbase 35363 . . . . 5 (𝑅𝐴𝑅 ∈ (Base‘𝐾))
125, 11syl 17 . . . 4 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → 𝑅 ∈ (Base‘𝐾))
13 simp121 1410 . . . . 5 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → 𝑃𝐴)
149, 10atbase 35363 . . . . 5 (𝑃𝐴𝑃 ∈ (Base‘𝐾))
1513, 14syl 17 . . . 4 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → 𝑃 ∈ (Base‘𝐾))
16 simp122 1411 . . . . 5 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → 𝑄𝐴)
179, 10atbase 35363 . . . . 5 (𝑄𝐴𝑄 ∈ (Base‘𝐾))
1816, 17syl 17 . . . 4 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → 𝑄 ∈ (Base‘𝐾))
19 3at.l . . . . 5 = (le‘𝐾)
20 3at.j . . . . 5 = (join‘𝐾)
219, 19, 20latnlej1l 17421 . . . 4 ((𝐾 ∈ Lat ∧ (𝑅 ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾) ∧ 𝑄 ∈ (Base‘𝐾)) ∧ ¬ 𝑅 (𝑃 𝑄)) → 𝑅𝑃)
228, 12, 15, 18, 7, 21syl131anc 1508 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → 𝑅𝑃)
2322necomd 3053 . 2 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → 𝑃𝑅)
24 simp2r 1263 . . . . 5 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → 𝑃𝑄)
2524necomd 3053 . . . 4 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → 𝑄𝑃)
2619, 20, 10hlatexch1 35469 . . . 4 ((𝐾 ∈ HL ∧ (𝑄𝐴𝑅𝐴𝑃𝐴) ∧ 𝑄𝑃) → (𝑄 (𝑃 𝑅) → 𝑅 (𝑃 𝑄)))
271, 16, 5, 13, 25, 26syl131anc 1508 . . 3 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → (𝑄 (𝑃 𝑅) → 𝑅 (𝑃 𝑄)))
287, 27mtod 190 . 2 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → ¬ 𝑄 (𝑃 𝑅))
29 simp3 1174 . 2 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅))
3019, 20, 103atlem3 35559 . 2 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑅𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑅 ∧ ¬ 𝑄 (𝑃 𝑅)) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → ((𝑃 𝑄) 𝑅) = ((𝑆 𝑇) 𝑅))
311, 2, 6, 7, 23, 28, 29, 30syl331anc 1520 1 (((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴)) ∧ (¬ 𝑅 (𝑃 𝑄) ∧ 𝑃𝑄) ∧ ((𝑃 𝑄) 𝑅) ((𝑆 𝑇) 𝑅)) → ((𝑃 𝑄) 𝑅) = ((𝑆 𝑇) 𝑅))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 386  w3a 1113   = wceq 1658  wcel 2166  wne 2998   class class class wbr 4872  cfv 6122  (class class class)co 6904  Basecbs 16221  lecple 16311  joincjn 17296  Latclat 17397  Atomscatm 35337  HLchlt 35424
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1896  ax-4 1910  ax-5 2011  ax-6 2077  ax-7 2114  ax-8 2168  ax-9 2175  ax-10 2194  ax-11 2209  ax-12 2222  ax-13 2390  ax-ext 2802  ax-rep 4993  ax-sep 5004  ax-nul 5012  ax-pow 5064  ax-pr 5126  ax-un 7208
This theorem depends on definitions:  df-bi 199  df-an 387  df-or 881  df-3an 1115  df-tru 1662  df-ex 1881  df-nf 1885  df-sb 2070  df-mo 2604  df-eu 2639  df-clab 2811  df-cleq 2817  df-clel 2820  df-nfc 2957  df-ne 2999  df-ral 3121  df-rex 3122  df-reu 3123  df-rab 3125  df-v 3415  df-sbc 3662  df-csb 3757  df-dif 3800  df-un 3802  df-in 3804  df-ss 3811  df-nul 4144  df-if 4306  df-pw 4379  df-sn 4397  df-pr 4399  df-op 4403  df-uni 4658  df-iun 4741  df-br 4873  df-opab 4935  df-mpt 4952  df-id 5249  df-xp 5347  df-rel 5348  df-cnv 5349  df-co 5350  df-dm 5351  df-rn 5352  df-res 5353  df-ima 5354  df-iota 6085  df-fun 6124  df-fn 6125  df-f 6126  df-f1 6127  df-fo 6128  df-f1o 6129  df-fv 6130  df-riota 6865  df-ov 6907  df-oprab 6908  df-proset 17280  df-poset 17298  df-plt 17310  df-lub 17326  df-glb 17327  df-join 17328  df-meet 17329  df-p0 17391  df-lat 17398  df-covers 35340  df-ats 35341  df-atl 35372  df-cvlat 35396  df-hlat 35425
This theorem is referenced by:  3atlem5  35561
  Copyright terms: Public domain W3C validator