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

Theorem 4atlem9 35677
Description: Lemma for 4at 35687. Substitute 𝑊 for 𝑆. (Contributed by NM, 9-Jul-2012.)
Hypotheses
Ref Expression
4at.l = (le‘𝐾)
4at.j = (join‘𝐾)
4at.a 𝐴 = (Atoms‘𝐾)
Assertion
Ref Expression
4atlem9 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → (𝑆 ((𝑃 𝑄) (𝑅 𝑊)) ↔ ((𝑃 𝑄) (𝑅 𝑆)) = ((𝑃 𝑄) (𝑅 𝑊))))

Proof of Theorem 4atlem9
StepHypRef Expression
1 simp11 1266 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → 𝐾 ∈ HL)
2 simp22 1270 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → 𝑆𝐴)
3 simp23 1271 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → 𝑊𝐴)
41hllatd 35438 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → 𝐾 ∈ Lat)
5 simp1 1172 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → (𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴))
6 eqid 2824 . . . . . 6 (Base‘𝐾) = (Base‘𝐾)
7 4at.j . . . . . 6 = (join‘𝐾)
8 4at.a . . . . . 6 𝐴 = (Atoms‘𝐾)
96, 7, 8hlatjcl 35441 . . . . 5 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → (𝑃 𝑄) ∈ (Base‘𝐾))
105, 9syl 17 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → (𝑃 𝑄) ∈ (Base‘𝐾))
11 simp21 1269 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → 𝑅𝐴)
126, 8atbase 35363 . . . . 5 (𝑅𝐴𝑅 ∈ (Base‘𝐾))
1311, 12syl 17 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → 𝑅 ∈ (Base‘𝐾))
146, 7latjcl 17403 . . . 4 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑅 ∈ (Base‘𝐾)) → ((𝑃 𝑄) 𝑅) ∈ (Base‘𝐾))
154, 10, 13, 14syl3anc 1496 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → ((𝑃 𝑄) 𝑅) ∈ (Base‘𝐾))
16 simp3 1174 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → ¬ 𝑆 ((𝑃 𝑄) 𝑅))
17 4at.l . . . 4 = (le‘𝐾)
186, 17, 7, 8hlexchb2 35459 . . 3 ((𝐾 ∈ HL ∧ (𝑆𝐴𝑊𝐴 ∧ ((𝑃 𝑄) 𝑅) ∈ (Base‘𝐾)) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → (𝑆 (𝑊 ((𝑃 𝑄) 𝑅)) ↔ (𝑆 ((𝑃 𝑄) 𝑅)) = (𝑊 ((𝑃 𝑄) 𝑅))))
191, 2, 3, 15, 16, 18syl131anc 1508 . 2 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → (𝑆 (𝑊 ((𝑃 𝑄) 𝑅)) ↔ (𝑆 ((𝑃 𝑄) 𝑅)) = (𝑊 ((𝑃 𝑄) 𝑅))))
2017, 7, 84atlem4d 35676 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑊𝐴)) → ((𝑃 𝑄) (𝑅 𝑊)) = (𝑊 ((𝑃 𝑄) 𝑅)))
215, 11, 3, 20syl12anc 872 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → ((𝑃 𝑄) (𝑅 𝑊)) = (𝑊 ((𝑃 𝑄) 𝑅)))
2221breq2d 4884 . 2 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → (𝑆 ((𝑃 𝑄) (𝑅 𝑊)) ↔ 𝑆 (𝑊 ((𝑃 𝑄) 𝑅))))
2317, 7, 84atlem4d 35676 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴)) → ((𝑃 𝑄) (𝑅 𝑆)) = (𝑆 ((𝑃 𝑄) 𝑅)))
245, 11, 2, 23syl12anc 872 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → ((𝑃 𝑄) (𝑅 𝑆)) = (𝑆 ((𝑃 𝑄) 𝑅)))
2524, 21eqeq12d 2839 . 2 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → (((𝑃 𝑄) (𝑅 𝑆)) = ((𝑃 𝑄) (𝑅 𝑊)) ↔ (𝑆 ((𝑃 𝑄) 𝑅)) = (𝑊 ((𝑃 𝑄) 𝑅))))
2619, 22, 253bitr4d 303 1 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑊𝐴) ∧ ¬ 𝑆 ((𝑃 𝑄) 𝑅)) → (𝑆 ((𝑃 𝑄) (𝑅 𝑊)) ↔ ((𝑃 𝑄) (𝑅 𝑆)) = ((𝑃 𝑄) (𝑅 𝑊))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 198  w3a 1113   = wceq 1658  wcel 2166   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-lub 17326  df-glb 17327  df-join 17328  df-meet 17329  df-lat 17398  df-ats 35341  df-atl 35372  df-cvlat 35396  df-hlat 35425
This theorem is referenced by:  4atlem10b  35679
  Copyright terms: Public domain W3C validator