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

Theorem 4atexlemnclw 40504
Description: Lemma for 4atexlem7 40509. (Contributed by NM, 24-Nov-2012.)
Hypotheses
Ref Expression
4thatlem.ph (𝜑 ↔ (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑆𝐴 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊 ∧ (𝑃 𝑅) = (𝑄 𝑅)) ∧ (𝑇𝐴 ∧ (𝑈 𝑇) = (𝑉 𝑇))) ∧ (𝑃𝑄 ∧ ¬ 𝑆 (𝑃 𝑄))))
4thatlem0.l = (le‘𝐾)
4thatlem0.j = (join‘𝐾)
4thatlem0.m = (meet‘𝐾)
4thatlem0.a 𝐴 = (Atoms‘𝐾)
4thatlem0.h 𝐻 = (LHyp‘𝐾)
4thatlem0.u 𝑈 = ((𝑃 𝑄) 𝑊)
4thatlem0.v 𝑉 = ((𝑃 𝑆) 𝑊)
4thatlem0.c 𝐶 = ((𝑄 𝑇) (𝑃 𝑆))
Assertion
Ref Expression
4atexlemnclw (𝜑 → ¬ 𝐶 𝑊)

Proof of Theorem 4atexlemnclw
StepHypRef Expression
1 4thatlem0.c . . . 4 𝐶 = ((𝑄 𝑇) (𝑃 𝑆))
2 4thatlem.ph . . . . . 6 (𝜑 ↔ (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑆𝐴 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊 ∧ (𝑃 𝑅) = (𝑄 𝑅)) ∧ (𝑇𝐴 ∧ (𝑈 𝑇) = (𝑉 𝑇))) ∧ (𝑃𝑄 ∧ ¬ 𝑆 (𝑃 𝑄))))
324atexlemkl 40491 . . . . 5 (𝜑𝐾 ∈ Lat)
4 4thatlem0.j . . . . . 6 = (join‘𝐾)
5 4thatlem0.a . . . . . 6 𝐴 = (Atoms‘𝐾)
62, 4, 54atexlemqtb 40495 . . . . 5 (𝜑 → (𝑄 𝑇) ∈ (Base‘𝐾))
72, 4, 54atexlempsb 40494 . . . . 5 (𝜑 → (𝑃 𝑆) ∈ (Base‘𝐾))
8 eqid 2735 . . . . . 6 (Base‘𝐾) = (Base‘𝐾)
9 4thatlem0.l . . . . . 6 = (le‘𝐾)
10 4thatlem0.m . . . . . 6 = (meet‘𝐾)
118, 9, 10latmle1 18419 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑇))
123, 6, 7, 11syl3anc 1374 . . . 4 (𝜑 → ((𝑄 𝑇) (𝑃 𝑆)) (𝑄 𝑇))
131, 12eqbrtrid 5109 . . 3 (𝜑𝐶 (𝑄 𝑇))
14 simp13r 1291 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝑆𝐴 ∧ (𝑅𝐴 ∧ ¬ 𝑅 𝑊 ∧ (𝑃 𝑅) = (𝑄 𝑅)) ∧ (𝑇𝐴 ∧ (𝑈 𝑇) = (𝑉 𝑇))) ∧ (𝑃𝑄 ∧ ¬ 𝑆 (𝑃 𝑄))) → ¬ 𝑄 𝑊)
152, 14sylbi 217 . . . 4 (𝜑 → ¬ 𝑄 𝑊)
1624atexlemkc 40492 . . . . . 6 (𝜑𝐾 ∈ CvLat)
17 4thatlem0.h . . . . . . 7 𝐻 = (LHyp‘𝐾)
18 4thatlem0.u . . . . . . 7 𝑈 = ((𝑃 𝑄) 𝑊)
19 4thatlem0.v . . . . . . 7 𝑉 = ((𝑃 𝑆) 𝑊)
202, 9, 4, 10, 5, 17, 18, 194atexlemv 40499 . . . . . 6 (𝜑𝑉𝐴)
2124atexlemq 40485 . . . . . 6 (𝜑𝑄𝐴)
2224atexlemt 40487 . . . . . 6 (𝜑𝑇𝐴)
232, 9, 4, 10, 5, 17, 184atexlemu 40498 . . . . . . 7 (𝜑𝑈𝐴)
242, 9, 4, 10, 5, 17, 18, 194atexlemunv 40500 . . . . . . 7 (𝜑𝑈𝑉)
2524atexlemutvt 40488 . . . . . . 7 (𝜑 → (𝑈 𝑇) = (𝑉 𝑇))
265, 4cvlsupr6 39781 . . . . . . . 8 ((𝐾 ∈ CvLat ∧ (𝑈𝐴𝑉𝐴𝑇𝐴) ∧ (𝑈𝑉 ∧ (𝑈 𝑇) = (𝑉 𝑇))) → 𝑇𝑉)
2726necomd 2985 . . . . . . 7 ((𝐾 ∈ CvLat ∧ (𝑈𝐴𝑉𝐴𝑇𝐴) ∧ (𝑈𝑉 ∧ (𝑈 𝑇) = (𝑉 𝑇))) → 𝑉𝑇)
2816, 23, 20, 22, 24, 25, 27syl132anc 1391 . . . . . 6 (𝜑𝑉𝑇)
299, 4, 5cvlatexch2 39771 . . . . . 6 ((𝐾 ∈ CvLat ∧ (𝑉𝐴𝑄𝐴𝑇𝐴) ∧ 𝑉𝑇) → (𝑉 (𝑄 𝑇) → 𝑄 (𝑉 𝑇)))
3016, 20, 21, 22, 28, 29syl131anc 1386 . . . . 5 (𝜑 → (𝑉 (𝑄 𝑇) → 𝑄 (𝑉 𝑇)))
312, 174atexlemwb 40493 . . . . . . . . 9 (𝜑𝑊 ∈ (Base‘𝐾))
328, 9, 10latmle2 18420 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ (𝑃 𝑆) ∈ (Base‘𝐾) ∧ 𝑊 ∈ (Base‘𝐾)) → ((𝑃 𝑆) 𝑊) 𝑊)
333, 7, 31, 32syl3anc 1374 . . . . . . . 8 (𝜑 → ((𝑃 𝑆) 𝑊) 𝑊)
3419, 33eqbrtrid 5109 . . . . . . 7 (𝜑𝑉 𝑊)
352, 9, 4, 10, 5, 17, 18, 194atexlemtlw 40501 . . . . . . 7 (𝜑𝑇 𝑊)
368, 5atbase 39723 . . . . . . . . 9 (𝑉𝐴𝑉 ∈ (Base‘𝐾))
3720, 36syl 17 . . . . . . . 8 (𝜑𝑉 ∈ (Base‘𝐾))
388, 5atbase 39723 . . . . . . . . 9 (𝑇𝐴𝑇 ∈ (Base‘𝐾))
3922, 38syl 17 . . . . . . . 8 (𝜑𝑇 ∈ (Base‘𝐾))
408, 9, 4latjle12 18405 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (𝑉 ∈ (Base‘𝐾) ∧ 𝑇 ∈ (Base‘𝐾) ∧ 𝑊 ∈ (Base‘𝐾))) → ((𝑉 𝑊𝑇 𝑊) ↔ (𝑉 𝑇) 𝑊))
413, 37, 39, 31, 40syl13anc 1375 . . . . . . 7 (𝜑 → ((𝑉 𝑊𝑇 𝑊) ↔ (𝑉 𝑇) 𝑊))
4234, 35, 41mpbi2and 713 . . . . . 6 (𝜑 → (𝑉 𝑇) 𝑊)
438, 5atbase 39723 . . . . . . . 8 (𝑄𝐴𝑄 ∈ (Base‘𝐾))
4421, 43syl 17 . . . . . . 7 (𝜑𝑄 ∈ (Base‘𝐾))
4524atexlemk 40481 . . . . . . . 8 (𝜑𝐾 ∈ HL)
468, 4, 5hlatjcl 39801 . . . . . . . 8 ((𝐾 ∈ HL ∧ 𝑉𝐴𝑇𝐴) → (𝑉 𝑇) ∈ (Base‘𝐾))
4745, 20, 22, 46syl3anc 1374 . . . . . . 7 (𝜑 → (𝑉 𝑇) ∈ (Base‘𝐾))
488, 9lattr 18399 . . . . . . 7 ((𝐾 ∈ Lat ∧ (𝑄 ∈ (Base‘𝐾) ∧ (𝑉 𝑇) ∈ (Base‘𝐾) ∧ 𝑊 ∈ (Base‘𝐾))) → ((𝑄 (𝑉 𝑇) ∧ (𝑉 𝑇) 𝑊) → 𝑄 𝑊))
493, 44, 47, 31, 48syl13anc 1375 . . . . . 6 (𝜑 → ((𝑄 (𝑉 𝑇) ∧ (𝑉 𝑇) 𝑊) → 𝑄 𝑊))
5042, 49mpan2d 695 . . . . 5 (𝜑 → (𝑄 (𝑉 𝑇) → 𝑄 𝑊))
5130, 50syld 47 . . . 4 (𝜑 → (𝑉 (𝑄 𝑇) → 𝑄 𝑊))
5215, 51mtod 198 . . 3 (𝜑 → ¬ 𝑉 (𝑄 𝑇))
53 nbrne2 5094 . . 3 ((𝐶 (𝑄 𝑇) ∧ ¬ 𝑉 (𝑄 𝑇)) → 𝐶𝑉)
5413, 52, 53syl2anc 585 . 2 (𝜑𝐶𝑉)
5524atexlemw 40482 . . . 4 (𝜑𝑊𝐻)
5645, 55jca 511 . . 3 (𝜑 → (𝐾 ∈ HL ∧ 𝑊𝐻))
5724atexlempw 40483 . . 3 (𝜑 → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
5824atexlems 40486 . . 3 (𝜑𝑆𝐴)
592, 9, 4, 10, 5, 17, 18, 19, 14atexlemc 40503 . . 3 (𝜑𝐶𝐴)
602, 9, 4, 54atexlempns 40496 . . 3 (𝜑𝑃𝑆)
618, 9, 10latmle2 18420 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑄 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 𝑆) ∈ (Base‘𝐾)) → ((𝑄 𝑇) (𝑃 𝑆)) (𝑃 𝑆))
623, 6, 7, 61syl3anc 1374 . . . 4 (𝜑 → ((𝑄 𝑇) (𝑃 𝑆)) (𝑃 𝑆))
631, 62eqbrtrid 5109 . . 3 (𝜑𝐶 (𝑃 𝑆))
649, 4, 10, 5, 17, 19lhpat3 40480 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑆𝐴𝐶𝐴) ∧ (𝑃𝑆𝐶 (𝑃 𝑆))) → (¬ 𝐶 𝑊𝐶𝑉))
6556, 57, 58, 59, 60, 63, 64syl222anc 1389 . 2 (𝜑 → (¬ 𝐶 𝑊𝐶𝑉))
6654, 65mpbird 257 1 (𝜑 → ¬ 𝐶 𝑊)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  w3a 1087   = wceq 1542  wcel 2114  wne 2930   class class class wbr 5074  cfv 6487  (class class class)co 7356  Basecbs 17168  lecple 17216  joincjn 18266  meetcmee 18267  Latclat 18386  Atomscatm 39697  CvLatclc 39699  HLchlt 39784  LHypclh 40418
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 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2184  ax-ext 2707  ax-rep 5201  ax-sep 5220  ax-nul 5230  ax-pow 5296  ax-pr 5364  ax-un 7678
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2538  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2810  df-nfc 2884  df-ne 2931  df-ral 3050  df-rex 3060  df-rmo 3340  df-reu 3341  df-rab 3388  df-v 3429  df-sbc 3726  df-csb 3834  df-dif 3888  df-un 3890  df-in 3892  df-ss 3902  df-nul 4264  df-if 4457  df-pw 4533  df-sn 4558  df-pr 4560  df-op 4564  df-uni 4841  df-iun 4925  df-br 5075  df-opab 5137  df-mpt 5156  df-id 5515  df-xp 5626  df-rel 5627  df-cnv 5628  df-co 5629  df-dm 5630  df-rn 5631  df-res 5632  df-ima 5633  df-iota 6443  df-fun 6489  df-fn 6490  df-f 6491  df-f1 6492  df-fo 6493  df-f1o 6494  df-fv 6495  df-riota 7313  df-ov 7359  df-oprab 7360  df-proset 18249  df-poset 18268  df-plt 18283  df-lub 18299  df-glb 18300  df-join 18301  df-meet 18302  df-p0 18378  df-p1 18379  df-lat 18387  df-clat 18454  df-oposet 39610  df-ol 39612  df-oml 39613  df-covers 39700  df-ats 39701  df-atl 39732  df-cvlat 39756  df-hlat 39785  df-llines 39932  df-lplanes 39933  df-lhyp 40422
This theorem is referenced by:  4atexlemex2  40505  4atexlemcnd  40506
  Copyright terms: Public domain W3C validator