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

Theorem cdleme17b 36089
Description: Lemma leading to cdleme17c 36090. (Contributed by NM, 11-Oct-2012.)
Hypotheses
Ref Expression
cdleme17.l = (le‘𝐾)
cdleme17.j = (join‘𝐾)
cdleme17.m = (meet‘𝐾)
cdleme17.a 𝐴 = (Atoms‘𝐾)
cdleme17.h 𝐻 = (LHyp‘𝐾)
cdleme17.u 𝑈 = ((𝑃 𝑄) 𝑊)
cdleme17.f 𝐹 = ((𝑆 𝑈) (𝑄 ((𝑃 𝑆) 𝑊)))
cdleme17.g 𝐺 = ((𝑃 𝑄) (𝐹 ((𝑃 𝑆) 𝑊)))
cdleme17.c 𝐶 = ((𝑃 𝑆) 𝑊)
Assertion
Ref Expression
cdleme17b (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) → ¬ 𝐶 (𝑃 𝑄))

Proof of Theorem cdleme17b
StepHypRef Expression
1 simp33 1253 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) → ¬ 𝑆 (𝑃 𝑄))
2 eqid 2771 . . 3 (Base‘𝐾) = (Base‘𝐾)
3 cdleme17.l . . 3 = (le‘𝐾)
4 simpl1l 1278 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → 𝐾 ∈ HL)
5 hllat 35165 . . . 4 (𝐾 ∈ HL → 𝐾 ∈ Lat)
64, 5syl 17 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → 𝐾 ∈ Lat)
7 simpl32 1328 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → 𝑆𝐴)
8 cdleme17.a . . . . 5 𝐴 = (Atoms‘𝐾)
92, 8atbase 35091 . . . 4 (𝑆𝐴𝑆 ∈ (Base‘𝐾))
107, 9syl 17 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → 𝑆 ∈ (Base‘𝐾))
11 simpl2l 1282 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → 𝑃𝐴)
12 cdleme17.j . . . . 5 = (join‘𝐾)
132, 12, 8hlatjcl 35168 . . . 4 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑆𝐴) → (𝑃 𝑆) ∈ (Base‘𝐾))
144, 11, 7, 13syl3anc 1476 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → (𝑃 𝑆) ∈ (Base‘𝐾))
15 simpl31 1326 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → 𝑄𝐴)
162, 12, 8hlatjcl 35168 . . . 4 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → (𝑃 𝑄) ∈ (Base‘𝐾))
174, 11, 15, 16syl3anc 1476 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → (𝑃 𝑄) ∈ (Base‘𝐾))
183, 12, 8hlatlej2 35177 . . . 4 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑆𝐴) → 𝑆 (𝑃 𝑆))
194, 11, 7, 18syl3anc 1476 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → 𝑆 (𝑃 𝑆))
20 simpl1r 1280 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → 𝑊𝐻)
21 simpl2r 1284 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → ¬ 𝑃 𝑊)
22 cdleme17.m . . . . . 6 = (meet‘𝐾)
23 cdleme17.h . . . . . 6 𝐻 = (LHyp‘𝐾)
24 cdleme17.c . . . . . 6 𝐶 = ((𝑃 𝑆) 𝑊)
253, 12, 22, 8, 23, 24cdleme8 36052 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑆𝐴) → (𝑃 𝐶) = (𝑃 𝑆))
264, 20, 11, 21, 7, 25syl221anc 1487 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → (𝑃 𝐶) = (𝑃 𝑆))
273, 12, 8hlatlej1 35176 . . . . . 6 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → 𝑃 (𝑃 𝑄))
284, 11, 15, 27syl3anc 1476 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → 𝑃 (𝑃 𝑄))
29 simpr 471 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → 𝐶 (𝑃 𝑄))
302, 8atbase 35091 . . . . . . 7 (𝑃𝐴𝑃 ∈ (Base‘𝐾))
3111, 30syl 17 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → 𝑃 ∈ (Base‘𝐾))
322, 12, 22, 8, 23, 24cdleme9b 36054 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑆𝐴𝑊𝐻)) → 𝐶 ∈ (Base‘𝐾))
334, 11, 7, 20, 32syl13anc 1478 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → 𝐶 ∈ (Base‘𝐾))
342, 3, 12latjle12 17263 . . . . . 6 ((𝐾 ∈ Lat ∧ (𝑃 ∈ (Base‘𝐾) ∧ 𝐶 ∈ (Base‘𝐾) ∧ (𝑃 𝑄) ∈ (Base‘𝐾))) → ((𝑃 (𝑃 𝑄) ∧ 𝐶 (𝑃 𝑄)) ↔ (𝑃 𝐶) (𝑃 𝑄)))
356, 31, 33, 17, 34syl13anc 1478 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → ((𝑃 (𝑃 𝑄) ∧ 𝐶 (𝑃 𝑄)) ↔ (𝑃 𝐶) (𝑃 𝑄)))
3628, 29, 35mpbi2and 691 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → (𝑃 𝐶) (𝑃 𝑄))
3726, 36eqbrtrrd 4810 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → (𝑃 𝑆) (𝑃 𝑄))
382, 3, 6, 10, 14, 17, 19, 37lattrd 17259 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) ∧ 𝐶 (𝑃 𝑄)) → 𝑆 (𝑃 𝑄))
391, 38mtand 817 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴𝑆𝐴 ∧ ¬ 𝑆 (𝑃 𝑄))) → ¬ 𝐶 (𝑃 𝑄))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wa 382  w3a 1071   = wceq 1631  wcel 2145   class class class wbr 4786  cfv 6029  (class class class)co 6791  Basecbs 16057  lecple 16149  joincjn 17145  meetcmee 17146  Latclat 17246  Atomscatm 35065  HLchlt 35152  LHypclh 35785
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1870  ax-4 1885  ax-5 1991  ax-6 2057  ax-7 2093  ax-8 2147  ax-9 2154  ax-10 2174  ax-11 2190  ax-12 2203  ax-13 2408  ax-ext 2751  ax-rep 4904  ax-sep 4915  ax-nul 4923  ax-pow 4974  ax-pr 5034  ax-un 7094
This theorem depends on definitions:  df-bi 197  df-an 383  df-or 837  df-3an 1073  df-tru 1634  df-ex 1853  df-nf 1858  df-sb 2050  df-eu 2622  df-mo 2623  df-clab 2758  df-cleq 2764  df-clel 2767  df-nfc 2902  df-ne 2944  df-ral 3066  df-rex 3067  df-reu 3068  df-rab 3070  df-v 3353  df-sbc 3588  df-csb 3683  df-dif 3726  df-un 3728  df-in 3730  df-ss 3737  df-nul 4064  df-if 4226  df-pw 4299  df-sn 4317  df-pr 4319  df-op 4323  df-uni 4575  df-iun 4656  df-iin 4657  df-br 4787  df-opab 4847  df-mpt 4864  df-id 5157  df-xp 5255  df-rel 5256  df-cnv 5257  df-co 5258  df-dm 5259  df-rn 5260  df-res 5261  df-ima 5262  df-iota 5992  df-fun 6031  df-fn 6032  df-f 6033  df-f1 6034  df-fo 6035  df-f1o 6036  df-fv 6037  df-riota 6752  df-ov 6794  df-oprab 6795  df-mpt2 6796  df-1st 7313  df-2nd 7314  df-preset 17129  df-poset 17147  df-plt 17159  df-lub 17175  df-glb 17176  df-join 17177  df-meet 17178  df-p0 17240  df-p1 17241  df-lat 17247  df-clat 17309  df-oposet 34978  df-ol 34980  df-oml 34981  df-covers 35068  df-ats 35069  df-atl 35100  df-cvlat 35124  df-hlat 35153  df-psubsp 35304  df-pmap 35305  df-padd 35597  df-lhyp 35789
This theorem is referenced by:  cdleme17c  36090
  Copyright terms: Public domain W3C validator