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

Theorem cdlemg2m 38180
 Description: TODO: FIX COMMENT. (Contributed by NM, 25-Apr-2013.)
Hypotheses
Ref Expression
cdlemg2inv.h 𝐻 = (LHyp‘𝐾)
cdlemg2inv.t 𝑇 = ((LTrn‘𝐾)‘𝑊)
cdlemg2j.l = (le‘𝐾)
cdlemg2j.j = (join‘𝐾)
cdlemg2j.a 𝐴 = (Atoms‘𝐾)
cdlemg2j.m = (meet‘𝐾)
cdlemg2j.u 𝑈 = ((𝑃 𝑄) 𝑊)
Assertion
Ref Expression
cdlemg2m (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → (((𝐹𝑃) (𝐹𝑄)) 𝑊) = 𝑈)

Proof of Theorem cdlemg2m
StepHypRef Expression
1 cdlemg2inv.h . . . 4 𝐻 = (LHyp‘𝐾)
2 cdlemg2inv.t . . . 4 𝑇 = ((LTrn‘𝐾)‘𝑊)
3 cdlemg2j.l . . . 4 = (le‘𝐾)
4 cdlemg2j.j . . . 4 = (join‘𝐾)
5 cdlemg2j.a . . . 4 𝐴 = (Atoms‘𝐾)
6 cdlemg2j.m . . . 4 = (meet‘𝐾)
7 cdlemg2j.u . . . 4 𝑈 = ((𝑃 𝑄) 𝑊)
81, 2, 3, 4, 5, 6, 7cdlemg2k 38177 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → ((𝐹𝑃) (𝐹𝑄)) = ((𝐹𝑃) 𝑈))
98oveq1d 7165 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → (((𝐹𝑃) (𝐹𝑄)) 𝑊) = (((𝐹𝑃) 𝑈) 𝑊))
10 simp1 1133 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → (𝐾 ∈ HL ∧ 𝑊𝐻))
11 simp3 1135 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → 𝐹𝑇)
12 simp2l 1196 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
13 eqid 2758 . . . . . 6 (0.‘𝐾) = (0.‘𝐾)
143, 6, 13, 5, 1, 2ltrnmw 37727 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) → ((𝐹𝑃) 𝑊) = (0.‘𝐾))
1510, 11, 12, 14syl3anc 1368 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → ((𝐹𝑃) 𝑊) = (0.‘𝐾))
1615oveq1d 7165 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → (((𝐹𝑃) 𝑊) 𝑈) = ((0.‘𝐾) 𝑈))
17 simp1l 1194 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → 𝐾 ∈ HL)
183, 5, 1, 2ltrnel 37715 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) → ((𝐹𝑃) ∈ 𝐴 ∧ ¬ (𝐹𝑃) 𝑊))
1910, 11, 12, 18syl3anc 1368 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → ((𝐹𝑃) ∈ 𝐴 ∧ ¬ (𝐹𝑃) 𝑊))
2019simpld 498 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → (𝐹𝑃) ∈ 𝐴)
21 simp1r 1195 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → 𝑊𝐻)
22 simp2ll 1237 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → 𝑃𝐴)
23 simp2rl 1239 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → 𝑄𝐴)
24 eqid 2758 . . . . . 6 (Base‘𝐾) = (Base‘𝐾)
253, 4, 6, 5, 1, 7, 24cdleme0aa 37786 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑃𝐴𝑄𝐴) → 𝑈 ∈ (Base‘𝐾))
2617, 21, 22, 23, 25syl211anc 1373 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → 𝑈 ∈ (Base‘𝐾))
2724, 1lhpbase 37574 . . . . 5 (𝑊𝐻𝑊 ∈ (Base‘𝐾))
2821, 27syl 17 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → 𝑊 ∈ (Base‘𝐾))
2917hllatd 36940 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → 𝐾 ∈ Lat)
3024, 4, 5hlatjcl 36943 . . . . . . 7 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → (𝑃 𝑄) ∈ (Base‘𝐾))
3117, 22, 23, 30syl3anc 1368 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → (𝑃 𝑄) ∈ (Base‘𝐾))
3224, 3, 6latmle2 17753 . . . . . 6 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ 𝑊 ∈ (Base‘𝐾)) → ((𝑃 𝑄) 𝑊) 𝑊)
3329, 31, 28, 32syl3anc 1368 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → ((𝑃 𝑄) 𝑊) 𝑊)
347, 33eqbrtrid 5067 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → 𝑈 𝑊)
3524, 3, 4, 6, 5atmod4i2 37443 . . . 4 ((𝐾 ∈ HL ∧ ((𝐹𝑃) ∈ 𝐴𝑈 ∈ (Base‘𝐾) ∧ 𝑊 ∈ (Base‘𝐾)) ∧ 𝑈 𝑊) → (((𝐹𝑃) 𝑊) 𝑈) = (((𝐹𝑃) 𝑈) 𝑊))
3617, 20, 26, 28, 34, 35syl131anc 1380 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → (((𝐹𝑃) 𝑊) 𝑈) = (((𝐹𝑃) 𝑈) 𝑊))
37 hlol 36937 . . . . 5 (𝐾 ∈ HL → 𝐾 ∈ OL)
3817, 37syl 17 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → 𝐾 ∈ OL)
3924, 4, 13olj02 36802 . . . 4 ((𝐾 ∈ OL ∧ 𝑈 ∈ (Base‘𝐾)) → ((0.‘𝐾) 𝑈) = 𝑈)
4038, 26, 39syl2anc 587 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → ((0.‘𝐾) 𝑈) = 𝑈)
4116, 36, 403eqtr3d 2801 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → (((𝐹𝑃) 𝑈) 𝑊) = 𝑈)
429, 41eqtrd 2793 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝐹𝑇) → (((𝐹𝑃) (𝐹𝑄)) 𝑊) = 𝑈)
 Colors of variables: wff setvar class Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 399   ∧ w3a 1084   = wceq 1538   ∈ wcel 2111   class class class wbr 5032  ‘cfv 6335  (class class class)co 7150  Basecbs 16541  lecple 16630  joincjn 17620  meetcmee 17621  0.cp0 17713  Latclat 17721  OLcol 36750  Atomscatm 36839  HLchlt 36926  LHypclh 37560  LTrncltrn 37677 This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2158  ax-12 2175  ax-ext 2729  ax-rep 5156  ax-sep 5169  ax-nul 5176  ax-pow 5234  ax-pr 5298  ax-un 7459  ax-riotaBAD 36529 This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3or 1085  df-3an 1086  df-tru 1541  df-fal 1551  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2557  df-eu 2588  df-clab 2736  df-cleq 2750  df-clel 2830  df-nfc 2901  df-ne 2952  df-ral 3075  df-rex 3076  df-reu 3077  df-rmo 3078  df-rab 3079  df-v 3411  df-sbc 3697  df-csb 3806  df-dif 3861  df-un 3863  df-in 3865  df-ss 3875  df-nul 4226  df-if 4421  df-pw 4496  df-sn 4523  df-pr 4525  df-op 4529  df-uni 4799  df-iun 4885  df-iin 4886  df-br 5033  df-opab 5095  df-mpt 5113  df-id 5430  df-xp 5530  df-rel 5531  df-cnv 5532  df-co 5533  df-dm 5534  df-rn 5535  df-res 5536  df-ima 5537  df-iota 6294  df-fun 6337  df-fn 6338  df-f 6339  df-f1 6340  df-fo 6341  df-f1o 6342  df-fv 6343  df-riota 7108  df-ov 7153  df-oprab 7154  df-mpo 7155  df-1st 7693  df-2nd 7694  df-undef 7949  df-map 8418  df-proset 17604  df-poset 17622  df-plt 17634  df-lub 17650  df-glb 17651  df-join 17652  df-meet 17653  df-p0 17715  df-p1 17716  df-lat 17722  df-clat 17784  df-oposet 36752  df-ol 36754  df-oml 36755  df-covers 36842  df-ats 36843  df-atl 36874  df-cvlat 36898  df-hlat 36927  df-llines 37074  df-lplanes 37075  df-lvols 37076  df-lines 37077  df-psubsp 37079  df-pmap 37080  df-padd 37372  df-lhyp 37564  df-laut 37565  df-ldil 37680  df-ltrn 37681  df-trl 37735 This theorem is referenced by:  cdlemg4f  38191  cdlemg10b  38211
 Copyright terms: Public domain W3C validator