MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  opphllem5 Structured version   Visualization version   GIF version

Theorem opphllem5 28735
Description: Second part of Lemma 9.4 of [Schwabhauser] p. 68. (Contributed by Thierry Arnoux, 2-Mar-2020.)
Hypotheses
Ref Expression
hpg.p 𝑃 = (Base‘𝐺)
hpg.d = (dist‘𝐺)
hpg.i 𝐼 = (Itv‘𝐺)
hpg.o 𝑂 = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃𝐷) ∧ 𝑏 ∈ (𝑃𝐷)) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑎𝐼𝑏))}
opphl.l 𝐿 = (LineG‘𝐺)
opphl.d (𝜑𝐷 ∈ ran 𝐿)
opphl.g (𝜑𝐺 ∈ TarskiG)
opphl.k 𝐾 = (hlG‘𝐺)
opphllem5.n 𝑁 = ((pInvG‘𝐺)‘𝑀)
opphllem5.a (𝜑𝐴𝑃)
opphllem5.c (𝜑𝐶𝑃)
opphllem5.r (𝜑𝑅𝐷)
opphllem5.s (𝜑𝑆𝐷)
opphllem5.m (𝜑𝑀𝑃)
opphllem5.o (𝜑𝐴𝑂𝐶)
opphllem5.p (𝜑𝐷(⟂G‘𝐺)(𝐴𝐿𝑅))
opphllem5.q (𝜑𝐷(⟂G‘𝐺)(𝐶𝐿𝑆))
opphllem5.u (𝜑𝑈𝑃)
opphllem5.v (𝜑𝑉𝑃)
opphllem5.1 (𝜑𝑈(𝐾𝑅)𝐴)
opphllem5.2 (𝜑𝑉(𝐾𝑆)𝐶)
Assertion
Ref Expression
opphllem5 (𝜑𝑈𝑂𝑉)
Distinct variable groups:   𝐷,𝑎,𝑏   𝐼,𝑎,𝑏   𝑃,𝑎,𝑏   𝑡,𝐴   𝑡,𝐷   𝑡,𝑅   𝑡,𝐶   𝑡,𝐺   𝑡,𝐿   𝑡,𝑈   𝑡,𝐼   𝑡,𝐾   𝑡,𝑀   𝑡,𝑂   𝑡,𝑁   𝑡,𝑃   𝑡,𝑆   𝑡,𝑉   𝜑,𝑡   𝑡,   𝑡,𝑎,𝑏
Allowed substitution hints:   𝜑(𝑎,𝑏)   𝐴(𝑎,𝑏)   𝐶(𝑎,𝑏)   𝑅(𝑎,𝑏)   𝑆(𝑎,𝑏)   𝑈(𝑎,𝑏)   𝐺(𝑎,𝑏)   𝐾(𝑎,𝑏)   𝐿(𝑎,𝑏)   𝑀(𝑎,𝑏)   (𝑎,𝑏)   𝑁(𝑎,𝑏)   𝑂(𝑎,𝑏)   𝑉(𝑎,𝑏)

