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 40572
Description: Lemma for dath 40610. 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 40524 . . 3 (𝜑𝐶𝑆)
653ad2ant1 1151 . 2 ((𝜑𝑌 = 𝑍𝜓) → 𝐶𝑆)
7 dalem.ps . . . . . . . . . . 11 (𝜓 ↔ ((𝑐𝐴𝑑𝐴) ∧ ¬ 𝑐 𝑌 ∧ (𝑑𝑐 ∧ ¬ 𝑑 𝑌𝐶 (𝑐 𝑑))))
87dalemclccjdd 40562 . . . . . . . . . 10 (𝜓𝐶 (𝑐 𝑑))
983ad2ant3 1153 . . . . . . . . 9 ((𝜑𝑌 = 𝑍𝜓) → 𝐶 (𝑐 𝑑))
109adantr 486 . . . . . . . 8 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝐶 (𝑐 𝑑))
11 simpr 490 . . . . . . . . . 10 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝑐 = 𝐺)
12 dalem23.g . . . . . . . . . . . . 13 𝐺 = ((𝑐 𝑃) (𝑑 𝑆))
131dalemkelat 40498 . . . . . . . . . . . . . . 15 (𝜑𝐾 ∈ Lat)
14133ad2ant1 1151 . . . . . . . . . . . . . 14 ((𝜑𝑌 = 𝑍𝜓) → 𝐾 ∈ Lat)
151dalemkehl 40497 . . . . . . . . . . . . . . . 16 (𝜑𝐾 ∈ HL)
16153ad2ant1 1151 . . . . . . . . . . . . . . 15 ((𝜑𝑌 = 𝑍𝜓) → 𝐾 ∈ HL)
177dalemccea 40557 . . . . . . . . . . . . . . . 16 (𝜓𝑐𝐴)
18173ad2ant3 1153 . . . . . . . . . . . . . . 15 ((𝜑𝑌 = 𝑍𝜓) → 𝑐𝐴)
191dalempea 40500 . . . . . . . . . . . . . . . 16 (𝜑𝑃𝐴)
20193ad2ant1 1151 . . . . . . . . . . . . . . 15 ((𝜑𝑌 = 𝑍𝜓) → 𝑃𝐴)
21 eqid 2760 . . . . . . . . . . . . . . . 16 (Base‘𝐾) = (Base‘𝐾)
2221, 3, 4hlatjcl 40241 . . . . . . . . . . . . . . 15 ((𝐾 ∈ HL ∧ 𝑐𝐴𝑃𝐴) → (𝑐 𝑃) ∈ (Base‘𝐾))
2316, 18, 20, 22syl3anc 1398 . . . . . . . . . . . . . 14 ((𝜑𝑌 = 𝑍𝜓) → (𝑐 𝑃) ∈ (Base‘𝐾))
247dalemddea 40558 . . . . . . . . . . . . . . . 16 (𝜓𝑑𝐴)
25243ad2ant3 1153 . . . . . . . . . . . . . . 15 ((𝜑𝑌 = 𝑍𝜓) → 𝑑𝐴)
261dalemsea 40503 . . . . . . . . . . . . . . . 16 (𝜑𝑆𝐴)
27263ad2ant1 1151 . . . . . . . . . . . . . . 15 ((𝜑𝑌 = 𝑍𝜓) → 𝑆𝐴)
2821, 3, 4hlatjcl 40241 . . . . . . . . . . . . . . 15 ((𝐾 ∈ HL ∧ 𝑑𝐴𝑆𝐴) → (𝑑 𝑆) ∈ (Base‘𝐾))
2916, 25, 27, 28syl3anc 1398 . . . . . . . . . . . . . 14 ((𝜑𝑌 = 𝑍𝜓) → (𝑑 𝑆) ∈ (Base‘𝐾))
30 dalem23.m . . . . . . . . . . . . . . 15 = (meet‘𝐾)
3121, 2, 30latmle2 18554 . . . . . . . . . . . . . 14 ((𝐾 ∈ Lat ∧ (𝑐 𝑃) ∈ (Base‘𝐾) ∧ (𝑑 𝑆) ∈ (Base‘𝐾)) → ((𝑐 𝑃) (𝑑 𝑆)) (𝑑 𝑆))
3214, 23, 29, 31syl3anc 1398 . . . . . . . . . . . . 13 ((𝜑𝑌 = 𝑍𝜓) → ((𝑐 𝑃) (𝑑 𝑆)) (𝑑 𝑆))
3312, 32eqbrtrid 5140 . . . . . . . . . . . 12 ((𝜑𝑌 = 𝑍𝜓) → 𝐺 (𝑑 𝑆))
343, 4hlatjcom 40242 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ 𝑑𝐴𝑆𝐴) → (𝑑 𝑆) = (𝑆 𝑑))
3516, 25, 27, 34syl3anc 1398 . . . . . . . . . . . 12 ((𝜑𝑌 = 𝑍𝜓) → (𝑑 𝑆) = (𝑆 𝑑))
3633, 35breqtrd 5131 . . . . . . . . . . 11 ((𝜑𝑌 = 𝑍𝜓) → 𝐺 (𝑆 𝑑))
3736adantr 486 . . . . . . . . . 10 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝐺 (𝑆 𝑑))
3811, 37eqbrtrd 5127 . . . . . . . . 9 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝑐 (𝑆 𝑑))
392, 3, 4hlatlej2 40250 . . . . . . . . . . 11 ((𝐾 ∈ HL ∧ 𝑆𝐴𝑑𝐴) → 𝑑 (𝑆 𝑑))
4016, 27, 25, 39syl3anc 1398 . . . . . . . . . 10 ((𝜑𝑌 = 𝑍𝜓) → 𝑑 (𝑆 𝑑))
4140adantr 486 . . . . . . . . 9 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝑑 (𝑆 𝑑))
427, 4dalemcceb 40563 . . . . . . . . . . . 12 (𝜓𝑐 ∈ (Base‘𝐾))
43423ad2ant3 1153 . . . . . . . . . . 11 ((𝜑𝑌 = 𝑍𝜓) → 𝑐 ∈ (Base‘𝐾))
4421, 4atbase 40163 . . . . . . . . . . . . 13 (𝑑𝐴𝑑 ∈ (Base‘𝐾))
4524, 44syl 18 . . . . . . . . . . . 12 (𝜓𝑑 ∈ (Base‘𝐾))
46453ad2ant3 1153 . . . . . . . . . . 11 ((𝜑𝑌 = 𝑍𝜓) → 𝑑 ∈ (Base‘𝐾))
4721, 3, 4hlatjcl 40241 . . . . . . . . . . . 12 ((𝐾 ∈ HL ∧ 𝑆𝐴𝑑𝐴) → (𝑆 𝑑) ∈ (Base‘𝐾))
4816, 27, 25, 47syl3anc 1398 . . . . . . . . . . 11 ((𝜑𝑌 = 𝑍𝜓) → (𝑆 𝑑) ∈ (Base‘𝐾))
4921, 2, 3latjle12 18539 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (𝑐 ∈ (Base‘𝐾) ∧ 𝑑 ∈ (Base‘𝐾) ∧ (𝑆 𝑑) ∈ (Base‘𝐾))) → ((𝑐 (𝑆 𝑑) ∧ 𝑑 (𝑆 𝑑)) ↔ (𝑐 𝑑) (𝑆 𝑑)))
5014, 43, 46, 48, 49syl13anc 1399 . . . . . . . . . 10 ((𝜑𝑌 = 𝑍𝜓) → ((𝑐 (𝑆 𝑑) ∧ 𝑑 (𝑆 𝑑)) ↔ (𝑐 𝑑) (𝑆 𝑑)))
5150adantr 486 . . . . . . . . 9 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → ((𝑐 (𝑆 𝑑) ∧ 𝑑 (𝑆 𝑑)) ↔ (𝑐 𝑑) (𝑆 𝑑)))
5238, 41, 51mpbi2and 725 . . . . . . . 8 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → (𝑐 𝑑) (𝑆 𝑑))
531, 4dalemceb 40512 . . . . . . . . . . 11 (𝜑𝐶 ∈ (Base‘𝐾))
54533ad2ant1 1151 . . . . . . . . . 10 ((𝜑𝑌 = 𝑍𝜓) → 𝐶 ∈ (Base‘𝐾))
5521, 3, 4hlatjcl 40241 . . . . . . . . . . 11 ((𝐾 ∈ HL ∧ 𝑐𝐴𝑑𝐴) → (𝑐 𝑑) ∈ (Base‘𝐾))
5616, 18, 25, 55syl3anc 1398 . . . . . . . . . 10 ((𝜑𝑌 = 𝑍𝜓) → (𝑐 𝑑) ∈ (Base‘𝐾))
5721, 2lattr 18533 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ (𝐶 ∈ (Base‘𝐾) ∧ (𝑐 𝑑) ∈ (Base‘𝐾) ∧ (𝑆 𝑑) ∈ (Base‘𝐾))) → ((𝐶 (𝑐 𝑑) ∧ (𝑐 𝑑) (𝑆 𝑑)) → 𝐶 (𝑆 𝑑)))
5814, 54, 56, 48, 57syl13anc 1399 . . . . . . . . 9 ((𝜑𝑌 = 𝑍𝜓) → ((𝐶 (𝑐 𝑑) ∧ (𝑐 𝑑) (𝑆 𝑑)) → 𝐶 (𝑆 𝑑)))
5958adantr 486 . . . . . . . 8 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → ((𝐶 (𝑐 𝑑) ∧ (𝑐 𝑑) (𝑆 𝑑)) → 𝐶 (𝑆 𝑑)))
6010, 52, 59mp2and 712 . . . . . . 7 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝐶 (𝑆 𝑑))
61 dalem23.o . . . . . . . . . . 11 𝑂 = (LPlanes‘𝐾)
621, 61dalemyeb 40523 . . . . . . . . . 10 (𝜑𝑌 ∈ (Base‘𝐾))
63623ad2ant1 1151 . . . . . . . . 9 ((𝜑𝑌 = 𝑍𝜓) → 𝑌 ∈ (Base‘𝐾))
6421, 2, 30latmlem1 18558 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ (𝐶 ∈ (Base‘𝐾) ∧ (𝑆 𝑑) ∈ (Base‘𝐾) ∧ 𝑌 ∈ (Base‘𝐾))) → (𝐶 (𝑆 𝑑) → (𝐶 𝑌) ((𝑆 𝑑) 𝑌)))
6514, 54, 48, 63, 64syl13anc 1399 . . . . . . . 8 ((𝜑𝑌 = 𝑍𝜓) → (𝐶 (𝑆 𝑑) → (𝐶 𝑌) ((𝑆 𝑑) 𝑌)))
6665adantr 486 . . . . . . 7 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → (𝐶 (𝑆 𝑑) → (𝐶 𝑌) ((𝑆 𝑑) 𝑌)))
6760, 66mpd 16 . . . . . 6 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → (𝐶 𝑌) ((𝑆 𝑑) 𝑌))
68 dalem23.y . . . . . . . . . 10 𝑌 = ((𝑃 𝑄) 𝑅)
69 dalem23.z . . . . . . . . . 10 𝑍 = ((𝑆 𝑇) 𝑈)
701, 2, 3, 4, 61, 68, 69dalem17 40554 . . . . . . . . 9 ((𝜑𝑌 = 𝑍) → 𝐶 𝑌)
71703adant3 1150 . . . . . . . 8 ((𝜑𝑌 = 𝑍𝜓) → 𝐶 𝑌)
7221, 2, 30latleeqm1 18556 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ 𝐶 ∈ (Base‘𝐾) ∧ 𝑌 ∈ (Base‘𝐾)) → (𝐶 𝑌 ↔ (𝐶 𝑌) = 𝐶))
7314, 54, 63, 72syl3anc 1398 . . . . . . . 8 ((𝜑𝑌 = 𝑍𝜓) → (𝐶 𝑌 ↔ (𝐶 𝑌) = 𝐶))
7471, 73mpbid 235 . . . . . . 7 ((𝜑𝑌 = 𝑍𝜓) → (𝐶 𝑌) = 𝐶)
7574adantr 486 . . . . . 6 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → (𝐶 𝑌) = 𝐶)
761, 2, 3, 4, 69dalemsly 40529 . . . . . . . . 9 ((𝜑𝑌 = 𝑍) → 𝑆 𝑌)
77763adant3 1150 . . . . . . . 8 ((𝜑𝑌 = 𝑍𝜓) → 𝑆 𝑌)
787dalem-ddly 40560 . . . . . . . . 9 (𝜓 → ¬ 𝑑 𝑌)
79783ad2ant3 1153 . . . . . . . 8 ((𝜑𝑌 = 𝑍𝜓) → ¬ 𝑑 𝑌)
8021, 2, 3, 30, 42atjm 40319 . . . . . . . 8 ((𝐾 ∈ HL ∧ (𝑆𝐴𝑑𝐴𝑌 ∈ (Base‘𝐾)) ∧ (𝑆 𝑌 ∧ ¬ 𝑑 𝑌)) → ((𝑆 𝑑) 𝑌) = 𝑆)
8116, 27, 25, 63, 77, 79, 80syl132anc 1415 . . . . . . 7 ((𝜑𝑌 = 𝑍𝜓) → ((𝑆 𝑑) 𝑌) = 𝑆)
8281adantr 486 . . . . . 6 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → ((𝑆 𝑑) 𝑌) = 𝑆)
8367, 75, 823brtr3d 5136 . . . . 5 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝐶 𝑆)
84 hlatl 40234 . . . . . . . . 9 (𝐾 ∈ HL → 𝐾 ∈ AtLat)
8515, 84syl 18 . . . . . . . 8 (𝜑𝐾 ∈ AtLat)
861, 2, 3, 4, 61, 68dalemcea 40534 . . . . . . . 8 (𝜑𝐶𝐴)
872, 4atcmp 40185 . . . . . . . 8 ((𝐾 ∈ AtLat ∧ 𝐶𝐴𝑆𝐴) → (𝐶 𝑆𝐶 = 𝑆))
8885, 86, 26, 87syl3anc 1398 . . . . . . 7 (𝜑 → (𝐶 𝑆𝐶 = 𝑆))
89883ad2ant1 1151 . . . . . 6 ((𝜑𝑌 = 𝑍𝜓) → (𝐶 𝑆𝐶 = 𝑆))
9089adantr 486 . . . . 5 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → (𝐶 𝑆𝐶 = 𝑆))
9183, 90mpbid 235 . . . 4 (((𝜑𝑌 = 𝑍𝜓) ∧ 𝑐 = 𝐺) → 𝐶 = 𝑆)
9291ex 418 . . 3 ((𝜑𝑌 = 𝑍𝜓) → (𝑐 = 𝐺𝐶 = 𝑆))
9392necon3d 2976 . 2 ((𝜑𝑌 = 𝑍𝜓) → (𝐶𝑆𝑐𝐺))
946, 93mpd 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 2145  wne 2955   class class class wbr 5103  cfv 6533  (class class class)co 7414  Basecbs 17302  lecple 17350  joincjn 18400  meetcmee 18401  Latclat 18520  Atomscatm 40137  AtLatcal 40138  HLchlt 40224  LPlanesclpl 40366
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 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7737
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 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  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 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-riota 7371  df-ov 7417  df-oprab 7418  df-proset 18383  df-poset 18402  df-plt 18417  df-lub 18433  df-glb 18434  df-join 18435  df-meet 18436  df-p0 18512  df-lat 18521  df-clat 18588  df-oposet 40050  df-ol 40052  df-oml 40053  df-covers 40140  df-ats 40141  df-atl 40172  df-cvlat 40196  df-hlat 40225  df-llines 40372  df-lplanes 40373
This theorem is used by:  dalem28  40574  dalem31N  40577
  Copyright terms: Public domain W3C validator