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

Theorem 2atm 40329
Description: An atom majorized by two different atom joins (which could be atoms or lines) is equal to their intersection. (Contributed by NM, 30-Jun-2013.)
Hypotheses
Ref Expression
2atm.l = (le‘𝐾)
2atm.j = (join‘𝐾)
2atm.m = (meet‘𝐾)
2atm.a 𝐴 = (Atoms‘𝐾)
Assertion
Ref Expression
2atm (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑇 = ((𝑃 𝑄) (𝑅 𝑆)))

Proof of Theorem 2atm
StepHypRef Expression
1 simp31 1228 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑇 (𝑃 𝑄))
2 simp32 1229 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑇 (𝑅 𝑆))
3 simp11 1222 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝐾 ∈ HL)
43hllatd 40166 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝐾 ∈ Lat)
5 simp23 1227 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑇𝐴)
6 eqid 2763 . . . . . 6 (Base‘𝐾) = (Base‘𝐾)
7 2atm.a . . . . . 6 𝐴 = (Atoms‘𝐾)
86, 7atbase 40091 . . . . 5 (𝑇𝐴𝑇 ∈ (Base‘𝐾))
95, 8syl 18 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑇 ∈ (Base‘𝐾))
10 simp12 1223 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑃𝐴)
116, 7atbase 40091 . . . . . 6 (𝑃𝐴𝑃 ∈ (Base‘𝐾))
1210, 11syl 18 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑃 ∈ (Base‘𝐾))
13 simp13 1224 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑄𝐴)
146, 7atbase 40091 . . . . . 6 (𝑄𝐴𝑄 ∈ (Base‘𝐾))
1513, 14syl 18 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑄 ∈ (Base‘𝐾))
16 2atm.j . . . . . 6 = (join‘𝐾)
176, 16latjcl 18499 . . . . 5 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ 𝑄 ∈ (Base‘𝐾)) → (𝑃 𝑄) ∈ (Base‘𝐾))
184, 12, 15, 17syl3anc 1398 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → (𝑃 𝑄) ∈ (Base‘𝐾))
19 simp21 1225 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑅𝐴)
20 simp22 1226 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑆𝐴)
216, 16, 7hlatjcl 40169 . . . . 5 ((𝐾 ∈ HL ∧ 𝑅𝐴𝑆𝐴) → (𝑅 𝑆) ∈ (Base‘𝐾))
223, 19, 20, 21syl3anc 1398 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → (𝑅 𝑆) ∈ (Base‘𝐾))
23 2atm.l . . . . 5 = (le‘𝐾)
24 2atm.m . . . . 5 = (meet‘𝐾)
256, 23, 24latlem12 18526 . . . 4 ((𝐾 ∈ Lat ∧ (𝑇 ∈ (Base‘𝐾) ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ (𝑅 𝑆) ∈ (Base‘𝐾))) → ((𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆)) ↔ 𝑇 ((𝑃 𝑄) (𝑅 𝑆))))
264, 9, 18, 22, 25syl13anc 1399 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → ((𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆)) ↔ 𝑇 ((𝑃 𝑄) (𝑅 𝑆))))
271, 2, 26mpbi2and 724 . 2 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑇 ((𝑃 𝑄) (𝑅 𝑆)))
28 hlatl 40162 . . . 4 (𝐾 ∈ HL → 𝐾 ∈ AtLat)
293, 28syl 18 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝐾 ∈ AtLat)
306, 24latmcl 18500 . . . . . . 7 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ (𝑅 𝑆) ∈ (Base‘𝐾)) → ((𝑃 𝑄) (𝑅 𝑆)) ∈ (Base‘𝐾))
314, 18, 22, 30syl3anc 1398 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → ((𝑃 𝑄) (𝑅 𝑆)) ∈ (Base‘𝐾))
32 eqid 2763 . . . . . . 7 (0.‘𝐾) = (0.‘𝐾)
336, 23, 32, 7atlen0 40112 . . . . . 6 (((𝐾 ∈ AtLat ∧ ((𝑃 𝑄) (𝑅 𝑆)) ∈ (Base‘𝐾) ∧ 𝑇𝐴) ∧ 𝑇 ((𝑃 𝑄) (𝑅 𝑆))) → ((𝑃 𝑄) (𝑅 𝑆)) ≠ (0.‘𝐾))
3429, 31, 5, 27, 33syl31anc 1400 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → ((𝑃 𝑄) (𝑅 𝑆)) ≠ (0.‘𝐾))
3534neneqd 2963 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → ¬ ((𝑃 𝑄) (𝑅 𝑆)) = (0.‘𝐾))
36 simp33 1230 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → (𝑃 𝑄) ≠ (𝑅 𝑆))
3716, 24, 32, 72atmat0 40328 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴 ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → (((𝑃 𝑄) (𝑅 𝑆)) ∈ 𝐴 ∨ ((𝑃 𝑄) (𝑅 𝑆)) = (0.‘𝐾)))
383, 10, 13, 19, 20, 36, 37syl33anc 1412 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → (((𝑃 𝑄) (𝑅 𝑆)) ∈ 𝐴 ∨ ((𝑃 𝑄) (𝑅 𝑆)) = (0.‘𝐾)))
3938ord 877 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → (¬ ((𝑃 𝑄) (𝑅 𝑆)) ∈ 𝐴 → ((𝑃 𝑄) (𝑅 𝑆)) = (0.‘𝐾)))
4035, 39mt3d 149 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → ((𝑃 𝑄) (𝑅 𝑆)) ∈ 𝐴)
4123, 7atcmp 40113 . . 3 ((𝐾 ∈ AtLat ∧ 𝑇𝐴 ∧ ((𝑃 𝑄) (𝑅 𝑆)) ∈ 𝐴) → (𝑇 ((𝑃 𝑄) (𝑅 𝑆)) ↔ 𝑇 = ((𝑃 𝑄) (𝑅 𝑆))))
4229, 5, 40, 41syl3anc 1398 . 2 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → (𝑇 ((𝑃 𝑄) (𝑅 𝑆)) ↔ 𝑇 = ((𝑃 𝑄) (𝑅 𝑆))))
4327, 42mpbid 235 1 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑇 = ((𝑃 𝑄) (𝑅 𝑆)))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 400  wo 860  w3a 1103   = wceq 1570  wcel 2143  wne 2958   class class class wbr 5109  cfv 6536  (class class class)co 7410  Basecbs 17273  lecple 17321  joincjn 18371  meetcmee 18372  0.cp0 18481  Latclat 18491  Atomscatm 40065  AtLatcal 40066  HLchlt 40152
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732
This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4873  df-iun 4958  df-br 5110  df-opab 5174  df-mpt 5193  df-id 5556  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-riota 7367  df-ov 7413  df-oprab 7414  df-proset 18354  df-poset 18373  df-plt 18388  df-lub 18404  df-glb 18405  df-join 18406  df-meet 18407  df-p0 18483  df-lat 18492  df-clat 18559  df-oposet 39978  df-ol 39980  df-oml 39981  df-covers 40068  df-ats 40069  df-atl 40100  df-cvlat 40124  df-hlat 40153  df-llines 40300
This theorem is used by:  cdlemk12  41652  cdlemk12u  41674  cdlemk47  41751
  Copyright terms: Public domain W3C validator