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

Theorem dalemrot 37980
Description: Lemma for dath 38059. Rotate triangles 𝑌 = 𝑃𝑄𝑅 and 𝑍 = 𝑆𝑇𝑈 to allow reuse of analogous proofs. (Contributed by NM, 14-Aug-2012.)
Hypotheses
Ref Expression
dalema.ph (𝜑 ↔ (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (𝑌𝑂𝑍𝑂) ∧ ((¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (𝐶 (𝑃 𝑆) ∧ 𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈)))))
dalemc.l = (le‘𝐾)
dalemc.j = (join‘𝐾)
dalemc.a 𝐴 = (Atoms‘𝐾)
dalemrot.y 𝑌 = ((𝑃 𝑄) 𝑅)
dalemrot.z 𝑍 = ((𝑆 𝑇) 𝑈)
Assertion
Ref Expression
dalemrot (𝜑 → (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑄𝐴𝑅𝐴𝑃𝐴) ∧ (𝑇𝐴𝑈𝐴𝑆𝐴)) ∧ (((𝑄 𝑅) 𝑃) ∈ 𝑂 ∧ ((𝑇 𝑈) 𝑆) ∈ 𝑂) ∧ ((¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃) ∧ ¬ 𝐶 (𝑃 𝑄)) ∧ (¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆) ∧ ¬ 𝐶 (𝑆 𝑇)) ∧ (𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈) ∧ 𝐶 (𝑃 𝑆)))))

