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

Theorem dalem25 40190
Description: Lemma for dath 40228. Show that the dummy center of perspectivity 𝑐 is different from auxiliary atom 𝐺. (Contributed by NM, 3-Aug-2012.)
Hypotheses
Ref Expression
dalem.ph (𝜑 ↔ (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (𝑌𝑂𝑍𝑂) ∧ ((¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (𝐶 (𝑃 𝑆) ∧ 𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈)))))
dalem.l = (le‘𝐾)
dalem.j = (join‘𝐾)
dalem.a 𝐴 = (Atoms‘𝐾)
dalem.ps (𝜓 ↔ ((𝑐𝐴𝑑𝐴) ∧ ¬ 𝑐 𝑌 ∧ (𝑑𝑐 ∧ ¬ 𝑑 𝑌𝐶 (𝑐 𝑑))))
dalem23.m = (meet‘𝐾)
dalem23.o 𝑂 = (LPlanes‘𝐾)
dalem23.y 𝑌 = ((𝑃 𝑄) 𝑅)
dalem23.z 𝑍 = ((𝑆 𝑇) 𝑈)
dalem23.g 𝐺 = ((𝑐 𝑃) (𝑑 𝑆))
Assertion
Ref Expression
dalem25 ((𝜑𝑌 = 𝑍𝜓) → 𝑐𝐺)

