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

Theorem opphllem5 29041
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 28827 . . . . . . . . 9 (𝜑𝑅𝑃)
13 opphllem5.1 . . . . . . . . . 10 (𝜑𝑈(𝐾𝑅)𝐴)
141, 3, 7, 10, 9, 12, 5, 13hlne2 28887 . . . . . . . . 9 (𝜑𝐴𝑅)
151, 3, 4, 5, 9, 12, 14tglinecom 28917 . . . . . . . 8 (𝜑 → (𝐴𝐿𝑅) = (𝑅𝐿𝐴))
1611, 15breqtrd 5137 . . . . . . 7 (𝜑𝐷(⟂G‘𝐺)(𝑅𝐿𝐴))
171, 3, 7, 10, 9, 12, 5, 13hlcomd 28885 . . . . . . 7 (𝜑𝐴(𝐾𝑅)𝑈)
181, 2, 3, 4, 5, 6, 7, 8, 9, 10, 16, 17hlperpnel 29015 . . . . . 6 (𝜑 → ¬ 𝑈𝐷)
1918ad3antrrr 742 . . . . 5 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → ¬ 𝑈𝐷)
20 opphllem5.s . . . . . . 7 (𝜑𝑆𝐷)
21 opphllem5.c . . . . . . 7 (𝜑𝐶𝑃)
22 opphllem5.v . . . . . . 7 (𝜑𝑉𝑃)
23 opphllem5.q . . . . . . . 8 (𝜑𝐷(⟂G‘𝐺)(𝐶𝐿𝑆))
241, 4, 3, 5, 6, 20tglnpt 28827 . . . . . . . . 9 (𝜑𝑆𝑃)
25 opphllem5.2 . . . . . . . . . 10 (𝜑𝑉(𝐾𝑆)𝐶)
261, 3, 7, 22, 21, 24, 5, 25hlne2 28887 . . . . . . . . 9 (𝜑𝐶𝑆)
271, 3, 4, 5, 21, 24, 26tglinecom 28917 . . . . . . . 8 (𝜑 → (𝐶𝐿𝑆) = (𝑆𝐿𝐶))
2823, 27breqtrd 5137 . . . . . . 7 (𝜑𝐷(⟂G‘𝐺)(𝑆𝐿𝐶))
291, 3, 7, 22, 21, 24, 5, 25hlcomd 28885 . . . . . . 7 (𝜑𝐶(𝐾𝑆)𝑉)
301, 2, 3, 4, 5, 6, 7, 20, 21, 22, 28, 29hlperpnel 29015 . . . . . 6 (𝜑 → ¬ 𝑉𝐷)
3130ad3antrrr 742 . . . . 5 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → ¬ 𝑉𝐷)
32 simplr 780 . . . . . 6 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡𝐷)
33 simpr 489 . . . . . . . 8 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅 = 𝑡) → 𝑅 = 𝑡)
34 eqid 2763 . . . . . . . . 9 (pInvG‘𝐺) = (pInvG‘𝐺)
355ad4antr 744 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐺 ∈ TarskiG)
3621ad4antr 744 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐶𝑃)
3712ad4antr 744 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅𝑃)
385ad3antrrr 742 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐺 ∈ TarskiG)
396ad3antrrr 742 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐷 ∈ ran 𝐿)
401, 4, 3, 38, 39, 32tglnpt 28827 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡𝑃)
4140adantr 485 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑡𝑃)
429ad4antr 744 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐴𝑃)
4324ad4antr 744 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑆𝑃)
44 simpllr 787 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 = 𝑆)
451, 3, 4, 5, 21, 24, 26tglinerflx2 28916 . . . . . . . . . . . . 13 (𝜑𝑆 ∈ (𝐶𝐿𝑆))
4645ad3antrrr 742 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑆 ∈ (𝐶𝐿𝑆))
4744, 46eqeltrd 2863 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐶𝐿𝑆))
4847adantr 485 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅 ∈ (𝐶𝐿𝑆))
494, 5, 23perpln2 29000 . . . . . . . . . . . . 13 (𝜑 → (𝐶𝐿𝑆) ∈ ran 𝐿)
501, 2, 3, 4, 5, 6, 49, 23perpcom 29002 . . . . . . . . . . . 12 (𝜑 → (𝐶𝐿𝑆)(⟂G‘𝐺)𝐷)
5150ad4antr 744 . . . . . . . . . . 11 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → (𝐶𝐿𝑆)(⟂G‘𝐺)𝐷)
52 simpr 489 . . . . . . . . . . . 12 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅𝑡)
536ad4antr 744 . . . . . . . . . . . 12 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐷 ∈ ran 𝐿)
548ad4antr 744 . . . . . . . . . . . 12 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅𝐷)
55 simpllr 787 . . . . . . . . . . . 12 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑡𝐷)
561, 3, 4, 35, 37, 41, 52, 52, 53, 54, 55tglinethru 28918 . . . . . . . . . . 11 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝐷 = (𝑅𝐿𝑡))
5751, 56breqtrd 5137 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → (𝐶𝐿𝑆)(⟂G‘𝐺)(𝑅𝐿𝑡))
581, 2, 3, 4, 35, 36, 43, 48, 41, 57perprag 29016 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → ⟨“𝐶𝑅𝑡”⟩ ∈ (∟G‘𝐺))
591, 3, 4, 5, 9, 12, 14tglinerflx2 28916 . . . . . . . . . . 11 (𝜑𝑅 ∈ (𝐴𝐿𝑅))
6059ad4antr 744 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅 ∈ (𝐴𝐿𝑅))
614, 5, 11perpln2 29000 . . . . . . . . . . . . 13 (𝜑 → (𝐴𝐿𝑅) ∈ ran 𝐿)
621, 2, 3, 4, 5, 6, 61, 11perpcom 29002 . . . . . . . . . . . 12 (𝜑 → (𝐴𝐿𝑅)(⟂G‘𝐺)𝐷)
6362ad4antr 744 . . . . . . . . . . 11 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → (𝐴𝐿𝑅)(⟂G‘𝐺)𝐷)
6463, 56breqtrd 5137 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → (𝐴𝐿𝑅)(⟂G‘𝐺)(𝑅𝐿𝑡))
651, 2, 3, 4, 35, 42, 37, 60, 41, 64perprag 29016 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → ⟨“𝐴𝑅𝑡”⟩ ∈ (∟G‘𝐺))
66 simplr 780 . . . . . . . . . 10 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑡 ∈ (𝐴𝐼𝐶))
671, 2, 3, 35, 42, 41, 36, 66tgbtwncom 28766 . . . . . . . . 9 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑡 ∈ (𝐶𝐼𝐴))
681, 2, 3, 4, 34, 35, 36, 37, 41, 42, 58, 65, 67ragflat2 28992 . . . . . . . 8 (((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) ∧ 𝑅𝑡) → 𝑅 = 𝑡)
6933, 68pm2.61dane 3045 . . . . . . 7 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 = 𝑡)
709ad3antrrr 742 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐴𝑃)
7110ad3antrrr 742 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑈𝑃)
7222ad3antrrr 742 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑉𝑃)
7312ad3antrrr 742 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅𝑃)
7417ad3antrrr 742 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐴(𝐾𝑅)𝑈)
7521ad3antrrr 742 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐶𝑃)
7625ad3antrrr 742 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑉(𝐾𝑆)𝐶)
7744fveq2d 6885 . . . . . . . . . . . . 13 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → (𝐾𝑅) = (𝐾𝑆))
7877breqd 5120 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → (𝑉(𝐾𝑅)𝐶𝑉(𝐾𝑆)𝐶))
7976, 78mpbird 260 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑉(𝐾𝑅)𝐶)
801, 3, 7, 72, 75, 73, 38, 79hlcomd 28885 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝐶(𝐾𝑅)𝑉)
81 simpr 489 . . . . . . . . . . . 12 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡 ∈ (𝐴𝐼𝐶))
8269, 81eqeltrd 2863 . . . . . . . . . . 11 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐴𝐼𝐶))
831, 2, 3, 38, 70, 73, 75, 82tgbtwncom 28766 . . . . . . . . . 10 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐶𝐼𝐴))
841, 3, 7, 75, 72, 70, 38, 73, 80, 83btwnhl 28895 . . . . . . . . 9 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝑉𝐼𝐴))
851, 2, 3, 38, 72, 73, 70, 84tgbtwncom 28766 . . . . . . . 8 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝐴𝐼𝑉))
861, 3, 7, 70, 71, 72, 38, 73, 74, 85btwnhl 28895 . . . . . . 7 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑅 ∈ (𝑈𝐼𝑉))
8769, 86eqeltrrd 2864 . . . . . 6 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑡 ∈ (𝑈𝐼𝑉))
88 rspe 3255 . . . . . 6 ((𝑡𝐷𝑡 ∈ (𝑈𝐼𝑉)) → ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))
8932, 87, 88syl2anc 595 . . . . 5 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))
9019, 31, 89jca31 523 . . . 4 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → ((¬ 𝑈𝐷 ∧ ¬ 𝑉𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉)))
91 hpg.o . . . . . 6 𝑂 = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃𝐷) ∧ 𝑏 ∈ (𝑃𝐷)) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑎𝐼𝑏))}
921, 2, 3, 91, 10, 22islnopp 29029 . . . . 5 (𝜑 → (𝑈𝑂𝑉 ↔ ((¬ 𝑈𝐷 ∧ ¬ 𝑉𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))))
9392ad3antrrr 742 . . . 4 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → (𝑈𝑂𝑉 ↔ ((¬ 𝑈𝐷 ∧ ¬ 𝑉𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑈𝐼𝑉))))
9490, 93mpbird 260 . . 3 ((((𝜑𝑅 = 𝑆) ∧ 𝑡𝐷) ∧ 𝑡 ∈ (𝐴𝐼𝐶)) → 𝑈𝑂𝑉)
95 opphllem5.o . . . . . 6 (𝜑𝐴𝑂𝐶)
961, 2, 3, 91, 9, 21islnopp 29029 . . . . . 6 (𝜑 → (𝐴𝑂𝐶 ↔ ((¬ 𝐴𝐷 ∧ ¬ 𝐶𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶))))
9795, 96mpbid 235 . . . . 5 (𝜑 → ((¬ 𝐴𝐷 ∧ ¬ 𝐶𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶)))
9897simprd 500 . . . 4 (𝜑 → ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶))
9998adantr 485 . . 3 ((𝜑𝑅 = 𝑆) → ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼𝐶))
10094, 99r19.29a 3173 . 2 ((𝜑𝑅 = 𝑆) → 𝑈𝑂𝑉)
1016ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐷 ∈ ran 𝐿)
1025ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐺 ∈ TarskiG)
103 eqid 2763 . . . . 5 ((pInvG‘𝐺)‘𝑚) = ((pInvG‘𝐺)‘𝑚)
1049ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐴𝑃)
10521ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐶𝑃)
1068ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑅𝐷)
10720ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑆𝐷)
108 simpllr 787 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑚𝑃)
10995ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐴𝑂𝐶)
11011ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐷(⟂G‘𝐺)(𝐴𝐿𝑅))
11123ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝐷(⟂G‘𝐺)(𝐶𝐿𝑆))
112 simpr 489 . . . . . 6 ((𝜑𝑅𝑆) → 𝑅𝑆)
113112ad3antrrr 742 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑅𝑆)
114 simpr 489 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴))
11510ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑈𝑃)
116 simplr 780 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅))
117116eqcomd 2769 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → (((pInvG‘𝐺)‘𝑚)‘𝑅) = 𝑆)
11822ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑉𝑃)
11913ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑈(𝐾𝑅)𝐴)
12025ad4antr 744 . . . . 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 29040 . . . 4 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴)) → 𝑈𝑂𝑉)
1226ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐷 ∈ ran 𝐿)
1235ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐺 ∈ TarskiG)
12422ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑉𝑃)
12510ad4antr 744 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑈𝑃)
12621ad4antr 744 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐶𝑃)
1279ad4antr 744 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐴𝑃)
12820ad4antr 744 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑆𝐷)
1298ad4antr 744 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑅𝐷)
130 simpllr 787 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑚𝑃)
13195ad4antr 744 . . . . . . 7 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐴𝑂𝐶)
1321, 2, 3, 91, 4, 122, 123, 127, 126, 131oppcom 29034 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐶𝑂𝐴)
13323ad4antr 744 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐷(⟂G‘𝐺)(𝐶𝐿𝑆))
13411ad4antr 744 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝐷(⟂G‘𝐺)(𝐴𝐿𝑅))
135112necomd 3013 . . . . . . 7 ((𝜑𝑅𝑆) → 𝑆𝑅)
136135ad3antrrr 742 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑆𝑅)
137 simpr 489 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶))
13812ad4antr 744 . . . . . . 7 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑅𝑃)
139 simplr 780 . . . . . . . 8 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅))
140139eqcomd 2769 . . . . . . 7 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → (((pInvG‘𝐺)‘𝑚)‘𝑅) = 𝑆)
1411, 2, 3, 4, 34, 123, 130, 103, 138, 140mircom 28949 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → (((pInvG‘𝐺)‘𝑚)‘𝑆) = 𝑅)
14225ad4antr 744 . . . . . 6 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑉(𝐾𝑆)𝐶)
14313ad4antr 744 . . . . . 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 29040 . . . . 5 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑉𝑂𝑈)
1451, 2, 3, 91, 4, 122, 123, 124, 125, 144oppcom 29034 . . . 4 (((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) ∧ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)) → 𝑈𝑂𝑉)
146 eqid 2763 . . . . . 6 (≤G‘𝐺) = (≤G‘𝐺)
1471, 2, 3, 146, 5, 24, 21, 12, 9legtrid 28869 . . . . 5 (𝜑 → ((𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴) ∨ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)))
148147ad3antrrr 742 . . . 4 ((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) → ((𝑆 𝐶)(≤G‘𝐺)(𝑅 𝐴) ∨ (𝑅 𝐴)(≤G‘𝐺)(𝑆 𝐶)))
149121, 145, 148mpjaodan 973 . . 3 ((((𝜑𝑅𝑆) ∧ 𝑚𝑃) ∧ 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅)) → 𝑈𝑂𝑉)
1505adantr 485 . . . 4 ((𝜑𝑅𝑆) → 𝐺 ∈ TarskiG)
15112adantr 485 . . . 4 ((𝜑𝑅𝑆) → 𝑅𝑃)
15224adantr 485 . . . 4 ((𝜑𝑅𝑆) → 𝑆𝑃)
1531, 2, 3, 91, 4, 6, 5, 9, 21, 95opptgdim2 29035 . . . . 5 (𝜑𝐺DimTarskiG≥2)
154153adantr 485 . . . 4 ((𝜑𝑅𝑆) → 𝐺DimTarskiG≥2)
1551, 2, 3, 4, 150, 34, 151, 152, 154midex 29027 . . 3 ((𝜑𝑅𝑆) → ∃𝑚𝑃 𝑆 = (((pInvG‘𝐺)‘𝑚)‘𝑅))
156149, 155r19.29a 3173 . 2 ((𝜑𝑅𝑆) → 𝑈𝑂𝑉)
157100, 156pm2.61dane 3045 1 (𝜑𝑈𝑂𝑉)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wb 209  wa 400  wo 860   = wceq 1570  wcel 2143  wne 2958  wrex 3089  cdif 3902   class class class wbr 5109  {copab 5173  ran crn 5662  cfv 6536  (class class class)co 7410  2c2 12299  Basecbs 17273  distcds 17323  TarskiGcstrkg 28705  DimTarskiGcstrkgld 28709  Itvcitv 28711  LineGclng 28712  ≤Gcleg 28860  hlGchlg 28878  pInvGcmir 28938  ⟂Gcperpg 28984
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-cnex 11160  ax-resscn 11161  ax-1cn 11162  ax-icn 11163  ax-addcl 11164  ax-addrcl 11165  ax-mulcl 11166  ax-mulrcl 11167  ax-mulcom 11168  ax-addass 11169  ax-mulass 11170  ax-distr 11171  ax-i2m1 11172  ax-1ne0 11173  ax-1rid 11174  ax-rnegex 11175  ax-rrecex 11176  ax-cnre 11177  ax-pre-lttri 11178  ax-pre-lttrn 11179  ax-pre-ltadd 11180  ax-pre-mulgt0 11181
This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-tp 4594  df-op 4596  df-uni 4873  df-int 4913  df-iun 4958  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  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 7859  df-1st 7982  df-2nd 7983  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-oadd 8453  df-er 8690  df-map 8822  df-pm 8823  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-dju 9892  df-card 9930  df-pnf 11249  df-mnf 11250  df-xr 11251  df-ltxr 11252  df-le 11253  df-sub 11447  df-neg 11448  df-nn 12238  df-2 12307  df-3 12308  df-n0 12509  df-xnn0 12582  df-z 12596  df-uz 12867  df-fz 13540  df-fzo 13688  df-hash 14372  df-word 14556  df-concat 14613  df-s1 14639  df-s2 14890  df-s3 14891  df-trkgc 28726  df-trkgb 28727  df-trkgcb 28728  df-trkgld 28730  df-trkg 28731  df-cgrg 28789  df-leg 28861  df-hlg 28879  df-mir 28939  df-rag 28983  df-perpg 28985
This theorem is used by:  opphl  29044
  Copyright terms: Public domain W3C validator