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

Theorem cdleme11e 40262
Description: Part of proof of Lemma E in [Crawley] p. 113. Lemma leading to cdleme11 40269. (Contributed by NM, 13-Jun-2012.)
Hypotheses
Ref Expression
cdleme11.l = (le‘𝐾)
cdleme11.j = (join‘𝐾)
cdleme11.m = (meet‘𝐾)
cdleme11.a 𝐴 = (Atoms‘𝐾)
cdleme11.h 𝐻 = (LHyp‘𝐾)
cdleme11.u 𝑈 = ((𝑃 𝑄) 𝑊)
cdleme11.c 𝐶 = ((𝑃 𝑆) 𝑊)
cdleme11.d 𝐷 = ((𝑃 𝑇) 𝑊)
Assertion
Ref Expression
cdleme11e ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → 𝐶𝐷)

Proof of Theorem cdleme11e
StepHypRef Expression
1 simp11 1204 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
2 simp12 1205 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
3 simp22 1208 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → 𝑇𝐴)
4 simp21 1207 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → (𝑆𝐴 ∧ ¬ 𝑆 𝑊))
5 simp11l 1285 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → 𝐾 ∈ HL)
65hllatd 39362 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → 𝐾 ∈ Lat)
7 simp12l 1287 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → 𝑃𝐴)
8 eqid 2729 . . . . . 6 (Base‘𝐾) = (Base‘𝐾)
9 cdleme11.a . . . . . 6 𝐴 = (Atoms‘𝐾)
108, 9atbase 39287 . . . . 5 (𝑃𝐴𝑃 ∈ (Base‘𝐾))
117, 10syl 17 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → 𝑃 ∈ (Base‘𝐾))
12 simp21l 1291 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → 𝑆𝐴)
138, 9atbase 39287 . . . . 5 (𝑆𝐴𝑆 ∈ (Base‘𝐾))
1412, 13syl 17 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → 𝑆 ∈ (Base‘𝐾))
158, 9atbase 39287 . . . . 5 (𝑇𝐴𝑇 ∈ (Base‘𝐾))
163, 15syl 17 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → 𝑇 ∈ (Base‘𝐾))
17 simp1 1136 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → ((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴))
18 simp2 1137 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄))
19 simp32 1211 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → ¬ 𝑆 (𝑃 𝑄))
20 simp33 1212 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → 𝑈 (𝑆 𝑇))
21 cdleme11.l . . . . . 6 = (le‘𝐾)
22 cdleme11.j . . . . . 6 = (join‘𝐾)
23 cdleme11.m . . . . . 6 = (meet‘𝐾)
24 cdleme11.h . . . . . 6 𝐻 = (LHyp‘𝐾)
25 cdleme11.u . . . . . 6 𝑈 = ((𝑃 𝑄) 𝑊)
2621, 22, 23, 9, 24, 25cdleme11c 40260 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → ¬ 𝑃 (𝑆 𝑇))
2717, 18, 19, 20, 26syl112anc 1376 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → ¬ 𝑃 (𝑆 𝑇))
288, 21, 22latnlej1r 18383 . . . 4 ((𝐾 ∈ Lat ∧ (𝑃 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾)) ∧ ¬ 𝑃 (𝑆 𝑇)) → 𝑃𝑇)
296, 11, 14, 16, 27, 28syl131anc 1385 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → 𝑃𝑇)
30 simp31 1210 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → 𝑆𝑇)
3121, 22, 9hlatcon2 39451 . . . 4 ((𝐾 ∈ HL ∧ (𝑆𝐴𝑇𝐴𝑃𝐴) ∧ (𝑆𝑇 ∧ ¬ 𝑃 (𝑆 𝑇))) → ¬ 𝑆 (𝑃 𝑇))
325, 12, 3, 7, 30, 27, 31syl132anc 1390 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → ¬ 𝑆 (𝑃 𝑇))
33 cdleme11.d . . . 4 𝐷 = ((𝑃 𝑇) 𝑊)
34 cdleme11.c . . . 4 𝐶 = ((𝑃 𝑆) 𝑊)
3521, 22, 23, 9, 24, 33, 34cdleme0e 40216 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑇𝐴 ∧ (𝑆𝐴 ∧ ¬ 𝑆 𝑊)) ∧ (𝑃𝑇 ∧ ¬ 𝑆 (𝑃 𝑇))) → 𝐷𝐶)
361, 2, 3, 4, 29, 32, 35syl132anc 1390 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → 𝐷𝐶)
3736necomd 2980 1 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) ∧ ((𝑆𝐴 ∧ ¬ 𝑆 𝑊) ∧ 𝑇𝐴𝑃𝑄) ∧ (𝑆𝑇 ∧ ¬ 𝑆 (𝑃 𝑄) ∧ 𝑈 (𝑆 𝑇))) → 𝐶𝐷)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  w3a 1086   = wceq 1540  wcel 2109  wne 2925   class class class wbr 5095  cfv 6486  (class class class)co 7353  Basecbs 17139  lecple 17187  joincjn 18236  meetcmee 18237  Latclat 18356  Atomscatm 39261  HLchlt 39348  LHypclh 39983
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5221  ax-sep 5238  ax-nul 5248  ax-pow 5307  ax-pr 5374  ax-un 7675
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-ral 3045  df-rex 3054  df-rmo 3345  df-reu 3346  df-rab 3397  df-v 3440  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-nul 4287  df-if 4479  df-pw 4555  df-sn 4580  df-pr 4582  df-op 4586  df-uni 4862  df-iun 4946  df-iin 4947  df-br 5096  df-opab 5158  df-mpt 5177  df-id 5518  df-xp 5629  df-rel 5630  df-cnv 5631  df-co 5632  df-dm 5633  df-rn 5634  df-res 5635  df-ima 5636  df-iota 6442  df-fun 6488  df-fn 6489  df-f 6490  df-f1 6491  df-fo 6492  df-f1o 6493  df-fv 6494  df-riota 7310  df-ov 7356  df-oprab 7357  df-mpo 7358  df-1st 7931  df-2nd 7932  df-proset 18219  df-poset 18238  df-plt 18253  df-lub 18269  df-glb 18270  df-join 18271  df-meet 18272  df-p0 18348  df-p1 18349  df-lat 18357  df-clat 18424  df-oposet 39174  df-ol 39176  df-oml 39177  df-covers 39264  df-ats 39265  df-atl 39296  df-cvlat 39320  df-hlat 39349  df-psubsp 39502  df-pmap 39503  df-padd 39795  df-lhyp 39987
This theorem is referenced by:  cdleme11l  40268
  Copyright terms: Public domain W3C validator