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

Theorem dalemrotps 37267
Description: Lemma for dath 37312. Rotate triangles 𝑌 = 𝑃𝑄𝑅 and 𝑍 = 𝑆𝑇𝑈 to allow reuse of analogous proofs. (Contributed by NM, 15-Aug-2012.)
Hypotheses
Ref Expression
dalem.ph (𝜑 ↔ (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (𝑌𝑂𝑍𝑂) ∧ ((¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (𝐶 (𝑃 𝑆) ∧ 𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈)))))
dalem.l = (le‘𝐾)
dalem.j = (join‘𝐾)
dalem.a 𝐴 = (Atoms‘𝐾)
dalem.ps (𝜓 ↔ ((𝑐𝐴𝑑𝐴) ∧ ¬ 𝑐 𝑌 ∧ (𝑑𝑐 ∧ ¬ 𝑑 𝑌𝐶 (𝑐 𝑑))))
dalemrotps.y 𝑌 = ((𝑃 𝑄) 𝑅)
Assertion
Ref Expression
dalemrotps ((𝜑𝜓) → ((𝑐𝐴𝑑𝐴) ∧ ¬ 𝑐 ((𝑄 𝑅) 𝑃) ∧ (𝑑𝑐 ∧ ¬ 𝑑 ((𝑄 𝑅) 𝑃) ∧ 𝐶 (𝑐 𝑑))))

Proof of Theorem dalemrotps
StepHypRef Expression
1 dalem.ps . . . . 5 (𝜓 ↔ ((𝑐𝐴𝑑𝐴) ∧ ¬ 𝑐 𝑌 ∧ (𝑑𝑐 ∧ ¬ 𝑑 𝑌𝐶 (𝑐 𝑑))))
21dalemccea 37259 . . . 4 (𝜓𝑐𝐴)
31dalemddea 37260 . . . 4 (𝜓𝑑𝐴)
42, 3jca 515 . . 3 (𝜓 → (𝑐𝐴𝑑𝐴))
54adantl 485 . 2 ((𝜑𝜓) → (𝑐𝐴𝑑𝐴))
61dalem-ccly 37261 . . . 4 (𝜓 → ¬ 𝑐 𝑌)
76adantl 485 . . 3 ((𝜑𝜓) → ¬ 𝑐 𝑌)
8 dalemrotps.y . . . . . 6 𝑌 = ((𝑃 𝑄) 𝑅)
9 dalem.ph . . . . . . 7 (𝜑 ↔ (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (𝑌𝑂𝑍𝑂) ∧ ((¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (𝐶 (𝑃 𝑆) ∧ 𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈)))))
10 dalem.j . . . . . . 7 = (join‘𝐾)
11 dalem.a . . . . . . 7 𝐴 = (Atoms‘𝐾)
129, 10, 11dalemqrprot 37224 . . . . . 6 (𝜑 → ((𝑄 𝑅) 𝑃) = ((𝑃 𝑄) 𝑅))
138, 12eqtr4id 2812 . . . . 5 (𝜑𝑌 = ((𝑄 𝑅) 𝑃))
1413breq2d 5044 . . . 4 (𝜑 → (𝑐 𝑌𝑐 ((𝑄 𝑅) 𝑃)))
1514adantr 484 . . 3 ((𝜑𝜓) → (𝑐 𝑌𝑐 ((𝑄 𝑅) 𝑃)))
167, 15mtbid 327 . 2 ((𝜑𝜓) → ¬ 𝑐 ((𝑄 𝑅) 𝑃))
171dalemccnedd 37263 . . . . 5 (𝜓𝑐𝑑)
1817necomd 3006 . . . 4 (𝜓𝑑𝑐)
1918adantl 485 . . 3 ((𝜑𝜓) → 𝑑𝑐)
201dalem-ddly 37262 . . . . 5 (𝜓 → ¬ 𝑑 𝑌)
2120adantl 485 . . . 4 ((𝜑𝜓) → ¬ 𝑑 𝑌)
2213breq2d 5044 . . . . 5 (𝜑 → (𝑑 𝑌𝑑 ((𝑄 𝑅) 𝑃)))
2322adantr 484 . . . 4 ((𝜑𝜓) → (𝑑 𝑌𝑑 ((𝑄 𝑅) 𝑃)))
2421, 23mtbid 327 . . 3 ((𝜑𝜓) → ¬ 𝑑 ((𝑄 𝑅) 𝑃))
251dalemclccjdd 37264 . . . 4 (𝜓𝐶 (𝑐 𝑑))
2625adantl 485 . . 3 ((𝜑𝜓) → 𝐶 (𝑐 𝑑))
2719, 24, 263jca 1125 . 2 ((𝜑𝜓) → (𝑑𝑐 ∧ ¬ 𝑑 ((𝑄 𝑅) 𝑃) ∧ 𝐶 (𝑐 𝑑)))
285, 16, 273jca 1125 1 ((𝜑𝜓) → ((𝑐𝐴𝑑𝐴) ∧ ¬ 𝑐 ((𝑄 𝑅) 𝑃) ∧ (𝑑𝑐 ∧ ¬ 𝑑 ((𝑄 𝑅) 𝑃) ∧ 𝐶 (𝑐 𝑑))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 399  w3a 1084   = wceq 1538  wcel 2111  wne 2951   class class class wbr 5032  cfv 6335  (class class class)co 7150  Basecbs 16541  lecple 16630  joincjn 17620  Atomscatm 36839  HLchlt 36926
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
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  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-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-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-proset 17604  df-poset 17622  df-lub 17650  df-glb 17651  df-join 17652  df-meet 17653  df-lat 17722  df-ats 36843  df-atl 36874  df-cvlat 36898  df-hlat 36927
This theorem is referenced by:  dalem29  37277  dalem30  37278  dalem31N  37279  dalem32  37280  dalem33  37281  dalem34  37282  dalem35  37283  dalem36  37284  dalem37  37285  dalem40  37288  dalem46  37294  dalem47  37295  dalem49  37297  dalem50  37298  dalem58  37306  dalem59  37307
  Copyright terms: Public domain W3C validator