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

Theorem 4atexlemcnd 41320
Description: Lemma for 4atexlem7 41323. (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 𝐶 = ((𝑄 ∨ 𝑇) ∧ (𝑃 ∨ 𝑆))
4thatlem0.d 𝐷 = ((𝑅 ∨ 𝑇) ∧ (𝑃 ∨ 𝑆))
Assertion
Ref Expression
4atexlemcnd (𝜑 → 𝐶 ≠ 𝐷)

Proof of Theorem 4atexlemcnd
StepHypRef Expression
1 4thatlem.ph . . . 4 (𝜑 ↔ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑆 ∈ 𝐴 ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊 ∧ (𝑃 ∨ 𝑅) = (𝑄 ∨ 𝑅)) ∧ (𝑇 ∈ 𝐴 ∧ (𝑈 ∨ 𝑇) = (𝑉 ∨ 𝑇))) ∧ (𝑃 ≠ 𝑄 ∧ ¬ 𝑆 ≤ (𝑃 ∨ 𝑄))))
2 4thatlem0.l . . . 4 ≤ = (le‘𝐾)
3 4thatlem0.j . . . 4 ∨ = (join‘𝐾)
4 4thatlem0.m . . . 4 ∧ = (meet‘𝐾)
5 4thatlem0.a . . . 4 𝐴 = (Atoms‘𝐾)
6 4thatlem0.h . . . 4 𝐻 = (LHyp‘𝐾)
7 4thatlem0.u . . . 4 𝑈 = ((𝑃 ∨ 𝑄) ∧ 𝑊)
8 4thatlem0.v . . . 4 𝑉 = ((𝑃 ∨ 𝑆) ∧ 𝑊)
91, 2, 3, 4, 5, 6, 7, 84atexlemtlw 41315 . . 3 (𝜑 → 𝑇 ≤ 𝑊)
10 4thatlem0.c . . . 4 𝐶 = ((𝑄 ∨ 𝑇) ∧ (𝑃 ∨ 𝑆))
111, 2, 3, 4, 5, 6, 7, 8, 104atexlemnclw 41318 . . 3 (𝜑 → ¬ 𝐶 ≤ 𝑊)
12 nbrne2 5128 . . 3 ((𝑇 ≤ 𝑊 ∧ ¬ 𝐶 ≤ 𝑊) → 𝑇 ≠ 𝐶)
139, 11, 12syl2anc 596 . 2 (𝜑 → 𝑇 ≠ 𝐶)
1414atexlemk 41295 . . . . . . . . 9 (𝜑 → 𝐾 ∈ HL)
1514atexlemq 41299 . . . . . . . . 9 (𝜑 → 𝑄 ∈ 𝐴)
1614atexlemt 41301 . . . . . . . . 9 (𝜑 → 𝑇 ∈ 𝐴)
173, 5hlatjcom 40616 . . . . . . . . 9 ((𝐾 ∈ HL ∧ 𝑄 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) → (𝑄 ∨ 𝑇) = (𝑇 ∨ 𝑄))
1814, 15, 16, 17syl3anc 1399 . . . . . . . 8 (𝜑 → (𝑄 ∨ 𝑇) = (𝑇 ∨ 𝑄))
19 simp221 1333 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑆 ∈ 𝐴 ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊 ∧ (𝑃 ∨ 𝑅) = (𝑄 ∨ 𝑅)) ∧ (𝑇 ∈ 𝐴 ∧ (𝑈 ∨ 𝑇) = (𝑉 ∨ 𝑇))) ∧ (𝑃 ≠ 𝑄 ∧ ¬ 𝑆 ≤ (𝑃 ∨ 𝑄))) → 𝑅 ∈ 𝐴)
201, 19sylbi 220 . . . . . . . . 9 (𝜑 → 𝑅 ∈ 𝐴)
213, 5hlatjcom 40616 . . . . . . . . 9 ((𝐾 ∈ HL ∧ 𝑅 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) → (𝑅 ∨ 𝑇) = (𝑇 ∨ 𝑅))
2214, 20, 16, 21syl3anc 1399 . . . . . . . 8 (𝜑 → (𝑅 ∨ 𝑇) = (𝑇 ∨ 𝑅))
2318, 22oveq12d 7458 . . . . . . 7 (𝜑 → ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇)) = ((𝑇 ∨ 𝑄) ∧ (𝑇 ∨ 𝑅)))
2414atexlemkc 41306 . . . . . . . . 9 (𝜑 → 𝐾 ∈ CvLat)
2514atexlemp 41298 . . . . . . . . 9 (𝜑 → 𝑃 ∈ 𝐴)
2614atexlempnq 41303 . . . . . . . . 9 (𝜑 → 𝑃 ≠ 𝑄)
27 simp223 1335 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) ∧ (𝑆 ∈ 𝐴 ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊 ∧ (𝑃 ∨ 𝑅) = (𝑄 ∨ 𝑅)) ∧ (𝑇 ∈ 𝐴 ∧ (𝑈 ∨ 𝑇) = (𝑉 ∨ 𝑇))) ∧ (𝑃 ≠ 𝑄 ∧ ¬ 𝑆 ≤ (𝑃 ∨ 𝑄))) → (𝑃 ∨ 𝑅) = (𝑄 ∨ 𝑅))
281, 27sylbi 220 . . . . . . . . 9 (𝜑 → (𝑃 ∨ 𝑅) = (𝑄 ∨ 𝑅))
295, 3cvlsupr6 40595 . . . . . . . . . 10 ((𝐾 ∈ CvLat ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴) ∧ (𝑃 ≠ 𝑄 ∧ (𝑃 ∨ 𝑅) = (𝑄 ∨ 𝑅))) → 𝑅 ≠ 𝑄)
3029necomd 3014 . . . . . . . . 9 ((𝐾 ∈ CvLat ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴) ∧ (𝑃 ≠ 𝑄 ∧ (𝑃 ∨ 𝑅) = (𝑄 ∨ 𝑅))) → 𝑄 ≠ 𝑅)
3124, 25, 15, 20, 26, 28, 30syl132anc 1416 . . . . . . . 8 (𝜑 → 𝑄 ≠ 𝑅)
321, 2, 3, 4, 5, 6, 7, 84atexlemntlpq 41316 . . . . . . . . 9 (𝜑 → ¬ 𝑇 ≤ (𝑃 ∨ 𝑄))
335, 3cvlsupr7 40596 . . . . . . . . . . . 12 ((𝐾 ∈ CvLat ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴) ∧ (𝑃 ≠ 𝑄 ∧ (𝑃 ∨ 𝑅) = (𝑄 ∨ 𝑅))) → (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑄))
3424, 25, 15, 20, 26, 28, 33syl132anc 1416 . . . . . . . . . . 11 (𝜑 → (𝑃 ∨ 𝑄) = (𝑅 ∨ 𝑄))
353, 5hlatjcom 40616 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ 𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴) → (𝑄 ∨ 𝑅) = (𝑅 ∨ 𝑄))
3614, 15, 20, 35syl3anc 1399 . . . . . . . . . . 11 (𝜑 → (𝑄 ∨ 𝑅) = (𝑅 ∨ 𝑄))
3734, 36eqtr4d 2801 . . . . . . . . . 10 (𝜑 → (𝑃 ∨ 𝑄) = (𝑄 ∨ 𝑅))
3837breq2d 5118 . . . . . . . . 9 (𝜑 → (𝑇 ≤ (𝑃 ∨ 𝑄) ↔ 𝑇 ≤ (𝑄 ∨ 𝑅)))
3932, 38mtbid 327 . . . . . . . 8 (𝜑 → ¬ 𝑇 ≤ (𝑄 ∨ 𝑅))
402, 3, 4, 52llnma2 41037 . . . . . . . 8 ((𝐾 ∈ HL ∧ (𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) ∧ (𝑄 ≠ 𝑅 ∧ ¬ 𝑇 ≤ (𝑄 ∨ 𝑅))) → ((𝑇 ∨ 𝑄) ∧ (𝑇 ∨ 𝑅)) = 𝑇)
4114, 15, 20, 16, 31, 39, 40syl132anc 1416 . . . . . . 7 (𝜑 → ((𝑇 ∨ 𝑄) ∧ (𝑇 ∨ 𝑅)) = 𝑇)
4223, 41eqtr2d 2799 . . . . . 6 (𝜑 → 𝑇 = ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇)))
4342adantr 486 . . . . 5 ((𝜑 ∧ 𝐶 = 𝐷) → 𝑇 = ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇)))
4414atexlemkl 41305 . . . . . . . . . 10 (𝜑 → 𝐾 ∈ Lat)
451, 3, 54atexlemqtb 41309 . . . . . . . . . 10 (𝜑 → (𝑄 ∨ 𝑇) ∈ (Base‘𝐾))
461, 3, 54atexlempsb 41308 . . . . . . . . . 10 (𝜑 → (𝑃 ∨ 𝑆) ∈ (Base‘𝐾))
47 eqid 2763 . . . . . . . . . . 11 (Base‘𝐾) = (Base‘𝐾)
4847, 2, 4latmle1 18664 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ (𝑄 ∨ 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 ∨ 𝑆) ∈ (Base‘𝐾)) → ((𝑄 ∨ 𝑇) ∧ (𝑃 ∨ 𝑆)) ≤ (𝑄 ∨ 𝑇))
4944, 45, 46, 48syl3anc 1399 . . . . . . . . 9 (𝜑 → ((𝑄 ∨ 𝑇) ∧ (𝑃 ∨ 𝑆)) ≤ (𝑄 ∨ 𝑇))
5010, 49eqbrtrid 5143 . . . . . . . 8 (𝜑 → 𝐶 ≤ (𝑄 ∨ 𝑇))
5150adantr 486 . . . . . . 7 ((𝜑 ∧ 𝐶 = 𝐷) → 𝐶 ≤ (𝑄 ∨ 𝑇))
52 simpr 490 . . . . . . . 8 ((𝜑 ∧ 𝐶 = 𝐷) → 𝐶 = 𝐷)
53 4thatlem0.d . . . . . . . . . 10 𝐷 = ((𝑅 ∨ 𝑇) ∧ (𝑃 ∨ 𝑆))
5447, 3, 5hlatjcl 40615 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ 𝑅 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) → (𝑅 ∨ 𝑇) ∈ (Base‘𝐾))
5514, 20, 16, 54syl3anc 1399 . . . . . . . . . . 11 (𝜑 → (𝑅 ∨ 𝑇) ∈ (Base‘𝐾))
5647, 2, 4latmle1 18664 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (𝑅 ∨ 𝑇) ∈ (Base‘𝐾) ∧ (𝑃 ∨ 𝑆) ∈ (Base‘𝐾)) → ((𝑅 ∨ 𝑇) ∧ (𝑃 ∨ 𝑆)) ≤ (𝑅 ∨ 𝑇))
5744, 55, 46, 56syl3anc 1399 . . . . . . . . . 10 (𝜑 → ((𝑅 ∨ 𝑇) ∧ (𝑃 ∨ 𝑆)) ≤ (𝑅 ∨ 𝑇))
5853, 57eqbrtrid 5143 . . . . . . . . 9 (𝜑 → 𝐷 ≤ (𝑅 ∨ 𝑇))
5958adantr 486 . . . . . . . 8 ((𝜑 ∧ 𝐶 = 𝐷) → 𝐷 ≤ (𝑅 ∨ 𝑇))
6052, 59eqbrtrd 5130 . . . . . . 7 ((𝜑 ∧ 𝐶 = 𝐷) → 𝐶 ≤ (𝑅 ∨ 𝑇))
611, 2, 3, 4, 5, 6, 7, 8, 104atexlemc 41317 . . . . . . . . . 10 (𝜑 → 𝐶 ∈ 𝐴)
6247, 5atbase 40537 . . . . . . . . . 10 (𝐶 ∈ 𝐴 → 𝐶 ∈ (Base‘𝐾))
6361, 62syl 18 . . . . . . . . 9 (𝜑 → 𝐶 ∈ (Base‘𝐾))
6447, 2, 4latlem12 18666 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ (𝐶 ∈ (Base‘𝐾) ∧ (𝑄 ∨ 𝑇) ∈ (Base‘𝐾) ∧ (𝑅 ∨ 𝑇) ∈ (Base‘𝐾))) → ((𝐶 ≤ (𝑄 ∨ 𝑇) ∧ 𝐶 ≤ (𝑅 ∨ 𝑇)) ↔ 𝐶 ≤ ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇))))
6544, 63, 45, 55, 64syl13anc 1400 . . . . . . . 8 (𝜑 → ((𝐶 ≤ (𝑄 ∨ 𝑇) ∧ 𝐶 ≤ (𝑅 ∨ 𝑇)) ↔ 𝐶 ≤ ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇))))
6665adantr 486 . . . . . . 7 ((𝜑 ∧ 𝐶 = 𝐷) → ((𝐶 ≤ (𝑄 ∨ 𝑇) ∧ 𝐶 ≤ (𝑅 ∨ 𝑇)) ↔ 𝐶 ≤ ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇))))
6751, 60, 66mpbi2and 725 . . . . . 6 ((𝜑 ∧ 𝐶 = 𝐷) → 𝐶 ≤ ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇)))
68 hlatl 40608 . . . . . . . . 9 (𝐾 ∈ HL → 𝐾 ∈ AtLat)
6914, 68syl 18 . . . . . . . 8 (𝜑 → 𝐾 ∈ AtLat)
7042, 16eqeltrrd 2865 . . . . . . . 8 (𝜑 → ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇)) ∈ 𝐴)
712, 5atcmp 40559 . . . . . . . 8 ((𝐾 ∈ AtLat ∧ 𝐶 ∈ 𝐴 ∧ ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇)) ∈ 𝐴) → (𝐶 ≤ ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇)) ↔ 𝐶 = ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇))))
7269, 61, 70, 71syl3anc 1399 . . . . . . 7 (𝜑 → (𝐶 ≤ ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇)) ↔ 𝐶 = ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇))))
7372adantr 486 . . . . . 6 ((𝜑 ∧ 𝐶 = 𝐷) → (𝐶 ≤ ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇)) ↔ 𝐶 = ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇))))
7467, 73mpbid 235 . . . . 5 ((𝜑 ∧ 𝐶 = 𝐷) → 𝐶 = ((𝑄 ∨ 𝑇) ∧ (𝑅 ∨ 𝑇)))
7543, 74eqtr4d 2801 . . . 4 ((𝜑 ∧ 𝐶 = 𝐷) → 𝑇 = 𝐶)
7675ex 418 . . 3 (𝜑 → (𝐶 = 𝐷 → 𝑇 = 𝐶))
7776necon3d 2980 . 2 (𝜑 → (𝑇 ≠ 𝐶 → 𝐶 ≠ 𝐷))
7813, 77mpd 16 1 (𝜑 → 𝐶 ≠ 𝐷)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2147   ≠ wne 2959   class class class wbr 5106  ‘cfv 6555  (class class class)co 7440  Basecbs 17413  lecple 17461  joincjn 18511  meetcmee 18512  Latclat 18631  Atomscatm 40511  AtLatcal 40512  CvLatclc 40513  HLchlt 40598  LHypclh 41232
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5235  ax-sep 5252  ax-nul 5263  ax-pow 5331  ax-pr 5395  ax-un 7772
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4839  df-uni 4871  df-iun 4956  df-br 5107  df-opab 5171  df-mpt 5190  df-id 5550  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-iota 6509  df-fun 6557  df-fn 6558  df-f 6559  df-f1 6560  df-fo 6561  df-f1o 6562  df-fv 6563  df-riota 7397  df-ov 7443  df-oprab 7444  df-proset 18494  df-poset 18513  df-plt 18528  df-lub 18544  df-glb 18545  df-join 18546  df-meet 18547  df-p0 18623  df-p1 18624  df-lat 18632  df-clat 18699  df-oposet 40424  df-ol 40426  df-oml 40427  df-covers 40514  df-ats 40515  df-atl 40546  df-cvlat 40570  df-hlat 40599  df-llines 40746  df-lplanes 40747  df-lhyp 41236
This theorem is used by:  4atexlemex4  41321
  Copyright terms: Public domain W3C validator