Proof of Theorem opphllem5
Dummy variable 𝑚 is distinct from all other variables.
StepHypRef Expression
1 hpg.p . . . . . . 7 𝑃 = (Base‘𝐺)
2 hpg.d . . . . . . 7 = (dist‘𝐺)
3 hpg.i . . . . . . 7 𝐼 = (Itv‘𝐺)
4 opphl.l . . . . . . 7 𝐿 = (LineG‘𝐺)
5 opphl.g . . . . . . 7 (𝜑𝐺 ∈ TarskiG)
6 opphl.d . . . . . . 7 (𝜑𝐷 ∈ ran 𝐿)
7 opphl.k . . . . . . 7 𝐾 = (hlG‘𝐺)
8 opphllem5.r . . . . . . 7 (𝜑𝑅𝐷)
9 opphllem5.a . . . . . . 7 (𝜑𝐴𝑃)
10 opphllem5.u . . . . . . 7 (𝜑𝑈𝑃)
11 opphllem5.p . . . . . . . 8 (𝜑𝐷(⟂G‘𝐺)(𝐴𝐿𝑅))
121, 4, 3, 5, 6, 8tglnpt 28533 . . . . . . . . 9 (𝜑𝑅𝑃)
13 opphllem5.1 . . . . . . . . . 10 (𝜑𝑈(𝐾𝑅)𝐴)
141, 3, 7, 10, 9, 12, 5, 13hlne2 28590 . . . . . . . . 9 (𝜑𝐴𝑅)
151, 3, 4, 5, 9, 12, 14tglinecom 28619 . . . . . . . 8 (𝜑 → (𝐴𝐿𝑅) = (𝑅𝐿𝐴))
1611, 15breqtrd 5150 . . . . . . 7 (𝜑𝐷(⟂G‘𝐺)(𝑅𝐿𝐴))
171, 3, 7, 10, 9, 12, 5, 13hlcomd 28588 . . . . . . 7 (𝜑𝐴(𝐾𝑅)𝑈)
181, 2, 3, 4, 5, 6, 7, 8, 9, 10, 16, 17hlperpnel 28709 . . . . . 6 (𝜑 → ¬ 𝑈𝐷)
1918ad3antrrr 730 . . . . 5 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → ¬ 𝑈𝐷)
20 opphllem5.s . . . . . . 7 (𝜑𝑆𝐷)
21 opphllem5.c . . . . . . 7 (𝜑𝐶𝑃)
22 opphllem5.v . . . . . . 7 (𝜑𝑉𝑃)
23 opphllem5.q . . . . . . . 8 (𝜑𝐷(⟂G‘𝐺)(𝐶𝐿𝑆))
241, 4, 3, 5, 6, 20tglnpt 28533 . . . . . . . . 9 (𝜑𝑆𝑃)
25 opphllem5.2 . . . . . . . . . 10 (𝜑𝑉(𝐾𝑆)𝐶)
261, 3, 7, 22, 21, 24, 5, 25hlne2 28590 . . . . . . . . 9 (𝜑𝐶𝑆)
271, 3, 4, 5, 21, 24, 26tglinecom 28619 . . . . . . . 8 (𝜑 → (𝐶𝐿𝑆) = (𝑆𝐿𝐶))
2823, 27breqtrd 5150 . . . . . . 7 (𝜑𝐷(⟂G‘𝐺)(𝑆𝐿𝐶))
291, 3, 7, 22, 21, 24, 5, 25hlcomd 28588 . . . . . . 7 (𝜑𝐶(𝐾𝑆)𝑉)
301, 2, 3, 4, 5, 6, 7, 20, 21, 22, 28, 29hlperpnel 28709 . . . . . 6 (𝜑 → ¬ 𝑉𝐷)
3130ad3antrrr 730 . . . . 5 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → ¬ 𝑉𝐷)
32 simplr 768 . . . . . 6 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡𝐷)
33 simpr 484 . . . . . . . 8 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅 = 𝑡) → 𝑅 = 𝑡)
34 eqid 2736 . . . . . . . . 9 (pInvG‘𝐺) = (pInvG‘𝐺)
355ad4antr 732 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐺 ∈ TarskiG)
3621ad4antr 732 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐶𝑃)
3712ad4antr 732 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅𝑃)
385ad3antrrr 730 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐺 ∈ TarskiG)
396ad3antrrr 730 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐷 ∈ ran 𝐿)
401, 4, 3, 38, 39, 32tglnpt 28533 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡𝑃)
4140adantr 480 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑡𝑃)
429ad4antr 732 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐴𝑃)
4324ad4antr 732 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑆𝑃)
44 simpllr 775 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 = 𝑆)
451, 3, 4, 5, 21, 24, 26tglinerflx2 28618 . . . . . . . . . . . . 13 (𝜑𝑆 ∈ (𝐶𝐿𝑆))
4645ad3antrrr 730 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑆 ∈ (𝐶𝐿𝑆))
4744, 46eqeltrd 2835 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐶𝐿𝑆))
4847adantr 480 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅 ∈ (𝐶𝐿𝑆))
494, 5, 23perpln2 28695 . . . . . . . . . . . . 13 (𝜑 → (𝐶𝐿𝑆) ∈ ran 𝐿)
501, 2, 3, 4, 5, 6, 49, 23perpcom 28697 . . . . . . . . . . . 12 (𝜑 → (𝐶𝐿𝑆)(⟂G‘𝐺)𝐷)
5150ad4antr 732 . . . . . . . . . . 11 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → (𝐶𝐿𝑆)(⟂G‘𝐺)𝐷)
52 simpr 484 . . . . . . . . . . . 12 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅𝑡)
536ad4antr 732 . . . . . . . . . . . 12 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐷 ∈ ran 𝐿)
548ad4antr 732 . . . . . . . . . . . 12 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅𝐷)
55 simpllr 775 . . . . . . . . . . . 12 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑡𝐷)
561, 3, 4, 35, 37, 41, 52, 52, 53, 54, 55tglinethru 28620 . . . . . . . . . . 11 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐷 = (𝑅𝐿𝑡))
5751, 56breqtrd 5150 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → (𝐶𝐿𝑆)(⟂G‘𝐺)(𝑅𝐿𝑡))
581, 2, 3, 4, 35, 36, 43, 48, 41, 57perprag 28710 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → ⟨“𝐶𝑅𝑡”⟩ ∈ (∟G‘𝐺))
591, 3, 4, 5, 9, 12, 14tglinerflx2 28618 . . . . . . . . . . 11 (𝜑𝑅 ∈ (𝐴𝐿𝑅))
6059ad4antr 732 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅 ∈ (𝐴𝐿𝑅))
614, 5, 11perpln2 28695 . . . . . . . . . . . . 13 (𝜑 → (𝐴𝐿𝑅) ∈ ran 𝐿)
621, 2, 3, 4, 5, 6, 61, 11perpcom 28697 . . . . . . . . . . . 12 (𝜑 → (𝐴𝐿𝑅)(⟂G‘𝐺)𝐷)
6362ad4antr 732 . . . . . . . . . . 11 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → (𝐴𝐿𝑅)(⟂G‘𝐺)𝐷)
6463, 56breqtrd 5150 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → (𝐴𝐿𝑅)(⟂G‘𝐺)(𝑅𝐿𝑡))
651, 2, 3, 4, 35, 42, 37, 60, 41, 64perprag 28710 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → ⟨“𝐴𝑅𝑡”⟩ ∈ (∟G‘𝐺))
66 simplr 768 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑡 ∈ (𝐴𝐼𝐶))
671, 2, 3, 35, 42, 41, 36, 66tgbtwncom 28472 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑡 ∈ (𝐶𝐼𝐴))
681, 2, 3, 4, 34, 35, 36, 37, 41, 42, 58, 65, 67ragflat2 28687 . . . . . . . 8 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅 = 𝑡)
6933, 68pm2.61dane 3020 . . . . . . 7 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 = 𝑡)
709ad3antrrr 730 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐴𝑃)
7110ad3antrrr 730 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑈𝑃)
7222ad3antrrr 730 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑉𝑃)
7312ad3antrrr 730 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅𝑃)
7417ad3antrrr 730 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐴(𝐾𝑅)𝑈)
7521ad3antrrr 730 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐶𝑃)
7625ad3antrrr 730 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑉(𝐾𝑆)𝐶)
7744fveq2d 6885 . . . . . . . . . . . . 13 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → (𝐾𝑅) = (𝐾𝑆))
7877breqd 5135 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → (𝑉(𝐾𝑅)𝐶𝑉(𝐾𝑆)𝐶))
7976, 78mpbird 257 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑉(𝐾𝑅)𝐶)
801, 3, 7, 72, 75, 73, 38, 79hlcomd 28588 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐶(𝐾𝑅)𝑉)
81 simpr 484 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡 ∈ (𝐴𝐼𝐶))
8269, 81eqeltrd 2835 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐴𝐼𝐶))
831, 2, 3, 38, 70, 73, 75, 82tgbtwncom 28472 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐶𝐼𝐴))
841, 3, 7, 75, 72, 70, 38, 73, 80, 83btwnhl 28598 . . . . . . . . 9 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝑉𝐼𝐴))
851, 2, 3, 38, 72, 73, 70, 84tgbtwncom 28472 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐴𝐼𝑉))
861, 3, 7, 70, 71, 72, 38, 73, 74, 85btwnhl 28598 . . . . . . 7 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝑈𝐼𝑉))
8769, 86eqeltrrd 2836 . . . . . 6 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡 ∈ (𝑈𝐼𝑉))
88 rspe 3236 . . . . . 6 ((𝑡𝐷𝑡 ∈ (𝑈𝐼𝑉)) → ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))
8932, 87, 88syl2anc 584 . . . . 5 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))
9019, 31, 89jca31 514 . . . 4 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → ((¬ 𝑈𝐷 ∧ ¬ 𝑉𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉)))
91 hpg.o . . . . . 6 𝑂 = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃𝐷) ∧ 𝑏 ∈ (𝑃𝐷)) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑎𝐼𝑏))}
921, 2, 3, 91, 10, 22islnopp 28723 . . . . 5 (𝜑 → (𝑈𝑂𝑉 ↔ ((¬ 𝑈𝐷 ∧ ¬ 𝑉𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))))
9392ad3antrrr 730 . . . 4 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → (𝑈𝑂𝑉 ↔ ((¬ 𝑈𝐷 ∧ ¬ 𝑉𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))))
9490, 93mpbird 257 . . 3 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑈𝑂𝑉)
95 opphllem5.o . . . . . 6 (𝜑𝐴𝑂𝐶)
961, 2, 3, 91, 9, 21islnopp 28723 . . . . . 6 (𝜑 → (𝐴𝑂𝐶 ↔ ((¬ 𝐴𝐷 ∧ ¬ 𝐶𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶))))
9795, 96mpbid 232 . . . . 5 (𝜑 → ((¬ 𝐴𝐷 ∧ ¬ 𝐶𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶)))
9897simprd 495 . . . 4 (𝜑 → ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶))
9998adantr 480 . . 3 ((𝜑𝑅 = 𝑆) → ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶))
10094, 99r19.29a 3149 . 2 ((𝜑𝑅 = 𝑆) → 𝑈𝑂𝑉)
1016ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐷 ∈ ran 𝐿)
1025ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐺 ∈ TarskiG)
103 eqid 2736 . . . . 5 ((pInvG‘𝐺)‘𝑚) = ((pInvG‘𝐺)‘𝑚)
1049ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐴𝑃)
10521ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐶𝑃)
1068ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑅𝐷)
10720ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑆𝐷)
108 simpllr 775 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑚𝑃)
10995ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐴𝑂𝐶)
11011ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐷(⟂G‘𝐺)(𝐴𝐿𝑅))
11123ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐷(⟂G‘𝐺)(𝐶𝐿𝑆))
112 simpr 484 . . . . . 6 ((𝜑𝑅𝑆) → 𝑅𝑆)
113112ad3antrrr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑅𝑆)
114 simpr 484 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴))
11510ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑈𝑃)
116 simplr 768 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅))
117116eqcomd 2742 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → (((pInvG‘𝐺)‘𝑚)‘𝑅) = 𝑆)
11822ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑉𝑃)
11913ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑈(𝐾𝑅)𝐴)
12025ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑉(𝐾𝑆)𝐶)
1211, 2, 3, 91, 4, 101, 102, 7, 103, 104, 105, 106, 107, 108, 109, 110, 111, 113, 114, 115, 117, 118, 119, 120opphllem4 28734 . . . 4 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑈𝑂𝑉)
1226ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐷 ∈ ran 𝐿)
1235ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐺 ∈ TarskiG)
12422ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑉𝑃)
12510ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑈𝑃)
12621ad4antr 732 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐶𝑃)
1279ad4antr 732 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐴𝑃)
12820ad4antr 732 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑆𝐷)
1298ad4antr 732 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑅𝐷)
130 simpllr 775 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑚𝑃)
13195ad4antr 732 . . . . . . 7 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐴𝑂𝐶)
1321, 2, 3, 91, 4, 122, 123, 127, 126, 131oppcom 28728 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐶𝑂𝐴)
13323ad4antr 732 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐷(⟂G‘𝐺)(𝐶𝐿𝑆))
13411ad4antr 732 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐷(⟂G‘𝐺)(𝐴𝐿𝑅))
135112necomd 2988 . . . . . . 7 ((𝜑𝑅𝑆) → 𝑆𝑅)
136135ad3antrrr 730 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑆𝑅)
137 simpr 484 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶))
13812ad4antr 732 . . . . . . 7 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑅𝑃)
139 simplr 768 . . . . . . . 8 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅))
140139eqcomd 2742 . . . . . . 7 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → (((pInvG‘𝐺)‘𝑚)‘𝑅) = 𝑆)
1411, 2, 3, 4, 34, 123, 130, 103, 138, 140mircom 28647 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → (((pInvG‘𝐺)‘𝑚)‘𝑆) = 𝑅)
14225ad4antr 732 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑉(𝐾𝑆)𝐶)
14313ad4antr 732 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑈(𝐾𝑅)𝐴)
1441, 2, 3, 91, 4, 122, 123, 7, 103, 126, 127, 128, 129, 130, 132, 133, 134, 136, 137, 124, 141, 125, 142, 143opphllem4 28734 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑉𝑂𝑈)
1451, 2, 3, 91, 4, 122, 123, 124, 125, 144oppcom 28728 . . . 4 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑈𝑂𝑉)
146 eqid 2736 . . . . . 6 (≤G‘𝐺) = (≤G‘𝐺)
1471, 2, 3, 146, 5, 24, 21, 12, 9legtrid 28575 . . . . 5 (𝜑 → ((𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴) ∨ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)))
148147ad3antrrr 730 . . . 4 ((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) → ((𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴) ∨ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)))
149121, 145, 148mpjaodan 960 . . 3 ((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) → 𝑈𝑂𝑉)
1505adantr 480 . . . 4 ((𝜑𝑅𝑆) → 𝐺 ∈ TarskiG)
15112adantr 480 . . . 4 ((𝜑𝑅𝑆) → 𝑅𝑃)
15224adantr 480 . . . 4 ((𝜑𝑅𝑆) → 𝑆𝑃)
1531, 2, 3, 91, 4, 6, 5, 9, 21, 95opptgdim2 28729 . . . . 5 (𝜑𝐺DimTarskiG≥2)
154153adantr 480 . . . 4 ((𝜑𝑅𝑆) → 𝐺DimTarskiG≥2)
1551, 2, 3, 4, 150, 34, 151, 152, 154midex 28721 . . 3 ((𝜑𝑅𝑆) → ∃𝑚𝑃 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅))
156149, 155r19.29a 3149 . 2 ((𝜑𝑅𝑆) → 𝑈𝑂𝑉)
157100, 156pm2.61dane 3020 1 (𝜑𝑈𝑂𝑉)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  wo 847   = wceq 1540  wcel 2109  wne 2933  wrex 3061  cdif 3928   class class class wbr 5124  {copab 5186  ran crn 5660  cfv 6536  (class class class)co 7410  2c2 12300  Basecbs 17233  distcds 17285  TarskiGcstrkg 28411  DimTarskiGcstrkgld 28415  Itvcitv 28417  LineGclng 28418  ≤Gcleg 28566  hlGchlg 28584  pInvGcmir 28636  ⟂Gcperpg 28679
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2708  ax-rep 5254  ax-sep 5271  ax-nul 5281  ax-pow 5340  ax-pr 5407  ax-un 7734  ax-cnex 11190  ax-resscn 11191  ax-1cn 11192  ax-icn 11193  ax-addcl 11194  ax-addrcl 11195  ax-mulcl 11196  ax-mulrcl 11197  ax-mulcom 11198  ax-addass 11199  ax-mulass 11200  ax-distr 11201  ax-i2m1 11202  ax-1ne0 11203  ax-1rid 11204  ax-rnegex 11205  ax-rrecex 11206  ax-cnre 11207  ax-pre-lttri 11208  ax-pre-lttrn 11209  ax-pre-ltadd 11210  ax-pre-mulgt0 11211
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2810  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3062  df-rmo 3364  df-reu 3365  df-rab 3421  df-v 3466  df-sbc 3771  df-csb 3880  df-dif 3934  df-un 3936  df-in 3938  df-ss 3948  df-pss 3951  df-nul 4314  df-if 4506  df-pw 4582  df-sn 4607  df-pr 4609  df-tp 4611  df-op 4613  df-uni 4889  df-int 4928  df-iun 4974  df-br 5125  df-opab 5187  df-mpt 5207  df-tr 5235  df-id 5553  df-eprel 5558  df-po 5566  df-so 5567  df-fr 5611  df-we 5613  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6295  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-om 7867  df-1st 7993  df-2nd 7994  df-frecs 8285  df-wrecs 8316  df-recs 8390  df-rdg 8429  df-1o 8485  df-oadd 8489  df-er 8724  df-map 8847  df-pm 8848  df-en 8965  df-dom 8966  df-sdom 8967  df-fin 8968  df-dju 9920  df-card 9958  df-pnf 11276  df-mnf 11277  df-xr 11278  df-ltxr 11279  df-le 11280  df-sub 11473  df-neg 11474  df-nn 12246  df-2 12308  df-3 12309  df-n0 12507  df-xnn0 12580  df-z 12594  df-uz 12858  df-fz 13530  df-fzo 13677  df-hash 14354  df-word 14537  df-concat 14594  df-s1 14619  df-s2 14872  df-s3 14873  df-trkgc 28432  df-trkgb 28433  df-trkgcb 28434  df-trkgld 28436  df-trkg 28437  df-cgrg 28495  df-leg 28567  df-hlg 28585  df-mir 28637  df-rag 28678  df-perpg 28680
This theorem is referenced by:  opphl  28738
  Copyright terms: Public domain W3C validator