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

Theorem cdleme0b 39922
Description: Part of proof of Lemma E in [Crawley] p. 113. (Contributed by NM, 13-Jun-2012.)
Hypotheses
Ref Expression
cdleme0.l = (le‘𝐾)
cdleme0.j = (join‘𝐾)
cdleme0.m = (meet‘𝐾)
cdleme0.a 𝐴 = (Atoms‘𝐾)
cdleme0.h 𝐻 = (LHyp‘𝐾)
cdleme0.u 𝑈 = ((𝑃 𝑄) 𝑊)
Assertion
Ref Expression
cdleme0b (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) → 𝑈𝑃)

Proof of Theorem cdleme0b
StepHypRef Expression
1 cdleme0.u . . 3 𝑈 = ((𝑃 𝑄) 𝑊)
2 simp1l 1194 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) → 𝐾 ∈ HL)
32hllatd 39073 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) → 𝐾 ∈ Lat)
4 simp2l 1196 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) → 𝑃𝐴)
5 eqid 2726 . . . . . . 7 (Base‘𝐾) = (Base‘𝐾)
6 cdleme0.a . . . . . . 7 𝐴 = (Atoms‘𝐾)
75, 6atbase 38998 . . . . . 6 (𝑃𝐴𝑃 ∈ (Base‘𝐾))
84, 7syl 17 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) → 𝑃 ∈ (Base‘𝐾))
95, 6atbase 38998 . . . . . 6 (𝑄𝐴𝑄 ∈ (Base‘𝐾))
1093ad2ant3 1132 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) → 𝑄 ∈ (Base‘𝐾))
11 cdleme0.j . . . . . 6 = (join‘𝐾)
125, 11latjcl 18457 . . . . 5 ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ 𝑄 ∈ (Base‘𝐾)) → (𝑃 𝑄) ∈ (Base‘𝐾))
133, 8, 10, 12syl3anc 1368 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) → (𝑃 𝑄) ∈ (Base‘𝐾))
14 simp1r 1195 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) → 𝑊𝐻)
15 cdleme0.h . . . . . 6 𝐻 = (LHyp‘𝐾)
165, 15lhpbase 39708 . . . . 5 (𝑊𝐻𝑊 ∈ (Base‘𝐾))
1714, 16syl 17 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) → 𝑊 ∈ (Base‘𝐾))
18 cdleme0.l . . . . 5 = (le‘𝐾)
19 cdleme0.m . . . . 5 = (meet‘𝐾)
205, 18, 19latmle2 18483 . . . 4 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑊 ∈ (Base‘𝐾)) → ((𝑃 𝑄) 𝑊) 𝑊)
213, 13, 17, 20syl3anc 1368 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) → ((𝑃 𝑄) 𝑊) 𝑊)
221, 21eqbrtrid 5179 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) → 𝑈 𝑊)
23 simp2r 1197 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) → ¬ 𝑃 𝑊)
24 nbrne2 5164 . 2 ((𝑈 𝑊 ∧ ¬ 𝑃 𝑊) → 𝑈𝑃)
2522, 23, 24syl2anc 582 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ 𝑄𝐴) → 𝑈𝑃)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 394  w3a 1084   = wceq 1534  wcel 2099  wne 2930   class class class wbr 5144  cfv 6544  (class class class)co 7414  Basecbs 17206  lecple 17266  joincjn 18329  meetcmee 18330  Latclat 18449  Atomscatm 38972  HLchlt 39059  LHypclh 39694
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-10 2130  ax-11 2147  ax-12 2167  ax-ext 2697  ax-rep 5281  ax-sep 5295  ax-nul 5302  ax-pow 5360  ax-pr 5424  ax-un 7736
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3an 1086  df-tru 1537  df-fal 1547  df-ex 1775  df-nf 1779  df-sb 2061  df-mo 2529  df-eu 2558  df-clab 2704  df-cleq 2718  df-clel 2803  df-nfc 2878  df-ne 2931  df-ral 3052  df-rex 3061  df-rmo 3365  df-reu 3366  df-rab 3421  df-v 3465  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-nul 4324  df-if 4525  df-pw 4600  df-sn 4625  df-pr 4627  df-op 4631  df-uni 4907  df-iun 4996  df-br 5145  df-opab 5207  df-mpt 5228  df-id 5571  df-xp 5679  df-rel 5680  df-cnv 5681  df-co 5682  df-dm 5683  df-rn 5684  df-res 5685  df-ima 5686  df-iota 6496  df-fun 6546  df-fn 6547  df-f 6548  df-f1 6549  df-fo 6550  df-f1o 6551  df-fv 6552  df-riota 7370  df-ov 7417  df-oprab 7418  df-lub 18364  df-glb 18365  df-join 18366  df-meet 18367  df-lat 18450  df-ats 38976  df-atl 39007  df-cvlat 39031  df-hlat 39060  df-lhyp 39698
This theorem is referenced by:  cdleme11c  39971
  Copyright terms: Public domain W3C validator