Proof of Theorem dalem25
StepHypRef Expression
1 dalem.ph . . . 4 (𝜑 ↔ (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃𝐴𝑄𝐴𝑅𝐴) ∧ (𝑆𝐴𝑇𝐴𝑈𝐴)) ∧ (𝑌𝑂𝑍𝑂) ∧ ((¬ 𝐶 (𝑃 𝑄) ∧ ¬ 𝐶 (𝑄 𝑅) ∧ ¬ 𝐶 (𝑅 𝑃)) ∧ (¬ 𝐶 (𝑆 𝑇) ∧ ¬ 𝐶 (𝑇 𝑈) ∧ ¬ 𝐶 (𝑈 𝑆)) ∧ (𝐶 (𝑃 𝑆) ∧ 𝐶 (𝑄 𝑇) ∧ 𝐶 (𝑅 𝑈)))))
2 dalem.l . . . 4 = (le‘𝐾)
3 dalem.j . . . 4 = (join‘𝐾)
4 dalem.a . . . 4 𝐴 = (Atoms‘𝐾)
51, 2, 3, 4dalemcnes 40142 . . 3 (𝜑𝐶𝑆)
653ad2ant1 1139 . 2 ((𝜑𝑌 = 𝑍𝜓) → 𝐶𝑆)
7 dalem.ps . . . . . . . . . . 11 (𝜓 ↔ ((𝑐𝐴𝑑𝐴) ∧ ¬ 𝑐 𝑌 ∧ (𝑑𝑐 ∧ ¬ 𝑑 𝑌𝐶 (𝑐 𝑑))))
87dalemclccjdd 40180 . . . . . . . . . 10 (𝜓𝐶 (𝑐 𝑑))
983ad2ant3 1141 . . . . . . . . 9 ((𝜑𝑌 = 𝑍𝜓) → 𝐶 (𝑐 𝑑))
109adantr 481 . . . . . . . 8 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝐶 (𝑐 𝑑))
11 simpr 485 . . . . . . . . . 10 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝑐 = 𝐺)
12 dalem23.g . . . . . . . . . . . . 13 𝐺 = ((𝑐 𝑃) (𝑑 𝑆))
131dalemkelat 40116 . . . . . . . . . . . . . . 15 (𝜑𝐾 ∈ Lat)
14133ad2ant1 1139 . . . . . . . . . . . . . 14 ((𝜑𝑌 = 𝑍𝜓) → 𝐾 ∈ Lat)
151dalemkehl 40115 . . . . . . . . . . . . . . . 16 (𝜑𝐾 ∈ HL)
16153ad2ant1 1139 . . . . . . . . . . . . . . 15 ((𝜑𝑌 = 𝑍𝜓) → 𝐾 ∈ HL)
177dalemccea 40175 . . . . . . . . . . . . . . . 16 (𝜓𝑐𝐴)
18173ad2ant3 1141 . . . . . . . . . . . . . . 15 ((𝜑𝑌 = 𝑍𝜓) → 𝑐𝐴)
191dalempea 40118 . . . . . . . . . . . . . . . 16 (𝜑𝑃𝐴)
20193ad2ant1 1139 . . . . . . . . . . . . . . 15 ((𝜑𝑌 = 𝑍𝜓) → 𝑃𝐴)
21 eqid 2739 . . . . . . . . . . . . . . . 16 (Base‘𝐾) = (Base‘𝐾)
2221, 3, 4hlatjcl 39859 . . . . . . . . . . . . . . 15 ((𝐾 ∈ HL ∧ 𝑐𝐴𝑃𝐴) → (𝑐 𝑃) ∈ (Base‘𝐾))
2316, 18, 20, 22syl3anc 1379 . . . . . . . . . . . . . 14 ((𝜑𝑌 = 𝑍𝜓) → (𝑐 𝑃) ∈ (Base‘𝐾))
247dalemddea 40176 . . . . . . . . . . . . . . . 16 (𝜓𝑑𝐴)
25243ad2ant3 1141 . . . . . . . . . . . . . . 15 ((𝜑𝑌 = 𝑍𝜓) → 𝑑𝐴)
261dalemsea 40121 . . . . . . . . . . . . . . . 16 (𝜑𝑆𝐴)
27263ad2ant1 1139 . . . . . . . . . . . . . . 15 ((𝜑𝑌 = 𝑍𝜓) → 𝑆𝐴)
2821, 3, 4hlatjcl 39859 . . . . . . . . . . . . . . 15 ((𝐾 ∈ HL ∧ 𝑑𝐴𝑆𝐴) → (𝑑 𝑆) ∈ (Base‘𝐾))
2916, 25, 27, 28syl3anc 1379 . . . . . . . . . . . . . 14 ((𝜑𝑌 = 𝑍𝜓) → (𝑑 𝑆) ∈ (Base‘𝐾))
30 dalem23.m . . . . . . . . . . . . . . 15 = (meet‘𝐾)
3121, 2, 30latmle2 18422 . . . . . . . . . . . . . 14 ((𝐾 ∈ Lat ∧ (𝑐 𝑃) ∈ (Base‘𝐾) ∧ (𝑑 𝑆) ∈ (Base‘𝐾)) → ((𝑐 𝑃) (𝑑 𝑆)) (𝑑 𝑆))
3214, 23, 29, 31syl3anc 1379 . . . . . . . . . . . . 13 ((𝜑𝑌 = 𝑍𝜓) → ((𝑐 𝑃) (𝑑 𝑆)) (𝑑 𝑆))
3312, 32eqbrtrid 5107 . . . . . . . . . . . 12 ((𝜑𝑌 = 𝑍𝜓) → 𝐺 (𝑑 𝑆))
343, 4hlatjcom 39860 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ 𝑑𝐴𝑆𝐴) → (𝑑 𝑆) = (𝑆 𝑑))
3516, 25, 27, 34syl3anc 1379 . . . . . . . . . . . 12 ((𝜑𝑌 = 𝑍𝜓) → (𝑑 𝑆) = (𝑆 𝑑))
3633, 35breqtrd 5098 . . . . . . . . . . 11 ((𝜑𝑌 = 𝑍𝜓) → 𝐺 (𝑆 𝑑))
3736adantr 481 . . . . . . . . . 10 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝐺 (𝑆 𝑑))
3811, 37eqbrtrd 5094 . . . . . . . . 9 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝑐 (𝑆 𝑑))
392, 3, 4hlatlej2 39868 . . . . . . . . . . 11 ((𝐾 ∈ HL ∧ 𝑆𝐴𝑑𝐴) → 𝑑 (𝑆 𝑑))
4016, 27, 25, 39syl3anc 1379 . . . . . . . . . 10 ((𝜑𝑌 = 𝑍𝜓) → 𝑑 (𝑆 𝑑))
4140adantr 481 . . . . . . . . 9 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝑑 (𝑆 𝑑))
427, 4dalemcceb 40181 . . . . . . . . . . . 12 (𝜓𝑐 ∈ (Base‘𝐾))
43423ad2ant3 1141 . . . . . . . . . . 11 ((𝜑𝑌 = 𝑍𝜓) → 𝑐 ∈ (Base‘𝐾))
4421, 4atbase 39781 . . . . . . . . . . . . 13 (𝑑𝐴𝑑 ∈ (Base‘𝐾))
4524, 44syl 17 . . . . . . . . . . . 12 (𝜓𝑑 ∈ (Base‘𝐾))
46453ad2ant3 1141 . . . . . . . . . . 11 ((𝜑𝑌 = 𝑍𝜓) → 𝑑 ∈ (Base‘𝐾))
4721, 3, 4hlatjcl 39859 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ 𝑆𝐴𝑑𝐴) → (𝑆 𝑑) ∈ (Base‘𝐾))
4816, 27, 25, 47syl3anc 1379 . . . . . . . . . . 11 ((𝜑𝑌 = 𝑍𝜓) → (𝑆 𝑑) ∈ (Base‘𝐾))
4921, 2, 3latjle12 18407 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (𝑐 ∈ (Base‘𝐾) ∧ 𝑑 ∈ (Base‘𝐾) ∧ (𝑆 𝑑) ∈ (Base‘𝐾))) → ((𝑐 (𝑆 𝑑) ∧ 𝑑 (𝑆 𝑑)) ↔ (𝑐 𝑑) (𝑆 𝑑)))
5014, 43, 46, 48, 49syl13anc 1380 . . . . . . . . . 10 ((𝜑𝑌 = 𝑍𝜓) → ((𝑐 (𝑆 𝑑) ∧ 𝑑 (𝑆 𝑑)) ↔ (𝑐 𝑑) (𝑆 𝑑)))
5150adantr 481 . . . . . . . . 9 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → ((𝑐 (𝑆 𝑑) ∧ 𝑑 (𝑆 𝑑)) ↔ (𝑐 𝑑) (𝑆 𝑑)))
5238, 41, 51mpbi2and 718 . . . . . . . 8 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → (𝑐 𝑑) (𝑆 𝑑))
531, 4dalemceb 40130 . . . . . . . . . . 11 (𝜑𝐶 ∈ (Base‘𝐾))
54533ad2ant1 1139 . . . . . . . . . 10 ((𝜑𝑌 = 𝑍𝜓) → 𝐶 ∈ (Base‘𝐾))
5521, 3, 4hlatjcl 39859 . . . . . . . . . . 11 ((𝐾 ∈ HL ∧ 𝑐𝐴𝑑𝐴) → (𝑐 𝑑) ∈ (Base‘𝐾))
5616, 18, 25, 55syl3anc 1379 . . . . . . . . . 10 ((𝜑𝑌 = 𝑍𝜓) → (𝑐 𝑑) ∈ (Base‘𝐾))
5721, 2lattr 18401 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ (𝐶 ∈ (Base‘𝐾) ∧ (𝑐 𝑑) ∈ (Base‘𝐾) ∧ (𝑆 𝑑) ∈ (Base‘𝐾))) → ((𝐶 (𝑐 𝑑) ∧ (𝑐 𝑑) (𝑆 𝑑)) → 𝐶 (𝑆 𝑑)))
5814, 54, 56, 48, 57syl13anc 1380 . . . . . . . . 9 ((𝜑𝑌 = 𝑍𝜓) → ((𝐶 (𝑐 𝑑) ∧ (𝑐 𝑑) (𝑆 𝑑)) → 𝐶 (𝑆 𝑑)))
5958adantr 481 . . . . . . . 8 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → ((𝐶 (𝑐 𝑑) ∧ (𝑐 𝑑) (𝑆 𝑑)) → 𝐶 (𝑆 𝑑)))
6010, 52, 59mp2and 705 . . . . . . 7 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝐶 (𝑆 𝑑))
61 dalem23.o . . . . . . . . . . 11 𝑂 = (LPlanes‘𝐾)
621, 61dalemyeb 40141 . . . . . . . . . 10 (𝜑𝑌 ∈ (Base‘𝐾))
63623ad2ant1 1139 . . . . . . . . 9 ((𝜑𝑌 = 𝑍𝜓) → 𝑌 ∈ (Base‘𝐾))
6421, 2, 30latmlem1 18426 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ (𝐶 ∈ (Base‘𝐾) ∧ (𝑆 𝑑) ∈ (Base‘𝐾) ∧ 𝑌 ∈ (Base‘𝐾))) → (𝐶 (𝑆 𝑑) → (𝐶 𝑌) ((𝑆 𝑑) 𝑌)))
6514, 54, 48, 63, 64syl13anc 1380 . . . . . . . 8 ((𝜑𝑌 = 𝑍𝜓) → (𝐶 (𝑆 𝑑) → (𝐶 𝑌) ((𝑆 𝑑) 𝑌)))
6665adantr 481 . . . . . . 7 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → (𝐶 (𝑆 𝑑) → (𝐶 𝑌) ((𝑆 𝑑) 𝑌)))
6760, 66mpd 15 . . . . . 6 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → (𝐶 𝑌) ((𝑆 𝑑) 𝑌))
68 dalem23.y . . . . . . . . . 10 𝑌 = ((𝑃 𝑄) 𝑅)
69 dalem23.z . . . . . . . . . 10 𝑍 = ((𝑆 𝑇) 𝑈)
701, 2, 3, 4, 61, 68, 69dalem17 40172 . . . . . . . . 9 ((𝜑𝑌 = 𝑍) → 𝐶 𝑌)
71703adant3 1138 . . . . . . . 8 ((𝜑𝑌 = 𝑍𝜓) → 𝐶 𝑌)
7221, 2, 30latleeqm1 18424 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ 𝐶 ∈ (Base‘𝐾) ∧ 𝑌 ∈ (Base‘𝐾)) → (𝐶 𝑌 ↔ (𝐶 𝑌) = 𝐶))
7314, 54, 63, 72syl3anc 1379 . . . . . . . 8 ((𝜑𝑌 = 𝑍𝜓) → (𝐶 𝑌 ↔ (𝐶 𝑌) = 𝐶))
7471, 73mpbid 233 . . . . . . 7 ((𝜑𝑌 = 𝑍𝜓) → (𝐶 𝑌) = 𝐶)
7574adantr 481 . . . . . 6 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → (𝐶 𝑌) = 𝐶)
761, 2, 3, 4, 69dalemsly 40147 . . . . . . . . 9 ((𝜑𝑌 = 𝑍) → 𝑆 𝑌)
77763adant3 1138 . . . . . . . 8 ((𝜑𝑌 = 𝑍𝜓) → 𝑆 𝑌)
787dalem-ddly 40178 . . . . . . . . 9 (𝜓 → ¬ 𝑑 𝑌)
79783ad2ant3 1141 . . . . . . . 8 ((𝜑𝑌 = 𝑍𝜓) → ¬ 𝑑 𝑌)
8021, 2, 3, 30, 42atjm 39937 . . . . . . . 8 ((𝐾 ∈ HL ∧ (𝑆𝐴𝑑𝐴𝑌 ∈ (Base‘𝐾)) ∧ (𝑆 𝑌 ∧ ¬ 𝑑 𝑌)) → ((𝑆 𝑑) 𝑌) = 𝑆)
8116, 27, 25, 63, 77, 79, 80syl132anc 1396 . . . . . . 7 ((𝜑𝑌 = 𝑍𝜓) → ((𝑆 𝑑) 𝑌) = 𝑆)
8281adantr 481 . . . . . 6 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → ((𝑆 𝑑) 𝑌) = 𝑆)
8367, 75, 823brtr3d 5103 . . . . 5 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝐶 𝑆)
84 hlatl 39852 . . . . . . . . 9 (𝐾 ∈ HL → 𝐾 ∈ AtLat)
8515, 84syl 17 . . . . . . . 8 (𝜑𝐾 ∈ AtLat)
861, 2, 3, 4, 61, 68dalemcea 40152 . . . . . . . 8 (𝜑𝐶𝐴)
872, 4atcmp 39803 . . . . . . . 8 ((𝐾 ∈ AtLat ∧ 𝐶𝐴𝑆𝐴) → (𝐶 𝑆𝐶 = 𝑆))
8885, 86, 26, 87syl3anc 1379 . . . . . . 7 (𝜑 → (𝐶 𝑆𝐶 = 𝑆))
89883ad2ant1 1139 . . . . . 6 ((𝜑𝑌 = 𝑍𝜓) → (𝐶 𝑆𝐶 = 𝑆))
9089adantr 481 . . . . 5 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → (𝐶 𝑆𝐶 = 𝑆))
9183, 90mpbid 233 . . . 4 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝐶 = 𝑆)
9291ex 413 . . 3 ((𝜑𝑌 = 𝑍𝜓) → (𝑐 = 𝐺𝐶 = 𝑆))
9392necon3d 2955 . 2 ((𝜑𝑌 = 𝑍𝜓) → (𝐶𝑆𝑐𝐺))
946, 93mpd 15 1 ((𝜑𝑌 = 𝑍𝜓) → 𝑐𝐺)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 207  wa 396  w3a 1092   = wceq 1547  wcel 2119  wne 2934   class class class wbr 5072  cfv 6485  (class class class)co 7356  Basecbs 17170  lecple 17218  joincjn 18268  meetcmee 18269  Latclat 18388  Atomscatm 39755  AtLatcal 39756  HLchlt 39842  LPlanesclpl 39984
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2711  ax-rep 5199  ax-sep 5218  ax-nul 5228  ax-pow 5294  ax-pr 5362  ax-un 7678
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2718  df-cleq 2731  df-clel 2814  df-nfc 2888  df-ne 2935  df-ral 3054  df-rex 3064  df-rmo 3344  df-reu 3345  df-rab 3392  df-v 3433  df-sbc 3724  df-csb 3832  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-nul 4262  df-if 4455  df-pw 4531  df-sn 4556  df-pr 4558  df-op 4562  df-uni 4839  df-iun 4923  df-br 5073  df-opab 5135  df-mpt 5154  df-id 5513  df-xp 5624  df-rel 5625  df-cnv 5626  df-co 5627  df-dm 5628  df-rn 5629  df-res 5630  df-ima 5631  df-iota 6441  df-fun 6487  df-fn 6488  df-f 6489  df-f1 6490  df-fo 6491  df-f1o 6492  df-fv 6493  df-riota 7313  df-ov 7359  df-oprab 7360  df-proset 18251  df-poset 18270  df-plt 18285  df-lub 18301  df-glb 18302  df-join 18303  df-meet 18304  df-p0 18380  df-lat 18389  df-clat 18456  df-oposet 39668  df-ol 39670  df-oml 39671  df-covers 39758  df-ats 39759  df-atl 39790  df-cvlat 39814  df-hlat 39843  df-llines 39990  df-lplanes 39991
This theorem is referenced by:  dalem28  40192  dalem31N  40195
  Copyright terms: Public domain W3C validator