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

Theorem colhp 25377
Description: Half-plane relation for colinear points. Theorem 9.19 of [Schwabhauser] p. 73. (Contributed by Thierry Arnoux, 3-Aug-2020.)
Hypotheses
Ref Expression
hpgid.p 𝑃 = (Base‘𝐺)
hpgid.i 𝐼 = (Itv‘𝐺)
hpgid.l 𝐿 = (LineG‘𝐺)
hpgid.g (𝜑𝐺 ∈ TarskiG)
hpgid.d (𝜑𝐷 ∈ ran 𝐿)
hpgid.a (𝜑𝐴𝑃)
hpgid.o 𝑂 = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃𝐷) ∧ 𝑏 ∈ (𝑃𝐷)) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑎𝐼𝑏))}
colopp.b (𝜑𝐵𝑃)
colopp.p (𝜑𝐶𝐷)
colopp.1 (𝜑 → (𝐶 ∈ (𝐴𝐿𝐵) ∨ 𝐴 = 𝐵))
colhp.k 𝐾 = (hlG‘𝐺)
Assertion
Ref Expression
colhp (𝜑 → (𝐴((hpG‘𝐺)‘𝐷)𝐵 ↔ (𝐴(𝐾𝐶)𝐵 ∧ ¬ 𝐴𝐷)))
Distinct variable groups:   𝑡,𝐴   𝑡,𝐵   𝐷,𝑎,𝑏,𝑡   𝐺,𝑎,𝑏,𝑡   𝐼,𝑎,𝑏,𝑡   𝑂,𝑎,𝑏,𝑡   𝑃,𝑎,𝑏,𝑡   𝜑,𝑡   𝑡,𝐶   𝐿,𝑎,𝑏,𝑡   𝐴,𝑎,𝑏   𝐶,𝑎,𝑏
Allowed substitution hints:   𝜑(𝑎,𝑏)   𝐵(𝑎,𝑏)   𝐾(𝑡,𝑎,𝑏)

