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

Theorem opphllem5 28772
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 28570 . . . . . . . . 9 (𝜑𝑅𝑃)
13 opphllem5.1 . . . . . . . . . 10 (𝜑𝑈(𝐾𝑅)𝐴)
141, 3, 7, 10, 9, 12, 5, 13hlne2 28627 . . . . . . . . 9 (𝜑𝐴𝑅)
151, 3, 4, 5, 9, 12, 14tglinecom 28656 . . . . . . . 8 (𝜑 → (𝐴𝐿𝑅) = (𝑅𝐿𝐴))
1611, 15breqtrd 5122 . . . . . . 7 (𝜑𝐷(⟂G‘𝐺)(𝑅𝐿𝐴))
171, 3, 7, 10, 9, 12, 5, 13hlcomd 28625 . . . . . . 7 (𝜑𝐴(𝐾𝑅)𝑈)
181, 2, 3, 4, 5, 6, 7, 8, 9, 10, 16, 17hlperpnel 28746 . . . . . 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 28570 . . . . . . . . 9 (𝜑𝑆𝑃)
25 opphllem5.2 . . . . . . . . . 10 (𝜑𝑉(𝐾𝑆)𝐶)
261, 3, 7, 22, 21, 24, 5, 25hlne2 28627 . . . . . . . . 9 (𝜑𝐶𝑆)
271, 3, 4, 5, 21, 24, 26tglinecom 28656 . . . . . . . 8 (𝜑 → (𝐶𝐿𝑆) = (𝑆𝐿𝐶))
2823, 27breqtrd 5122 . . . . . . 7 (𝜑𝐷(⟂G‘𝐺)(𝑆𝐿𝐶))
291, 3, 7, 22, 21, 24, 5, 25hlcomd 28625 . . . . . . 7 (𝜑𝐶(𝐾𝑆)𝑉)
301, 2, 3, 4, 5, 6, 7, 20, 21, 22, 28, 29hlperpnel 28746 . . . . . 6 (𝜑 → ¬ 𝑉𝐷)
3130ad3antrrr 730 . . . . 5 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → ¬ 𝑉𝐷)
32 simplr 768 . . . . . 6 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡𝐷)
33 simpr 484 . . . . . . . 8 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅 = 𝑡) → 𝑅 = 𝑡)
34 eqid 2734 . . . . . . . . 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 28570 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡𝑃)
4140adantr 480 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑡𝑃)
429ad4antr 732 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐴𝑃)
4324ad4antr 732 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑆𝑃)
44 simpllr 775 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 = 𝑆)
451, 3, 4, 5, 21, 24, 26tglinerflx2 28655 . . . . . . . . . . . . 13 (𝜑𝑆 ∈ (𝐶𝐿𝑆))
4645ad3antrrr 730 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑆 ∈ (𝐶𝐿𝑆))
4744, 46eqeltrd 2834 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐶𝐿𝑆))
4847adantr 480 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅 ∈ (𝐶𝐿𝑆))
494, 5, 23perpln2 28732 . . . . . . . . . . . . 13 (𝜑 → (𝐶𝐿𝑆) ∈ ran 𝐿)
501, 2, 3, 4, 5, 6, 49, 23perpcom 28734 . . . . . . . . . . . 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 28657 . . . . . . . . . . 11 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐷 = (𝑅𝐿𝑡))
5751, 56breqtrd 5122 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → (𝐶𝐿𝑆)(⟂G‘𝐺)(𝑅𝐿𝑡))
581, 2, 3, 4, 35, 36, 43, 48, 41, 57perprag 28747 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → ⟨“𝐶𝑅𝑡”⟩ ∈ (∟G‘𝐺))
591, 3, 4, 5, 9, 12, 14tglinerflx2 28655 . . . . . . . . . . 11 (𝜑𝑅 ∈ (𝐴𝐿𝑅))
6059ad4antr 732 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅 ∈ (𝐴𝐿𝑅))
614, 5, 11perpln2 28732 . . . . . . . . . . . . 13 (𝜑 → (𝐴𝐿𝑅) ∈ ran 𝐿)
621, 2, 3, 4, 5, 6, 61, 11perpcom 28734 . . . . . . . . . . . 12 (𝜑 → (𝐴𝐿𝑅)(⟂G‘𝐺)𝐷)
6362ad4antr 732 . . . . . . . . . . 11 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → (𝐴𝐿𝑅)(⟂G‘𝐺)𝐷)
6463, 56breqtrd 5122 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → (𝐴𝐿𝑅)(⟂G‘𝐺)(𝑅𝐿𝑡))
651, 2, 3, 4, 35, 42, 37, 60, 41, 64perprag 28747 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → ⟨“𝐴𝑅𝑡”⟩ ∈ (∟G‘𝐺))
66 simplr 768 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑡 ∈ (𝐴𝐼𝐶))
671, 2, 3, 35, 42, 41, 36, 66tgbtwncom 28509 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑡 ∈ (𝐶𝐼𝐴))
681, 2, 3, 4, 34, 35, 36, 37, 41, 42, 58, 65, 67ragflat2 28724 . . . . . . . 8 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅 = 𝑡)
6933, 68pm2.61dane 3017 . . . . . . 7 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 = 𝑡)
709ad3antrrr 730 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐴𝑃)
7110ad3antrrr 730 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑈𝑃)
7222ad3antrrr 730 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑉𝑃)
7312ad3antrrr 730 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅𝑃)
7417ad3antrrr 730 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐴(𝐾𝑅)𝑈)
7521ad3antrrr 730 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐶𝑃)
7625ad3antrrr 730 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑉(𝐾𝑆)𝐶)
7744fveq2d 6836 . . . . . . . . . . . . 13 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → (𝐾𝑅) = (𝐾𝑆))
7877breqd 5107 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → (𝑉(𝐾𝑅)𝐶𝑉(𝐾𝑆)𝐶))
7976, 78mpbird 257 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑉(𝐾𝑅)𝐶)
801, 3, 7, 72, 75, 73, 38, 79hlcomd 28625 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐶(𝐾𝑅)𝑉)
81 simpr 484 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡 ∈ (𝐴𝐼𝐶))
8269, 81eqeltrd 2834 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐴𝐼𝐶))
831, 2, 3, 38, 70, 73, 75, 82tgbtwncom 28509 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐶𝐼𝐴))
841, 3, 7, 75, 72, 70, 38, 73, 80, 83btwnhl 28635 . . . . . . . . 9 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝑉𝐼𝐴))
851, 2, 3, 38, 72, 73, 70, 84tgbtwncom 28509 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐴𝐼𝑉))
861, 3, 7, 70, 71, 72, 38, 73, 74, 85btwnhl 28635 . . . . . . 7 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝑈𝐼𝑉))
8769, 86eqeltrrd 2835 . . . . . 6 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡 ∈ (𝑈𝐼𝑉))
88 rspe 3224 . . . . . 6 ((𝑡𝐷𝑡 ∈ (𝑈𝐼𝑉)) → ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))
8932, 87, 88syl2anc 584 . . . . 5 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))
9019, 31, 89jca31 514 . . . 4 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → ((¬ 𝑈𝐷 ∧ ¬ 𝑉𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉)))
91 hpg.o . . . . . 6 𝑂 = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃𝐷) ∧ 𝑏 ∈ (𝑃𝐷)) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑎𝐼𝑏))}
921, 2, 3, 91, 10, 22islnopp 28760 . . . . 5 (𝜑 → (𝑈𝑂𝑉 ↔ ((¬ 𝑈𝐷 ∧ ¬ 𝑉𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))))
9392ad3antrrr 730 . . . 4 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → (𝑈𝑂𝑉 ↔ ((¬ 𝑈𝐷 ∧ ¬ 𝑉𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))))
9490, 93mpbird 257 . . 3 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑈𝑂𝑉)
95 opphllem5.o . . . . . 6 (𝜑𝐴𝑂𝐶)
961, 2, 3, 91, 9, 21islnopp 28760 . . . . . 6 (𝜑 → (𝐴𝑂𝐶 ↔ ((¬ 𝐴𝐷 ∧ ¬ 𝐶𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶))))
9795, 96mpbid 232 . . . . 5 (𝜑 → ((¬ 𝐴𝐷 ∧ ¬ 𝐶𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶)))
9897simprd 495 . . . 4 (𝜑 → ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶))
9998adantr 480 . . 3 ((𝜑𝑅 = 𝑆) → ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶))
10094, 99r19.29a 3142 . 2 ((𝜑𝑅 = 𝑆) → 𝑈𝑂𝑉)
1016ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐷 ∈ ran 𝐿)
1025ad4antr 732 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐺 ∈ TarskiG)
103 eqid 2734 . . . . 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 2740 . . . . 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 28771 . . . 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 28765 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐶𝑂𝐴)
13323ad4antr 732 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐷(⟂G‘𝐺)(𝐶𝐿𝑆))
13411ad4antr 732 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐷(⟂G‘𝐺)(𝐴𝐿𝑅))
135112necomd 2985 . . . . . . 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 2740 . . . . . . 7 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → (((pInvG‘𝐺)‘𝑚)‘𝑅) = 𝑆)
1411, 2, 3, 4, 34, 123, 130, 103, 138, 140mircom 28684 . . . . . 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 28771 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑉𝑂𝑈)
1451, 2, 3, 91, 4, 122, 123, 124, 125, 144oppcom 28765 . . . 4 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑈𝑂𝑉)
146 eqid 2734 . . . . . 6 (≤G‘𝐺) = (≤G‘𝐺)
1471, 2, 3, 146, 5, 24, 21, 12, 9legtrid 28612 . . . . 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 28766 . . . . 5 (𝜑𝐺DimTarskiG≥2)
154153adantr 480 . . . 4 ((𝜑𝑅𝑆) → 𝐺DimTarskiG≥2)
1551, 2, 3, 4, 150, 34, 151, 152, 154midex 28758 . . 3 ((𝜑𝑅𝑆) → ∃𝑚𝑃 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅))
156149, 155r19.29a 3142 . 2 ((𝜑𝑅𝑆) → 𝑈𝑂𝑉)
157100, 156pm2.61dane 3017 1 (𝜑𝑈𝑂𝑉)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  wo 847   = wceq 1541  wcel 2113  wne 2930  wrex 3058  cdif 3896   class class class wbr 5096  {copab 5158  ran crn 5623  cfv 6490  (class class class)co 7356  2c2 12198  Basecbs 17134  distcds 17184  TarskiGcstrkg 28448  DimTarskiGcstrkgld 28452  Itvcitv 28454  LineGclng 28455  ≤Gcleg 28603  hlGchlg 28621  pInvGcmir 28673  ⟂Gcperpg 28716
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2182  ax-ext 2706  ax-rep 5222  ax-sep 5239  ax-nul 5249  ax-pow 5308  ax-pr 5375  ax-un 7678  ax-cnex 11080  ax-resscn 11081  ax-1cn 11082  ax-icn 11083  ax-addcl 11084  ax-addrcl 11085  ax-mulcl 11086  ax-mulrcl 11087  ax-mulcom 11088  ax-addass 11089  ax-mulass 11090  ax-distr 11091  ax-i2m1 11092  ax-1ne0 11093  ax-1rid 11094  ax-rnegex 11095  ax-rrecex 11096  ax-cnre 11097  ax-pre-lttri 11098  ax-pre-lttrn 11099  ax-pre-ltadd 11100  ax-pre-mulgt0 11101
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2537  df-eu 2567  df-clab 2713  df-cleq 2726  df-clel 2809  df-nfc 2883  df-ne 2931  df-nel 3035  df-ral 3050  df-rex 3059  df-rmo 3348  df-reu 3349  df-rab 3398  df-v 3440  df-sbc 3739  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4284  df-if 4478  df-pw 4554  df-sn 4579  df-pr 4581  df-tp 4583  df-op 4585  df-uni 4862  df-int 4901  df-iun 4946  df-br 5097  df-opab 5159  df-mpt 5178  df-tr 5204  df-id 5517  df-eprel 5522  df-po 5530  df-so 5531  df-fr 5575  df-we 5577  df-xp 5628  df-rel 5629  df-cnv 5630  df-co 5631  df-dm 5632  df-rn 5633  df-res 5634  df-ima 5635  df-pred 6257  df-ord 6318  df-on 6319  df-lim 6320  df-suc 6321  df-iota 6446  df-fun 6492  df-fn 6493  df-f 6494  df-f1 6495  df-fo 6496  df-f1o 6497  df-fv 6498  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-om 7807  df-1st 7931  df-2nd 7932  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-1o 8395  df-oadd 8399  df-er 8633  df-map 8763  df-pm 8764  df-en 8882  df-dom 8883  df-sdom 8884  df-fin 8885  df-dju 9811  df-card 9849  df-pnf 11166  df-mnf 11167  df-xr 11168  df-ltxr 11169  df-le 11170  df-sub 11364  df-neg 11365  df-nn 12144  df-2 12206  df-3 12207  df-n0 12400  df-xnn0 12473  df-z 12487  df-uz 12750  df-fz 13422  df-fzo 13569  df-hash 14252  df-word 14435  df-concat 14492  df-s1 14518  df-s2 14769  df-s3 14770  df-trkgc 28469  df-trkgb 28470  df-trkgcb 28471  df-trkgld 28473  df-trkg 28474  df-cgrg 28532  df-leg 28604  df-hlg 28622  df-mir 28674  df-rag 28715  df-perpg 28717
This theorem is referenced by:  opphl  28775
  Copyright terms: Public domain W3C validator