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

Theorem opphllem5 26524
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 26322 . . . . . . . . 9 (𝜑𝑅𝑃)
13 opphllem5.1 . . . . . . . . . 10 (𝜑𝑈(𝐾𝑅)𝐴)
141, 3, 7, 10, 9, 12, 5, 13hlne2 26379 . . . . . . . . 9 (𝜑𝐴𝑅)
151, 3, 4, 5, 9, 12, 14tglinecom 26408 . . . . . . . 8 (𝜑 → (𝐴𝐿𝑅) = (𝑅𝐿𝐴))
1611, 15breqtrd 5068 . . . . . . 7 (𝜑𝐷(⟂G‘𝐺)(𝑅𝐿𝐴))
171, 3, 7, 10, 9, 12, 5, 13hlcomd 26377 . . . . . . 7 (𝜑𝐴(𝐾𝑅)𝑈)
181, 2, 3, 4, 5, 6, 7, 8, 9, 10, 16, 17hlperpnel 26498 . . . . . 6 (𝜑 → ¬ 𝑈𝐷)
1918ad3antrrr 728 . . . . 5 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → ¬ 𝑈𝐷)
20 opphllem5.s . . . . . . 7 (𝜑𝑆𝐷)
21 opphllem5.c . . . . . . 7 (𝜑𝐶𝑃)
22 opphllem5.v . . . . . . 7 (𝜑𝑉𝑃)
23 opphllem5.q . . . . . . . 8 (𝜑𝐷(⟂G‘𝐺)(𝐶𝐿𝑆))
241, 4, 3, 5, 6, 20tglnpt 26322 . . . . . . . . 9 (𝜑𝑆𝑃)
25 opphllem5.2 . . . . . . . . . 10 (𝜑𝑉(𝐾𝑆)𝐶)
261, 3, 7, 22, 21, 24, 5, 25hlne2 26379 . . . . . . . . 9 (𝜑𝐶𝑆)
271, 3, 4, 5, 21, 24, 26tglinecom 26408 . . . . . . . 8 (𝜑 → (𝐶𝐿𝑆) = (𝑆𝐿𝐶))
2823, 27breqtrd 5068 . . . . . . 7 (𝜑𝐷(⟂G‘𝐺)(𝑆𝐿𝐶))
291, 3, 7, 22, 21, 24, 5, 25hlcomd 26377 . . . . . . 7 (𝜑𝐶(𝐾𝑆)𝑉)
301, 2, 3, 4, 5, 6, 7, 20, 21, 22, 28, 29hlperpnel 26498 . . . . . 6 (𝜑 → ¬ 𝑉𝐷)
3130ad3antrrr 728 . . . . 5 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → ¬ 𝑉𝐷)
32 simplr 767 . . . . . 6 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡𝐷)
33 simpr 487 . . . . . . . 8 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅 = 𝑡) → 𝑅 = 𝑡)
34 eqid 2820 . . . . . . . . 9 (pInvG‘𝐺) = (pInvG‘𝐺)
355ad4antr 730 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐺 ∈ TarskiG)
3621ad4antr 730 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐶𝑃)
3712ad4antr 730 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅𝑃)
385ad3antrrr 728 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐺 ∈ TarskiG)
396ad3antrrr 728 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐷 ∈ ran 𝐿)
401, 4, 3, 38, 39, 32tglnpt 26322 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡𝑃)
4140adantr 483 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑡𝑃)
429ad4antr 730 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐴𝑃)
4324ad4antr 730 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑆𝑃)
44 simpllr 774 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 = 𝑆)
451, 3, 4, 5, 21, 24, 26tglinerflx2 26407 . . . . . . . . . . . . 13 (𝜑𝑆 ∈ (𝐶𝐿𝑆))
4645ad3antrrr 728 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑆 ∈ (𝐶𝐿𝑆))
4744, 46eqeltrd 2911 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐶𝐿𝑆))
4847adantr 483 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅 ∈ (𝐶𝐿𝑆))
494, 5, 23perpln2 26484 . . . . . . . . . . . . 13 (𝜑 → (𝐶𝐿𝑆) ∈ ran 𝐿)
501, 2, 3, 4, 5, 6, 49, 23perpcom 26486 . . . . . . . . . . . 12 (𝜑 → (𝐶𝐿𝑆)(⟂G‘𝐺)𝐷)
5150ad4antr 730 . . . . . . . . . . 11 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → (𝐶𝐿𝑆)(⟂G‘𝐺)𝐷)
52 simpr 487 . . . . . . . . . . . 12 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅𝑡)
536ad4antr 730 . . . . . . . . . . . 12 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐷 ∈ ran 𝐿)
548ad4antr 730 . . . . . . . . . . . 12 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅𝐷)
55 simpllr 774 . . . . . . . . . . . 12 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑡𝐷)
561, 3, 4, 35, 37, 41, 52, 52, 53, 54, 55tglinethru 26409 . . . . . . . . . . 11 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐷 = (𝑅𝐿𝑡))
5751, 56breqtrd 5068 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → (𝐶𝐿𝑆)(⟂G‘𝐺)(𝑅𝐿𝑡))
581, 2, 3, 4, 35, 36, 43, 48, 41, 57perprag 26499 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → ⟨“𝐶𝑅𝑡”⟩ ∈ (∟G‘𝐺))
591, 3, 4, 5, 9, 12, 14tglinerflx2 26407 . . . . . . . . . . 11 (𝜑𝑅 ∈ (𝐴𝐿𝑅))
6059ad4antr 730 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅 ∈ (𝐴𝐿𝑅))
614, 5, 11perpln2 26484 . . . . . . . . . . . . 13 (𝜑 → (𝐴𝐿𝑅) ∈ ran 𝐿)
621, 2, 3, 4, 5, 6, 61, 11perpcom 26486 . . . . . . . . . . . 12 (𝜑 → (𝐴𝐿𝑅)(⟂G‘𝐺)𝐷)
6362ad4antr 730 . . . . . . . . . . 11 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → (𝐴𝐿𝑅)(⟂G‘𝐺)𝐷)
6463, 56breqtrd 5068 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → (𝐴𝐿𝑅)(⟂G‘𝐺)(𝑅𝐿𝑡))
651, 2, 3, 4, 35, 42, 37, 60, 41, 64perprag 26499 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → ⟨“𝐴𝑅𝑡”⟩ ∈ (∟G‘𝐺))
66 simplr 767 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑡 ∈ (𝐴𝐼𝐶))
671, 2, 3, 35, 42, 41, 36, 66tgbtwncom 26261 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑡 ∈ (𝐶𝐼𝐴))
681, 2, 3, 4, 34, 35, 36, 37, 41, 42, 58, 65, 67ragflat2 26476 . . . . . . . 8 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅 = 𝑡)
6933, 68pm2.61dane 3093 . . . . . . 7 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 = 𝑡)
709ad3antrrr 728 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐴𝑃)
7110ad3antrrr 728 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑈𝑃)
7222ad3antrrr 728 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑉𝑃)
7312ad3antrrr 728 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅𝑃)
7417ad3antrrr 728 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐴(𝐾𝑅)𝑈)
7521ad3antrrr 728 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐶𝑃)
7625ad3antrrr 728 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑉(𝐾𝑆)𝐶)
7744fveq2d 6650 . . . . . . . . . . . . 13 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → (𝐾𝑅) = (𝐾𝑆))
7877breqd 5053 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → (𝑉(𝐾𝑅)𝐶𝑉(𝐾𝑆)𝐶))
7976, 78mpbird 259 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑉(𝐾𝑅)𝐶)
801, 3, 7, 72, 75, 73, 38, 79hlcomd 26377 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐶(𝐾𝑅)𝑉)
81 simpr 487 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡 ∈ (𝐴𝐼𝐶))
8269, 81eqeltrd 2911 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐴𝐼𝐶))
831, 2, 3, 38, 70, 73, 75, 82tgbtwncom 26261 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐶𝐼𝐴))
841, 3, 7, 75, 72, 70, 38, 73, 80, 83btwnhl 26387 . . . . . . . . 9 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝑉𝐼𝐴))
851, 2, 3, 38, 72, 73, 70, 84tgbtwncom 26261 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐴𝐼𝑉))
861, 3, 7, 70, 71, 72, 38, 73, 74, 85btwnhl 26387 . . . . . . 7 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝑈𝐼𝑉))
8769, 86eqeltrrd 2912 . . . . . 6 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡 ∈ (𝑈𝐼𝑉))
88 rspe 3291 . . . . . 6 ((𝑡𝐷𝑡 ∈ (𝑈𝐼𝑉)) → ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))
8932, 87, 88syl2anc 586 . . . . 5 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))
9019, 31, 89jca31 517 . . . 4 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → ((¬ 𝑈𝐷 ∧ ¬ 𝑉𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉)))
91 hpg.o . . . . . 6 𝑂 = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃𝐷) ∧ 𝑏 ∈ (𝑃𝐷)) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑎𝐼𝑏))}
921, 2, 3, 91, 10, 22islnopp 26512 . . . . 5 (𝜑 → (𝑈𝑂𝑉 ↔ ((¬ 𝑈𝐷 ∧ ¬ 𝑉𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))))
9392ad3antrrr 728 . . . 4 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → (𝑈𝑂𝑉 ↔ ((¬ 𝑈𝐷 ∧ ¬ 𝑉𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))))
9490, 93mpbird 259 . . 3 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑈𝑂𝑉)
95 opphllem5.o . . . . . 6 (𝜑𝐴𝑂𝐶)
961, 2, 3, 91, 9, 21islnopp 26512 . . . . . 6 (𝜑 → (𝐴𝑂𝐶 ↔ ((¬ 𝐴𝐷 ∧ ¬ 𝐶𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶))))
9795, 96mpbid 234 . . . . 5 (𝜑 → ((¬ 𝐴𝐷 ∧ ¬ 𝐶𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶)))
9897simprd 498 . . . 4 (𝜑 → ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶))
9998adantr 483 . . 3 ((𝜑𝑅 = 𝑆) → ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶))
10094, 99r19.29a 3276 . 2 ((𝜑𝑅 = 𝑆) → 𝑈𝑂𝑉)
1016ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐷 ∈ ran 𝐿)
1025ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐺 ∈ TarskiG)
103 eqid 2820 . . . . 5 ((pInvG‘𝐺)‘𝑚) = ((pInvG‘𝐺)‘𝑚)
1049ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐴𝑃)
10521ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐶𝑃)
1068ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑅𝐷)
10720ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑆𝐷)
108 simpllr 774 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑚𝑃)
10995ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐴𝑂𝐶)
11011ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐷(⟂G‘𝐺)(𝐴𝐿𝑅))
11123ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐷(⟂G‘𝐺)(𝐶𝐿𝑆))
112 simpr 487 . . . . . 6 ((𝜑𝑅𝑆) → 𝑅𝑆)
113112ad3antrrr 728 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑅𝑆)
114 simpr 487 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴))
11510ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑈𝑃)
116 simplr 767 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅))
117116eqcomd 2826 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → (((pInvG‘𝐺)‘𝑚)‘𝑅) = 𝑆)
11822ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑉𝑃)
11913ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑈(𝐾𝑅)𝐴)
12025ad4antr 730 . . . . 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 26523 . . . 4 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑈𝑂𝑉)
1226ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐷 ∈ ran 𝐿)
1235ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐺 ∈ TarskiG)
12422ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑉𝑃)
12510ad4antr 730 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑈𝑃)
12621ad4antr 730 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐶𝑃)
1279ad4antr 730 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐴𝑃)
12820ad4antr 730 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑆𝐷)
1298ad4antr 730 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑅𝐷)
130 simpllr 774 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑚𝑃)
13195ad4antr 730 . . . . . . 7 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐴𝑂𝐶)
1321, 2, 3, 91, 4, 122, 123, 127, 126, 131oppcom 26517 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐶𝑂𝐴)
13323ad4antr 730 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐷(⟂G‘𝐺)(𝐶𝐿𝑆))
13411ad4antr 730 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐷(⟂G‘𝐺)(𝐴𝐿𝑅))
135112necomd 3061 . . . . . . 7 ((𝜑𝑅𝑆) → 𝑆𝑅)
136135ad3antrrr 728 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑆𝑅)
137 simpr 487 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶))
13812ad4antr 730 . . . . . . 7 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑅𝑃)
139 simplr 767 . . . . . . . 8 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅))
140139eqcomd 2826 . . . . . . 7 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → (((pInvG‘𝐺)‘𝑚)‘𝑅) = 𝑆)
1411, 2, 3, 4, 34, 123, 130, 103, 138, 140mircom 26436 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → (((pInvG‘𝐺)‘𝑚)‘𝑆) = 𝑅)
14225ad4antr 730 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑉(𝐾𝑆)𝐶)
14313ad4antr 730 . . . . . 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 26523 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑉𝑂𝑈)
1451, 2, 3, 91, 4, 122, 123, 124, 125, 144oppcom 26517 . . . 4 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑈𝑂𝑉)
146 eqid 2820 . . . . . 6 (≤G‘𝐺) = (≤G‘𝐺)
1471, 2, 3, 146, 5, 24, 21, 12, 9legtrid 26364 . . . . 5 (𝜑 → ((𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴) ∨ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)))
148147ad3antrrr 728 . . . 4 ((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) → ((𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴) ∨ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)))
149121, 145, 148mpjaodan 955 . . 3 ((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) → 𝑈𝑂𝑉)
1505adantr 483 . . . 4 ((𝜑𝑅𝑆) → 𝐺 ∈ TarskiG)
15112adantr 483 . . . 4 ((𝜑𝑅𝑆) → 𝑅𝑃)
15224adantr 483 . . . 4 ((𝜑𝑅𝑆) → 𝑆𝑃)
1531, 2, 3, 91, 4, 6, 5, 9, 21, 95opptgdim2 26518 . . . . 5 (𝜑𝐺DimTarskiG≥2)
154153adantr 483 . . . 4 ((𝜑𝑅𝑆) → 𝐺DimTarskiG≥2)
1551, 2, 3, 4, 150, 34, 151, 152, 154midex 26510 . . 3 ((𝜑𝑅𝑆) → ∃𝑚𝑃 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅))
156149, 155r19.29a 3276 . 2 ((𝜑𝑅𝑆) → 𝑈𝑂𝑉)
157100, 156pm2.61dane 3093 1 (𝜑𝑈𝑂𝑉)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398  wo 843   = wceq 1537  wcel 2114  wne 3006  wrex 3126  cdif 3910   class class class wbr 5042  {copab 5104  ran crn 5532  cfv 6331  (class class class)co 7133  2c2 11671  Basecbs 16462  distcds 16553  TarskiGcstrkg 26203  DimTarskiGcstrkgld 26207  Itvcitv 26209  LineGclng 26210  ≤Gcleg 26355  hlGchlg 26373  pInvGcmir 26425  ⟂Gcperpg 26468
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 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2792  ax-rep 5166  ax-sep 5179  ax-nul 5186  ax-pow 5242  ax-pr 5306  ax-un 7439  ax-cnex 10571  ax-resscn 10572  ax-1cn 10573  ax-icn 10574  ax-addcl 10575  ax-addrcl 10576  ax-mulcl 10577  ax-mulrcl 10578  ax-mulcom 10579  ax-addass 10580  ax-mulass 10581  ax-distr 10582  ax-i2m1 10583  ax-1ne0 10584  ax-1rid 10585  ax-rnegex 10586  ax-rrecex 10587  ax-cnre 10588  ax-pre-lttri 10589  ax-pre-lttrn 10590  ax-pre-ltadd 10591  ax-pre-mulgt0 10592
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2653  df-clab 2799  df-cleq 2813  df-clel 2891  df-nfc 2959  df-ne 3007  df-nel 3111  df-ral 3130  df-rex 3131  df-reu 3132  df-rmo 3133  df-rab 3134  df-v 3475  df-sbc 3753  df-csb 3861  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3932  df-nul 4270  df-if 4444  df-pw 4517  df-sn 4544  df-pr 4546  df-tp 4548  df-op 4550  df-uni 4815  df-int 4853  df-iun 4897  df-br 5043  df-opab 5105  df-mpt 5123  df-tr 5149  df-id 5436  df-eprel 5441  df-po 5450  df-so 5451  df-fr 5490  df-we 5492  df-xp 5537  df-rel 5538  df-cnv 5539  df-co 5540  df-dm 5541  df-rn 5542  df-res 5543  df-ima 5544  df-pred 6124  df-ord 6170  df-on 6171  df-lim 6172  df-suc 6173  df-iota 6290  df-fun 6333  df-fn 6334  df-f 6335  df-f1 6336  df-fo 6337  df-f1o 6338  df-fv 6339  df-riota 7091  df-ov 7136  df-oprab 7137  df-mpo 7138  df-om 7559  df-1st 7667  df-2nd 7668  df-wrecs 7925  df-recs 7986  df-rdg 8024  df-1o 8080  df-oadd 8084  df-er 8267  df-map 8386  df-pm 8387  df-en 8488  df-dom 8489  df-sdom 8490  df-fin 8491  df-dju 9308  df-card 9346  df-pnf 10655  df-mnf 10656  df-xr 10657  df-ltxr 10658  df-le 10659  df-sub 10850  df-neg 10851  df-nn 11617  df-2 11679  df-3 11680  df-n0 11877  df-xnn0 11947  df-z 11961  df-uz 12223  df-fz 12877  df-fzo 13018  df-hash 13676  df-word 13847  df-concat 13903  df-s1 13930  df-s2 14190  df-s3 14191  df-trkgc 26221  df-trkgb 26222  df-trkgcb 26223  df-trkgld 26225  df-trkg 26226  df-cgrg 26284  df-leg 26356  df-hlg 26374  df-mir 26426  df-rag 26467  df-perpg 26469
This theorem is referenced by:  opphl  26527
  Copyright terms: Public domain W3C validator