Proof of Theorem colhp
StepHypRef Expression
1 ancom 464 . . 3 ((𝐴(𝐾𝐶)𝐵 ∧ ¬ 𝐴𝐷) ↔ (¬ 𝐴𝐷𝐴(𝐾𝐶)𝐵))
21a1i 11 . 2 (𝜑 → ((𝐴(𝐾𝐶)𝐵 ∧ ¬ 𝐴𝐷) ↔ (¬ 𝐴𝐷𝐴(𝐾𝐶)𝐵)))
3 hpgid.p . . . . 5 𝑃 = (Base‘𝐺)
4 hpgid.i . . . . 5 𝐼 = (Itv‘𝐺)
5 hpgid.l . . . . 5 𝐿 = (LineG‘𝐺)
6 hpgid.g . . . . . 6 (𝜑𝐺 ∈ TarskiG)
76adantr 479 . . . . 5 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐺 ∈ TarskiG)
8 hpgid.d . . . . . 6 (𝜑𝐷 ∈ ran 𝐿)
98adantr 479 . . . . 5 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐷 ∈ ran 𝐿)
10 colopp.b . . . . . 6 (𝜑𝐵𝑃)
1110adantr 479 . . . . 5 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐵𝑃)
12 hpgid.o . . . . 5 𝑂 = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃𝐷) ∧ 𝑏 ∈ (𝑃𝐷)) ∧ ∃𝑡𝐷 𝑡 ∈ (𝑎𝐼𝑏))}
13 eqid 2606 . . . . . . 7 (dist‘𝐺) = (dist‘𝐺)
14 eqid 2606 . . . . . . 7 (pInvG‘𝐺) = (pInvG‘𝐺)
15 colopp.p . . . . . . . 8 (𝜑𝐶𝐷)
163, 5, 4, 6, 8, 15tglnpt 25159 . . . . . . 7 (𝜑𝐶𝑃)
17 eqid 2606 . . . . . . 7 ((pInvG‘𝐺)‘𝐶) = ((pInvG‘𝐺)‘𝐶)
18 hpgid.a . . . . . . 7 (𝜑𝐴𝑃)
193, 13, 4, 5, 14, 6, 16, 17, 18mircl 25271 . . . . . 6 (𝜑 → (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝑃)
2019adantr 479 . . . . 5 ((𝜑 ∧ ¬ 𝐴𝐷) → (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝑃)
2115adantr 479 . . . . 5 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐶𝐷)
2216adantr 479 . . . . . 6 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐶𝑃)
2318adantr 479 . . . . . . 7 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐴𝑃)
24 nelne2 2875 . . . . . . . . . . 11 ((𝐶𝐷 ∧ ¬ 𝐴𝐷) → 𝐶𝐴)
2515, 24sylan 486 . . . . . . . . . 10 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐶𝐴)
2625necomd 2833 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐴𝐶)
2726neneqd 2783 . . . . . . . 8 ((𝜑 ∧ ¬ 𝐴𝐷) → ¬ 𝐴 = 𝐶)
28 simpr 475 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ ¬ 𝐴𝐷) → ¬ 𝐴𝐷)
293, 13, 4, 5, 14, 6, 16, 17, 18mirmir 25272 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (((pInvG‘𝐺)‘𝐶)‘(((pInvG‘𝐺)‘𝐶)‘𝐴)) = 𝐴)
3029adantr 479 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷) → (((pInvG‘𝐺)‘𝐶)‘(((pInvG‘𝐺)‘𝐶)‘𝐴)) = 𝐴)
316adantr 479 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷) → 𝐺 ∈ TarskiG)
328adantr 479 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷) → 𝐷 ∈ ran 𝐿)
3315adantr 479 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷) → 𝐶𝐷)
34 simpr 475 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷) → (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷)
353, 13, 4, 5, 14, 31, 17, 32, 33, 34mirln 25286 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷) → (((pInvG‘𝐺)‘𝐶)‘(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∈ 𝐷)
3630, 35eqeltrrd 2685 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷) → 𝐴𝐷)
3736stoic1a 1687 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ ¬ 𝐴𝐷) → ¬ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷)
38 simpr 475 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑡 = 𝐶) → 𝑡 = 𝐶)
39 eqidd 2607 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑡 = 𝐶) → (𝐴𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) = (𝐴𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)))
4038, 39eleq12d 2678 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑡 = 𝐶) → (𝑡 ∈ (𝐴𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ↔ 𝐶 ∈ (𝐴𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴))))
413, 13, 4, 5, 14, 6, 16, 17, 18mirbtwn 25268 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝐶 ∈ ((((pInvG‘𝐺)‘𝐶)‘𝐴)𝐼𝐴))
423, 13, 4, 6, 19, 16, 18, 41tgbtwncom 25097 . . . . . . . . . . . . . . . . . . 19 (𝜑𝐶 ∈ (𝐴𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)))
4315, 40, 42rspcedvd 3285 . . . . . . . . . . . . . . . . . 18 (𝜑 → ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)))
4443adantr 479 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ ¬ 𝐴𝐷) → ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)))
4528, 37, 44jca31 554 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ ¬ 𝐴𝐷) → ((¬ 𝐴𝐷 ∧ ¬ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴))))
463, 13, 4, 12, 23, 20islnopp 25346 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ ¬ 𝐴𝐷) → (𝐴𝑂(((pInvG‘𝐺)‘𝐶)‘𝐴) ↔ ((¬ 𝐴𝐷 ∧ ¬ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷) ∧ ∃𝑡𝐷 𝑡 ∈ (𝐴𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)))))
4745, 46mpbird 245 . . . . . . . . . . . . . . 15 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐴𝑂(((pInvG‘𝐺)‘𝐶)‘𝐴))
483, 13, 4, 12, 5, 9, 7, 23, 20, 47oppne3 25350 . . . . . . . . . . . . . 14 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐴 ≠ (((pInvG‘𝐺)‘𝐶)‘𝐴))
4942adantr 479 . . . . . . . . . . . . . 14 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐶 ∈ (𝐴𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)))
503, 4, 5, 7, 23, 20, 22, 48, 49btwnlng1 25229 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ 𝐴𝐷) → 𝐶 ∈ (𝐴𝐿(((pInvG‘𝐺)‘𝐶)‘𝐴)))
5150orcd 405 . . . . . . . . . . . 12 ((𝜑 ∧ ¬ 𝐴𝐷) → (𝐶 ∈ (𝐴𝐿(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∨ 𝐴 = (((pInvG‘𝐺)‘𝐶)‘𝐴)))
523, 5, 4, 7, 23, 20, 22, 51colcom 25168 . . . . . . . . . . 11 ((𝜑 ∧ ¬ 𝐴𝐷) → (𝐶 ∈ ((((pInvG‘𝐺)‘𝐶)‘𝐴)𝐿𝐴) ∨ (((pInvG‘𝐺)‘𝐶)‘𝐴) = 𝐴))
533, 5, 4, 7, 20, 23, 22, 52colrot1 25169 . . . . . . . . . 10 ((𝜑 ∧ ¬ 𝐴𝐷) → ((((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ (𝐴𝐿𝐶) ∨ 𝐴 = 𝐶))
5453orcomd 401 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝐴𝐷) → (𝐴 = 𝐶 ∨ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ (𝐴𝐿𝐶)))
5554ord 390 . . . . . . . 8 ((𝜑 ∧ ¬ 𝐴𝐷) → (¬ 𝐴 = 𝐶 → (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ (𝐴𝐿𝐶)))
5627, 55mpd 15 . . . . . . 7 ((𝜑 ∧ ¬ 𝐴𝐷) → (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ (𝐴𝐿𝐶))
57 colopp.1 . . . . . . . . . 10 (𝜑 → (𝐶 ∈ (𝐴𝐿𝐵) ∨ 𝐴 = 𝐵))
583, 5, 4, 6, 18, 10, 16, 57colrot1 25169 . . . . . . . . 9 (𝜑 → (𝐴 ∈ (𝐵𝐿𝐶) ∨ 𝐵 = 𝐶))
593, 5, 4, 6, 10, 16, 18, 58colcom 25168 . . . . . . . 8 (𝜑 → (𝐴 ∈ (𝐶𝐿𝐵) ∨ 𝐶 = 𝐵))
6059adantr 479 . . . . . . 7 ((𝜑 ∧ ¬ 𝐴𝐷) → (𝐴 ∈ (𝐶𝐿𝐵) ∨ 𝐶 = 𝐵))
613, 4, 5, 7, 20, 23, 22, 11, 56, 60coltr 25257 . . . . . 6 ((𝜑 ∧ ¬ 𝐴𝐷) → ((((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ (𝐶𝐿𝐵) ∨ 𝐶 = 𝐵))
623, 5, 4, 7, 22, 11, 20, 61colrot1 25169 . . . . 5 ((𝜑 ∧ ¬ 𝐴𝐷) → (𝐶 ∈ (𝐵𝐿(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∨ 𝐵 = (((pInvG‘𝐺)‘𝐶)‘𝐴)))
633, 4, 5, 7, 9, 11, 12, 20, 21, 62colopp 25376 . . . 4 ((𝜑 ∧ ¬ 𝐴𝐷) → (𝐵𝑂(((pInvG‘𝐺)‘𝐶)‘𝐴) ↔ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷 ∧ ¬ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷)))
643, 4, 5, 12, 7, 9, 23, 11, 20, 47lnopp2hpgb 25370 . . . 4 ((𝜑 ∧ ¬ 𝐴𝐷) → (𝐵𝑂(((pInvG‘𝐺)‘𝐶)‘𝐴) ↔ 𝐴((hpG‘𝐺)‘𝐷)𝐵))
65 colhp.k . . . . . . . . 9 𝐾 = (hlG‘𝐺)
66 simpll 785 . . . . . . . . . 10 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷)) → 𝜑)
6766, 10syl 17 . . . . . . . . 9 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷)) → 𝐵𝑃)
6866, 18syl 17 . . . . . . . . 9 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷)) → 𝐴𝑃)
6966, 16syl 17 . . . . . . . . 9 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷)) → 𝐶𝑃)
7066, 6syl 17 . . . . . . . . 9 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷)) → 𝐺 ∈ TarskiG)
7166, 15syl 17 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷)) → 𝐶𝐷)
72 simprr 791 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷)) → ¬ 𝐵𝐷)
73 nelne2 2875 . . . . . . . . . . . 12 ((𝐶𝐷 ∧ ¬ 𝐵𝐷) → 𝐶𝐵)
7473necomd 2833 . . . . . . . . . . 11 ((𝐶𝐷 ∧ ¬ 𝐵𝐷) → 𝐵𝐶)
7571, 72, 74syl2anc 690 . . . . . . . . . 10 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷)) → 𝐵𝐶)
7626adantr 479 . . . . . . . . . 10 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷)) → 𝐴𝐶)
77 simprl 789 . . . . . . . . . 10 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷)) → 𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)))
783, 13, 4, 5, 14, 70, 17, 65, 69, 67, 68, 68, 75, 76, 77mirhl2 25291 . . . . . . . . 9 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷)) → 𝐵(𝐾𝐶)𝐴)
793, 4, 65, 67, 68, 69, 70, 78hlcomd 25214 . . . . . . . 8 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷)) → 𝐴(𝐾𝐶)𝐵)
8028adantr 479 . . . . . . . 8 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷)) → ¬ 𝐴𝐷)
8179, 80jca 552 . . . . . . 7 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷)) → (𝐴(𝐾𝐶)𝐵 ∧ ¬ 𝐴𝐷))
82813adantr3 1214 . . . . . 6 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷 ∧ ¬ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷)) → (𝐴(𝐾𝐶)𝐵 ∧ ¬ 𝐴𝐷))
8382simpld 473 . . . . 5 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷 ∧ ¬ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷)) → 𝐴(𝐾𝐶)𝐵)
8423adantr 479 . . . . . . 7 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) → 𝐴𝑃)
8511adantr 479 . . . . . . 7 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) → 𝐵𝑃)
8620adantr 479 . . . . . . 7 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) → (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝑃)
877adantr 479 . . . . . . 7 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) → 𝐺 ∈ TarskiG)
8816ad2antrr 757 . . . . . . 7 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) → 𝐶𝑃)
89 simpr 475 . . . . . . 7 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) → 𝐴(𝐾𝐶)𝐵)
9042ad2antrr 757 . . . . . . 7 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) → 𝐶 ∈ (𝐴𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)))
913, 4, 65, 84, 85, 86, 87, 88, 89, 90btwnhl 25224 . . . . . 6 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) → 𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)))
923, 4, 65, 84, 85, 88, 87, 5, 89hlln 25217 . . . . . . . . 9 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) → 𝐴 ∈ (𝐵𝐿𝐶))
9392adantr 479 . . . . . . . 8 ((((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) ∧ 𝐵𝐷) → 𝐴 ∈ (𝐵𝐿𝐶))
9487adantr 479 . . . . . . . . 9 ((((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) ∧ 𝐵𝐷) → 𝐺 ∈ TarskiG)
9585adantr 479 . . . . . . . . 9 ((((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) ∧ 𝐵𝐷) → 𝐵𝑃)
9688adantr 479 . . . . . . . . 9 ((((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) ∧ 𝐵𝐷) → 𝐶𝑃)
9784adantr 479 . . . . . . . . . 10 ((((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) ∧ 𝐵𝐷) → 𝐴𝑃)
9889adantr 479 . . . . . . . . . 10 ((((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) ∧ 𝐵𝐷) → 𝐴(𝐾𝐶)𝐵)
993, 4, 65, 97, 95, 96, 94, 98hlne2 25216 . . . . . . . . 9 ((((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) ∧ 𝐵𝐷) → 𝐵𝐶)
1009ad2antrr 757 . . . . . . . . 9 ((((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) ∧ 𝐵𝐷) → 𝐷 ∈ ran 𝐿)
101 simpr 475 . . . . . . . . 9 ((((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) ∧ 𝐵𝐷) → 𝐵𝐷)
10215ad3antrrr 761 . . . . . . . . 9 ((((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) ∧ 𝐵𝐷) → 𝐶𝐷)
1033, 4, 5, 94, 95, 96, 99, 99, 100, 101, 102tglinethru 25246 . . . . . . . 8 ((((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) ∧ 𝐵𝐷) → 𝐷 = (𝐵𝐿𝐶))
10493, 103eleqtrrd 2687 . . . . . . 7 ((((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) ∧ 𝐵𝐷) → 𝐴𝐷)
10528ad2antrr 757 . . . . . . 7 ((((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) ∧ 𝐵𝐷) → ¬ 𝐴𝐷)
106104, 105pm2.65da 597 . . . . . 6 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) → ¬ 𝐵𝐷)
10737adantr 479 . . . . . 6 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) → ¬ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷)
10891, 106, 1073jca 1234 . . . . 5 (((𝜑 ∧ ¬ 𝐴𝐷) ∧ 𝐴(𝐾𝐶)𝐵) → (𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷 ∧ ¬ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷))
10983, 108impbida 872 . . . 4 ((𝜑 ∧ ¬ 𝐴𝐷) → ((𝐶 ∈ (𝐵𝐼(((pInvG‘𝐺)‘𝐶)‘𝐴)) ∧ ¬ 𝐵𝐷 ∧ ¬ (((pInvG‘𝐺)‘𝐶)‘𝐴) ∈ 𝐷) ↔ 𝐴(𝐾𝐶)𝐵))
11063, 64, 1093bitr3d 296 . . 3 ((𝜑 ∧ ¬ 𝐴𝐷) → (𝐴((hpG‘𝐺)‘𝐷)𝐵𝐴(𝐾𝐶)𝐵))
111110pm5.32da 670 . 2 (𝜑 → ((¬ 𝐴𝐷𝐴((hpG‘𝐺)‘𝐷)𝐵) ↔ (¬ 𝐴𝐷𝐴(𝐾𝐶)𝐵)))
112 simpr 475 . . . 4 ((𝜑𝐴((hpG‘𝐺)‘𝐷)𝐵) → 𝐴((hpG‘𝐺)‘𝐷)𝐵)
113112adantrl 747 . . 3 ((𝜑 ∧ (¬ 𝐴𝐷𝐴((hpG‘𝐺)‘𝐷)𝐵)) → 𝐴((hpG‘𝐺)‘𝐷)𝐵)
1146adantr 479 . . . . 5 ((𝜑𝐴((hpG‘𝐺)‘𝐷)𝐵) → 𝐺 ∈ TarskiG)
1158adantr 479 . . . . 5 ((𝜑𝐴((hpG‘𝐺)‘𝐷)𝐵) → 𝐷 ∈ ran 𝐿)
11618adantr 479 . . . . 5 ((𝜑𝐴((hpG‘𝐺)‘𝐷)𝐵) → 𝐴𝑃)
11710adantr 479 . . . . 5 ((𝜑𝐴((hpG‘𝐺)‘𝐷)𝐵) → 𝐵𝑃)
1183, 4, 5, 12, 114, 115, 116, 117, 112hpgne1 25368 . . . 4 ((𝜑𝐴((hpG‘𝐺)‘𝐷)𝐵) → ¬ 𝐴𝐷)
119118, 112jca 552 . . 3 ((𝜑𝐴((hpG‘𝐺)‘𝐷)𝐵) → (¬ 𝐴𝐷𝐴((hpG‘𝐺)‘𝐷)𝐵))
120113, 119impbida 872 . 2 (𝜑 → ((¬ 𝐴𝐷𝐴((hpG‘𝐺)‘𝐷)𝐵) ↔ 𝐴((hpG‘𝐺)‘𝐷)𝐵))
1212, 111, 1203bitr2rd 295 1 (𝜑 → (𝐴((hpG‘𝐺)‘𝐷)𝐵 ↔ (𝐴(𝐾𝐶)𝐵 ∧ ¬ 𝐴𝐷)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 194  wo 381  wa 382  w3a 1030   = wceq 1474  wcel 1976  wne 2776  wrex 2893  cdif 3533   class class class wbr 4574  {copab 4633  ran crn 5026  cfv 5787  (class class class)co 6524  Basecbs 15638  distcds 15720  TarskiGcstrkg 25043  Itvcitv 25049  LineGclng 25050  hlGchlg 25210  pInvGcmir 25262  hpGchpg 25364
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1712  ax-4 1727  ax-5 1826  ax-6 1874  ax-7 1921  ax-8 1978  ax-9 1985  ax-10 2005  ax-11 2020  ax-12 2032  ax-13 2229  ax-ext 2586  ax-rep 4690  ax-sep 4700  ax-nul 4709  ax-pow 4761  ax-pr 4825  ax-un 6821  ax-cnex 9845  ax-resscn 9846  ax-1cn 9847  ax-icn 9848  ax-addcl 9849  ax-addrcl 9850  ax-mulcl 9851  ax-mulrcl 9852  ax-mulcom 9853  ax-addass 9854  ax-mulass 9855  ax-distr 9856  ax-i2m1 9857  ax-1ne0 9858  ax-1rid 9859  ax-rnegex 9860  ax-rrecex 9861  ax-cnre 9862  ax-pre-lttri 9863  ax-pre-lttrn 9864  ax-pre-ltadd 9865  ax-pre-mulgt0 9866
This theorem depends on definitions:  df-bi 195  df-or 383  df-an 384  df-3or 1031  df-3an 1032  df-tru 1477  df-ex 1695  df-nf 1700  df-sb 1867  df-eu 2458  df-mo 2459  df-clab 2593  df-cleq 2599  df-clel 2602  df-nfc 2736  df-ne 2778  df-nel 2779  df-ral 2897  df-rex 2898  df-reu 2899  df-rmo 2900  df-rab 2901  df-v 3171  df-sbc 3399  df-csb 3496  df-dif 3539  df-un 3541  df-in 3543  df-ss 3550  df-pss 3552  df-nul 3871  df-if 4033  df-pw 4106  df-sn 4122  df-pr 4124  df-tp 4126  df-op 4128  df-uni 4364  df-int 4402  df-iun 4448  df-br 4575  df-opab 4635  df-mpt 4636  df-tr 4672  df-eprel 4936  df-id 4940  df-po 4946  df-so 4947  df-fr 4984  df-we 4986  df-xp 5031  df-rel 5032  df-cnv 5033  df-co 5034  df-dm 5035  df-rn 5036  df-res 5037  df-ima 5038  df-pred 5580  df-ord 5626  df-on 5627  df-lim 5628  df-suc 5629  df-iota 5751  df-fun 5789  df-fn 5790  df-f 5791  df-f1 5792  df-fo 5793  df-f1o 5794  df-fv 5795  df-riota 6486  df-ov 6527  df-oprab 6528  df-mpt2 6529  df-om 6932  df-1st 7033  df-2nd 7034  df-wrecs 7268  df-recs 7329  df-rdg 7367  df-1o 7421  df-oadd 7425  df-er 7603  df-map 7720  df-pm 7721  df-en 7816  df-dom 7817  df-sdom 7818  df-fin 7819  df-card 8622  df-cda 8847  df-pnf 9929  df-mnf 9930  df-xr 9931  df-ltxr 9932  df-le 9933  df-sub 10116  df-neg 10117  df-nn 10865  df-2 10923  df-3 10924  df-n0 11137  df-z 11208  df-uz 11517  df-fz 12150  df-fzo 12287  df-hash 12932  df-word 13097  df-concat 13099  df-s1 13100  df-s2 13387  df-s3 13388  df-trkgc 25061  df-trkgb 25062  df-trkgcb 25063  df-trkgld 25065  df-trkg 25066  df-cgrg 25121  df-leg 25193  df-hlg 25211  df-mir 25263  df-rag 25304  df-perpg 25306  df-hpg 25365
This theorem is referenced by:  hphl  25378  trgcopy  25411
  Copyright terms: Public domain W3C validator