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

Theorem dalem4 37429
Description: Lemma for dalemdnee 37430. (Contributed by NM, 10-Aug-2012.)
Hypotheses
Ref Expression
dalema.ph (𝜑 ↔ (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (𝑌𝑂𝑍𝑂) ∧ ((¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (𝐶 (𝑃 𝑆) ∧ 𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈)))))
dalemc.l = (le‘𝐾)
dalemc.j = (join‘𝐾)
dalemc.a 𝐴 = (Atoms‘𝐾)
dalem3.m = (meet‘𝐾)
dalem3.o 𝑂 = (LPlanes‘𝐾)
dalem3.y 𝑌 = ((𝑃 𝑄) 𝑅)
dalem3.z 𝑍 = ((𝑆 𝑇) 𝑈)
dalem3.d 𝐷 = ((𝑃 𝑄) (𝑆 𝑇))
dalem3.e 𝐸 = ((𝑄 𝑅) (𝑇 𝑈))
Assertion
Ref Expression
dalem4 ((𝜑𝐷𝑇) → 𝐷𝐸)

Proof of Theorem dalem4
StepHypRef Expression
1 dalema.ph . . . . 5 (𝜑 ↔ (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (𝑌𝑂𝑍𝑂) ∧ ((¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (𝐶 (𝑃 𝑆) ∧ 𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈)))))
2 dalemc.l . . . . 5 = (le‘𝐾)
3 dalemc.j . . . . 5 = (join‘𝐾)
4 dalemc.a . . . . 5 𝐴 = (Atoms‘𝐾)
51, 2, 3, 4dalemswapyz 37420 . . . 4 (𝜑 → (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴)) ∧ (𝑍𝑂𝑌𝑂) ∧ ((¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (𝐶 (𝑆 𝑃) ∧ 𝐶 (𝑇 𝑄) ∧ 𝐶 (𝑈 𝑅)))))
65adantr 484 . . 3 ((𝜑𝐷𝑇) → (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴)) ∧ (𝑍𝑂𝑌𝑂) ∧ ((¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (𝐶 (𝑆 𝑃) ∧ 𝐶 (𝑇 𝑄) ∧ 𝐶 (𝑈 𝑅)))))
7 dalem3.d . . . . . 6 𝐷 = ((𝑃 𝑄) (𝑆 𝑇))
81dalemkelat 37388 . . . . . . 7 (𝜑𝐾 ∈ Lat)
91, 3, 4dalempjqeb 37409 . . . . . . 7 (𝜑 → (𝑃 𝑄) ∈ (Base‘𝐾))
101, 3, 4dalemsjteb 37410 . . . . . . 7 (𝜑 → (𝑆 𝑇) ∈ (Base‘𝐾))
11 eqid 2738 . . . . . . . 8 (Base‘𝐾) = (Base‘𝐾)
12 dalem3.m . . . . . . . 8 = (meet‘𝐾)
1311, 12latmcom 17982 . . . . . . 7 ((𝐾 ∈ Lat ∧ (𝑃 𝑄) ∈ (Base‘𝐾) ∧ (𝑆 𝑇) ∈ (Base‘𝐾)) → ((𝑃 𝑄) (𝑆 𝑇)) = ((𝑆 𝑇) (𝑃 𝑄)))
148, 9, 10, 13syl3anc 1373 . . . . . 6 (𝜑 → ((𝑃 𝑄) (𝑆 𝑇)) = ((𝑆 𝑇) (𝑃 𝑄)))
157, 14syl5eq 2791 . . . . 5 (𝜑𝐷 = ((𝑆 𝑇) (𝑃 𝑄)))
1615neeq1d 3001 . . . 4 (𝜑 → (𝐷𝑇 ↔ ((𝑆 𝑇) (𝑃 𝑄)) ≠ 𝑇))
1716biimpa 480 . . 3 ((𝜑𝐷𝑇) → ((𝑆 𝑇) (𝑃 𝑄)) ≠ 𝑇)
18 biid 264 . . . 4 ((((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴)) ∧ (𝑍𝑂𝑌𝑂) ∧ ((¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (𝐶 (𝑆 𝑃) ∧ 𝐶 (𝑇 𝑄) ∧ 𝐶 (𝑈 𝑅)))) ↔ (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴)) ∧ (𝑍𝑂𝑌𝑂) ∧ ((¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (𝐶 (𝑆 𝑃) ∧ 𝐶 (𝑇 𝑄) ∧ 𝐶 (𝑈 𝑅)))))
19 dalem3.o . . . 4 𝑂 = (LPlanes‘𝐾)
20 dalem3.z . . . 4 𝑍 = ((𝑆 𝑇) 𝑈)
21 dalem3.y . . . 4 𝑌 = ((𝑃 𝑄) 𝑅)
22 eqid 2738 . . . 4 ((𝑆 𝑇) (𝑃 𝑄)) = ((𝑆 𝑇) (𝑃 𝑄))
23 eqid 2738 . . . 4 ((𝑇 𝑈) (𝑄 𝑅)) = ((𝑇 𝑈) (𝑄 𝑅))
2418, 2, 3, 4, 12, 19, 20, 21, 22, 23dalem3 37428 . . 3 (((((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴)) ∧ (𝑍𝑂𝑌𝑂) ∧ ((¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (𝐶 (𝑆 𝑃) ∧ 𝐶 (𝑇 𝑄) ∧ 𝐶 (𝑈 𝑅)))) ∧ ((𝑆 𝑇) (𝑃 𝑄)) ≠ 𝑇) → ((𝑆 𝑇) (𝑃 𝑄)) ≠ ((𝑇 𝑈) (𝑄 𝑅)))
256, 17, 24syl2anc 587 . 2 ((𝜑𝐷𝑇) → ((𝑆 𝑇) (𝑃 𝑄)) ≠ ((𝑇 𝑈) (𝑄 𝑅)))
2615adantr 484 . 2 ((𝜑𝐷𝑇) → 𝐷 = ((𝑆 𝑇) (𝑃 𝑄)))
27 dalem3.e . . . 4 𝐸 = ((𝑄 𝑅) (𝑇 𝑈))
281dalemkehl 37387 . . . . . 6 (𝜑𝐾 ∈ HL)
291dalemqea 37391 . . . . . 6 (𝜑𝑄𝐴)
301dalemrea 37392 . . . . . 6 (𝜑𝑅𝐴)
3111, 3, 4hlatjcl 37131 . . . . . 6 ((𝐾 ∈ HL ∧ 𝑄𝐴𝑅𝐴) → (𝑄 𝑅) ∈ (Base‘𝐾))
3228, 29, 30, 31syl3anc 1373 . . . . 5 (𝜑 → (𝑄 𝑅) ∈ (Base‘𝐾))
331, 3, 4dalemtjueb 37411 . . . . 5 (𝜑 → (𝑇 𝑈) ∈ (Base‘𝐾))
3411, 12latmcom 17982 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑄 𝑅) ∈ (Base‘𝐾) ∧ (𝑇 𝑈) ∈ (Base‘𝐾)) → ((𝑄 𝑅) (𝑇 𝑈)) = ((𝑇 𝑈) (𝑄 𝑅)))
358, 32, 33, 34syl3anc 1373 . . . 4 (𝜑 → ((𝑄 𝑅) (𝑇 𝑈)) = ((𝑇 𝑈) (𝑄 𝑅)))
3627, 35syl5eq 2791 . . 3 (𝜑𝐸 = ((𝑇 𝑈) (𝑄 𝑅)))
3736adantr 484 . 2 ((𝜑𝐷𝑇) → 𝐸 = ((𝑇 𝑈) (𝑄 𝑅)))
3825, 26, 373netr4d 3019 1 ((𝜑𝐷𝑇) → 𝐷𝐸)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 399  w3a 1089   = wceq 1543  wcel 2111  wne 2941   class class class wbr 5062  cfv 6389  (class class class)co 7222  Basecbs 16773  lecple 16822  joincjn 17831  meetcmee 17832  Latclat 17950  Atomscatm 37027  HLchlt 37114  LPlanesclpl 37256
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2016  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2159  ax-12 2176  ax-ext 2709  ax-rep 5188  ax-sep 5201  ax-nul 5208  ax-pow 5267  ax-pr 5331  ax-un 7532
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2072  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2887  df-ne 2942  df-ral 3067  df-rex 3068  df-reu 3069  df-rab 3071  df-v 3417  df-sbc 3704  df-csb 3821  df-dif 3878  df-un 3880  df-in 3882  df-ss 3892  df-nul 4247  df-if 4449  df-pw 4524  df-sn 4551  df-pr 4553  df-op 4557  df-uni 4829  df-iun 4915  df-br 5063  df-opab 5125  df-mpt 5145  df-id 5464  df-xp 5566  df-rel 5567  df-cnv 5568  df-co 5569  df-dm 5570  df-rn 5571  df-res 5572  df-ima 5573  df-iota 6347  df-fun 6391  df-fn 6392  df-f 6393  df-f1 6394  df-fo 6395  df-f1o 6396  df-fv 6397  df-riota 7179  df-ov 7225  df-oprab 7226  df-proset 17815  df-poset 17833  df-plt 17849  df-lub 17865  df-glb 17866  df-join 17867  df-meet 17868  df-p0 17944  df-lat 17951  df-clat 18018  df-oposet 36940  df-ol 36942  df-oml 36943  df-covers 37030  df-ats 37031  df-atl 37062  df-cvlat 37086  df-hlat 37115  df-llines 37262  df-lplanes 37263
This theorem is referenced by:  dalemdnee  37430
  Copyright terms: Public domain W3C validator