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 40321
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 40158 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝐾 ∈ Lat)
5 simp23 1227 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑇𝐴)
6 eqid 2763 . . . . . 6 (Base‘𝐾) = (Base‘𝐾)
7 2atm.a . . . . . 6 𝐴 = (Atoms‘𝐾)
86, 7atbase 40083 . . . . 5 (𝑇𝐴𝑇 ∈ (Base‘𝐾))
95, 8syl 18 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑇 ∈ (Base‘𝐾))
10 simp12 1223 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑃𝐴)
116, 7atbase 40083 . . . . . 6 (𝑃𝐴𝑃 ∈ (Base‘𝐾))
1210, 11syl 18 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑃 ∈ (Base‘𝐾))
13 simp13 1224 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑄𝐴)
146, 7atbase 40083 . . . . . 6 (𝑄𝐴𝑄 ∈ (Base‘𝐾))
1513, 14syl 18 . . . . 5 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑄 ∈ (Base‘𝐾))
16 2atm.j . . . . . 6 = (join‘𝐾)
176, 16latjcl 18490 . . . . 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 40161 . . . . 5 ((𝐾 ∈ HL ∧ 𝑅𝐴𝑆𝐴) → (𝑅 𝑆) ∈ (Base‘𝐾))
223, 19, 20, 21syl3anc 1398 . . . 4 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → (𝑅 𝑆) ∈ (Base‘𝐾))
23 2atm.l . . . . 5 = (le‘𝐾)
24 2atm.m . . . . 5 = (meet‘𝐾)
256, 23, 24latlem12 18517 . . . 4 ((𝐾 ∈ Lat ∧ (𝑇 ∈ (Base‘𝐾) ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ (𝑅 𝑆) ∈ (Base‘𝐾))) → ((𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆)) ↔ 𝑇 ((𝑃 𝑄) (𝑅 𝑆))))
264, 9, 18, 22, 25syl13anc 1399 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → ((𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆)) ↔ 𝑇 ((𝑃 𝑄) (𝑅 𝑆))))
271, 2, 26mpbi2and 724 . 2 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑇 ((𝑃 𝑄) (𝑅 𝑆)))
28 hlatl 40154 . . . 4 (𝐾 ∈ HL → 𝐾 ∈ AtLat)
293, 28syl 18 . . 3 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝐾 ∈ AtLat)
306, 24latmcl 18491 . . . . . . 7 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ (𝑅 𝑆) ∈ (Base‘𝐾)) → ((𝑃 𝑄) (𝑅 𝑆)) ∈ (Base‘𝐾))
314, 18, 22, 30syl3anc 1398 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → ((𝑃 𝑄) (𝑅 𝑆)) ∈ (Base‘𝐾))
32 eqid 2763 . . . . . . 7 (0.‘𝐾) = (0.‘𝐾)
336, 23, 32, 7atlen0 40104 . . . . . 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 40320 . . . . . 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 40105 . . 3 ((𝐾 ∈ AtLat ∧ 𝑇𝐴 ∧ ((𝑃 𝑄) (𝑅 𝑆)) ∈ 𝐴) → (𝑇 ((𝑃 𝑄) (𝑅 𝑆)) ↔ 𝑇 = ((𝑃 𝑄) (𝑅 𝑆))))
4229, 5, 40, 41syl3anc 1398 . 2 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → (𝑇 ((𝑃 𝑄) (𝑅 𝑆)) ↔ 𝑇 = ((𝑃 𝑄) (𝑅 𝑆))))
4327, 42mpbid 235 1 (((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) ∧ (𝑅𝐴𝑆𝐴𝑇𝐴) ∧ (𝑇 (𝑃 𝑄) ∧ 𝑇 (𝑅 𝑆) ∧ (𝑃 𝑄) ≠ (𝑅 𝑆))) → 𝑇 = ((𝑃 𝑄) (𝑅 𝑆)))
Colors of variables: wff setvar class
Syntax hints:  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 17264  lecple 17312  joincjn 18362  meetcmee 18363  0.cp0 18472  Latclat 18482  Atomscatm 40057  AtLatcal 40058  HLchlt 40144
This theorem was proved from 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 theorem 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 18345  df-poset 18364  df-plt 18379  df-lub 18395  df-glb 18396  df-join 18397  df-meet 18398  df-p0 18474  df-lat 18483  df-clat 18550  df-oposet 39970  df-ol 39972  df-oml 39973  df-covers 40060  df-ats 40061  df-atl 40092  df-cvlat 40116  df-hlat 40145  df-llines 40292
This theorem is referenced by:  cdlemk12  41644  cdlemk12u  41666  cdlemk47  41743
  Copyright terms: Public domain W3C validator