Proof of Theorem dalemrot
StepHypRef Expression
1 dalema.ph . . . . 5 (𝜑 ↔ (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (𝑌𝑂𝑍𝑂) ∧ ((¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (𝐶 (𝑃 𝑆) ∧ 𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈)))))
21dalemkehl 37946 . . . 4 (𝜑𝐾 ∈ HL)
3 dalemc.a . . . . 5 𝐴 = (Atoms‘𝐾)
41, 3dalemceb 37961 . . . 4 (𝜑𝐶 ∈ (Base‘𝐾))
52, 4jca 513 . . 3 (𝜑 → (𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)))
61dalemqea 37950 . . . 4 (𝜑𝑄𝐴)
71dalemrea 37951 . . . 4 (𝜑𝑅𝐴)
81dalempea 37949 . . . 4 (𝜑𝑃𝐴)
96, 7, 83jca 1128 . . 3 (𝜑 → (𝑄𝐴𝑅𝐴𝑃𝐴))
101dalemtea 37953 . . . 4 (𝜑𝑇𝐴)
111dalemuea 37954 . . . 4 (𝜑𝑈𝐴)
121dalemsea 37952 . . . 4 (𝜑𝑆𝐴)
1310, 11, 123jca 1128 . . 3 (𝜑 → (𝑇𝐴𝑈𝐴𝑆𝐴))
145, 9, 133jca 1128 . 2 (𝜑 → ((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑄𝐴𝑅𝐴𝑃𝐴) ∧ (𝑇𝐴𝑈𝐴𝑆𝐴)))
15 dalemc.j . . . . 5 = (join‘𝐾)
161, 15, 3dalemqrprot 37971 . . . 4 (𝜑 → ((𝑄 𝑅) 𝑃) = ((𝑃 𝑄) 𝑅))
17 dalemrot.y . . . . 5 𝑌 = ((𝑃 𝑄) 𝑅)
181dalemyeo 37955 . . . . 5 (𝜑𝑌𝑂)
1917, 18eqeltrrid 2843 . . . 4 (𝜑 → ((𝑃 𝑄) 𝑅) ∈ 𝑂)
2016, 19eqeltrd 2838 . . 3 (𝜑 → ((𝑄 𝑅) 𝑃) ∈ 𝑂)
2115, 3hlatjrot 37695 . . . . 5 ((𝐾 ∈ HL ∧ (𝑇𝐴𝑈𝐴𝑆𝐴)) → ((𝑇 𝑈) 𝑆) = ((𝑆 𝑇) 𝑈))
222, 10, 11, 12, 21syl13anc 1372 . . . 4 (𝜑 → ((𝑇 𝑈) 𝑆) = ((𝑆 𝑇) 𝑈))
23 dalemrot.z . . . . 5 𝑍 = ((𝑆 𝑇) 𝑈)
241dalemzeo 37956 . . . . 5 (𝜑𝑍𝑂)
2523, 24eqeltrrid 2843 . . . 4 (𝜑 → ((𝑆 𝑇) 𝑈) ∈ 𝑂)
2622, 25eqeltrd 2838 . . 3 (𝜑 → ((𝑇 𝑈) 𝑆) ∈ 𝑂)
2720, 26jca 513 . 2 (𝜑 → (((𝑄 𝑅) 𝑃) ∈ 𝑂 ∧ ((𝑇 𝑈) 𝑆) ∈ 𝑂))
28 simp312 1321 . . . . 5 ((((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (𝑌𝑂𝑍𝑂) ∧ ((¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (𝐶 (𝑃 𝑆) ∧ 𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈)))) → ¬ 𝐶 (𝑄 𝑅))
291, 28sylbi 216 . . . 4 (𝜑 → ¬ 𝐶 (𝑄 𝑅))
30 simp313 1322 . . . . 5 ((((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (𝑌𝑂𝑍𝑂) ∧ ((¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (𝐶 (𝑃 𝑆) ∧ 𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈)))) → ¬ 𝐶 (𝑅 𝑃))
311, 30sylbi 216 . . . 4 (𝜑 → ¬ 𝐶 (𝑅 𝑃))
321dalem-clpjq 37960 . . . 4 (𝜑 → ¬ 𝐶 (𝑃 𝑄))
3329, 31, 323jca 1128 . . 3 (𝜑 → (¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃) ∧ ¬ 𝐶 (𝑃 𝑄)))
34 simp322 1324 . . . . 5 ((((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (𝑌𝑂𝑍𝑂) ∧ ((¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (𝐶 (𝑃 𝑆) ∧ 𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈)))) → ¬ 𝐶 (𝑇 𝑈))
351, 34sylbi 216 . . . 4 (𝜑 → ¬ 𝐶 (𝑇 𝑈))
36 simp323 1325 . . . . 5 ((((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (𝑌𝑂𝑍𝑂) ∧ ((¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (𝐶 (𝑃 𝑆) ∧ 𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈)))) → ¬ 𝐶 (𝑈 𝑆))
371, 36sylbi 216 . . . 4 (𝜑 → ¬ 𝐶 (𝑈 𝑆))
38 simp321 1323 . . . . 5 ((((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (𝑌𝑂𝑍𝑂) ∧ ((¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (𝐶 (𝑃 𝑆) ∧ 𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈)))) → ¬ 𝐶 (𝑆 𝑇))
391, 38sylbi 216 . . . 4 (𝜑 → ¬ 𝐶 (𝑆 𝑇))
4035, 37, 393jca 1128 . . 3 (𝜑 → (¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆) ∧ ¬ 𝐶 (𝑆 𝑇)))
411dalemclqjt 37958 . . . 4 (𝜑𝐶 (𝑄 𝑇))
421dalemclrju 37959 . . . 4 (𝜑𝐶 (𝑅 𝑈))
431dalemclpjs 37957 . . . 4 (𝜑𝐶 (𝑃 𝑆))
4441, 42, 433jca 1128 . . 3 (𝜑 → (𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈) ∧ 𝐶 (𝑃 𝑆)))
4533, 40, 443jca 1128 . 2 (𝜑 → ((¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃) ∧ ¬ 𝐶 (𝑃 𝑄)) ∧ (¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆) ∧ ¬ 𝐶 (𝑆 𝑇)) ∧ (𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈) ∧ 𝐶 (𝑃 𝑆))))
4614, 27, 453jca 1128 1 (𝜑 → (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑄𝐴𝑅𝐴𝑃𝐴) ∧ (𝑇𝐴𝑈𝐴𝑆𝐴)) ∧ (((𝑄 𝑅) 𝑃) ∈ 𝑂 ∧ ((𝑇 𝑈) 𝑆) ∈ 𝑂) ∧ ((¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃) ∧ ¬ 𝐶 (𝑃 𝑄)) ∧ (¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆) ∧ ¬ 𝐶 (𝑆 𝑇)) ∧ (𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈) ∧ 𝐶 (𝑃 𝑆)))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 397  w3a 1087   = wceq 1541  wcel 2106   class class class wbr 5103  cfv 6491  (class class class)co 7349  Basecbs 17017  lecple 17074  joincjn 18134  Atomscatm 37585  HLchlt 37672
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 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2708  ax-rep 5240  ax-sep 5254  ax-nul 5261  ax-pow 5318  ax-pr 5382  ax-un 7662
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2887  df-ne 2942  df-ral 3063  df-rex 3072  df-reu 3352  df-rab 3406  df-v 3445  df-sbc 3738  df-csb 3854  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-nul 4281  df-if 4485  df-pw 4560  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4864  df-iun 4954  df-br 5104  df-opab 5166  df-mpt 5187  df-id 5528  df-xp 5636  df-rel 5637  df-cnv 5638  df-co 5639  df-dm 5640  df-rn 5641  df-res 5642  df-ima 5643  df-iota 6443  df-fun 6493  df-fn 6494  df-f 6495  df-f1 6496  df-fo 6497  df-f1o 6498  df-fv 6499  df-riota 7305  df-ov 7352  df-oprab 7353  df-proset 18118  df-poset 18136  df-lub 18169  df-glb 18170  df-join 18171  df-meet 18172  df-lat 18255  df-ats 37589  df-atl 37620  df-cvlat 37644  df-hlat 37673
This theorem is referenced by:  dalemeea  37986  dalem6  37991  dalem7  37992  dalem11  37997  dalem12  37998  dalem29  38024  dalem30  38025  dalem31N  38026  dalem32  38027  dalem33  38028  dalem34  38029  dalem35  38030  dalem36  38031  dalem37  38032  dalem40  38035  dalem46  38041  dalem47  38042  dalem49  38044  dalem50  38045  dalem58  38053  dalem59  38054
  Copyright terms: Public domain W3C validator