Theorem hlcgrex 28604

Description: Construct a point on a half-line, at a given distance of its origin. (Contributed by Thierry Arnoux, 1-Aug-2020.)

Hypotheses

Ref	Expression
ishlg.p	⊢ 𝑃 = (Base‘𝐺)
ishlg.i	⊢ 𝐼 = (Itv‘𝐺)
ishlg.k	⊢ 𝐾 = (hlG‘𝐺)
ishlg.a	⊢ (𝜑 → 𝐴 ∈ 𝑃)
ishlg.b	⊢ (𝜑 → 𝐵 ∈ 𝑃)
ishlg.c	⊢ (𝜑 → 𝐶 ∈ 𝑃)
hlln.1	⊢ (𝜑 → 𝐺 ∈ TarskiG)
hltr.d	⊢ (𝜑 → 𝐷 ∈ 𝑃)
hlcgrex.m	⊢ − = (dist‘𝐺)
hlcgrex.1	⊢ (𝜑 → 𝐷 ≠ 𝐴)
hlcgrex.2	⊢ (𝜑 → 𝐵 ≠ 𝐶)

Assertion

Ref	Expression
hlcgrex	⊢ (𝜑 → ∃𝑥 ∈ 𝑃 (𝑥(𝐾‘𝐴)𝐷 ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶)))

Distinct variable groups:   𝑥, −   𝑥,𝐴   𝑥,𝐵   𝑥,𝐶   𝑥,𝐷   𝑥,𝐾   𝑥,𝐼   𝑥,𝑃   𝜑,𝑥

Allowed substitution hint:   𝐺(𝑥)

Proof of Theorem hlcgrex

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		ishlg.p	. . . 4 ⊢ 𝑃 = (Base‘𝐺)
2		hlcgrex.m	. . . 4 ⊢ − = (dist‘𝐺)
3		ishlg.i	. . . 4 ⊢ 𝐼 = (Itv‘𝐺)
4		hlln.1	. . . . 5 ⊢ (𝜑 → 𝐺 ∈ TarskiG)
5	4	ad2antrr 726	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → 𝐺 ∈ TarskiG)
6		simplr 768	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → 𝑦 ∈ 𝑃)
7		ishlg.a	. . . . 5 ⊢ (𝜑 → 𝐴 ∈ 𝑃)
8	7	ad2antrr 726	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → 𝐴 ∈ 𝑃)
9		ishlg.b	. . . . 5 ⊢ (𝜑 → 𝐵 ∈ 𝑃)
10	9	ad2antrr 726	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → 𝐵 ∈ 𝑃)
11		ishlg.c	. . . . 5 ⊢ (𝜑 → 𝐶 ∈ 𝑃)
12	11	ad2antrr 726	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → 𝐶 ∈ 𝑃)
13	1, 2, 3, 5, 6, 8, 10, 12	axtgsegcon 28452	. . 3 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → ∃𝑥 ∈ 𝑃 (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶)))
14	5	ad2antrr 726	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐺 ∈ TarskiG)
15	10	ad2antrr 726	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐵 ∈ 𝑃)
16	12	ad2antrr 726	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐶 ∈ 𝑃)
17		simplr 768	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝑥 ∈ 𝑃)
18	8	ad2antrr 726	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐴 ∈ 𝑃)
19		simprr 772	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → (𝐴 − 𝑥) = (𝐵 − 𝐶))
20	1, 2, 3, 14, 18, 17, 15, 16, 19	tgcgrcoml 28467	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → (𝑥 − 𝐴) = (𝐵 − 𝐶))
21	20	eqcomd 2739	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → (𝐵 − 𝐶) = (𝑥 − 𝐴))
22		hlcgrex.2	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ≠ 𝐶)
23	22	ad4antr 732	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐵 ≠ 𝐶)
24	1, 2, 3, 14, 15, 16, 17, 18, 21, 23	tgcgrneq 28471	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝑥 ≠ 𝐴)
25		hlcgrex.1	. . . . . . . 8 ⊢ (𝜑 → 𝐷 ≠ 𝐴)
26	25	ad4antr 732	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐷 ≠ 𝐴)
27	6	ad2antrr 726	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝑦 ∈ 𝑃)
28		hltr.d	. . . . . . . . 9 ⊢ (𝜑 → 𝐷 ∈ 𝑃)
29	28	ad4antr 732	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐷 ∈ 𝑃)
30		simpllr 775	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦))
31	30	simprd 495	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐴 ≠ 𝑦)
32	31	necomd 2985	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝑦 ≠ 𝐴)
33		simprl 770	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐴 ∈ (𝑦𝐼𝑥))
34	30	simpld 494	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐴 ∈ (𝐷𝐼𝑦))
35	1, 2, 3, 14, 29, 18, 27, 34	tgbtwncom 28476	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐴 ∈ (𝑦𝐼𝐷))
36	1, 3, 14, 27, 18, 17, 29, 32, 33, 35	tgbtwnconn2 28564	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → (𝑥 ∈ (𝐴𝐼𝐷) ∨ 𝐷 ∈ (𝐴𝐼𝑥)))
37		ishlg.k	. . . . . . . 8 ⊢ 𝐾 = (hlG‘𝐺)
38	1, 3, 37, 17, 29, 18, 14	ishlg 28590	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → (𝑥(𝐾‘𝐴)𝐷 ↔ (𝑥 ≠ 𝐴 ∧ 𝐷 ≠ 𝐴 ∧ (𝑥 ∈ (𝐴𝐼𝐷) ∨ 𝐷 ∈ (𝐴𝐼𝑥)))))
39	24, 26, 36, 38	mpbir3and 1343	. . . . . 6 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝑥(𝐾‘𝐴)𝐷)
40	39, 19	jca 511	. . . . 5 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → (𝑥(𝐾‘𝐴)𝐷 ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶)))
41	40	ex 412	. . . 4 ⊢ ((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) → ((𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶)) → (𝑥(𝐾‘𝐴)𝐷 ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))))
42	41	reximdva 3147	. . 3 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → (∃𝑥 ∈ 𝑃 (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶)) → ∃𝑥 ∈ 𝑃 (𝑥(𝐾‘𝐴)𝐷 ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))))
43	13, 42	mpd 15	. 2 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → ∃𝑥 ∈ 𝑃 (𝑥(𝐾‘𝐴)𝐷 ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶)))
44	1	fvexi 6845	. . . . 5 ⊢ 𝑃 ∈ V
45	44	a1i 11	. . . 4 ⊢ (𝜑 → 𝑃 ∈ V)
46	45, 9, 11, 22	nehash2 14391	. . 3 ⊢ (𝜑 → 2 ≤ (♯‘𝑃))
47	1, 2, 3, 4, 28, 7, 46	tgbtwndiff 28494	. 2 ⊢ (𝜑 → ∃𝑦 ∈ 𝑃 (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦))
48	43, 47	r19.29a 3142	1 ⊢ (𝜑 → ∃𝑥 ∈ 𝑃 (𝑥(𝐾‘𝐴)𝐷 ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶)))

Syntax hints:   → wi 4   ∧ wa 395   ∨ wo 847   = wceq 1541   ∈ wcel 2113   ≠ wne 2930  ∃wrex 3058  Vcvv 3438   class class class wbr 5095  ‘cfv 6489  (class class class)co 7355  Basecbs 17130  distcds 17180  TarskiGcstrkg 28415  Itvcitv 28421  hlGchlg 28588

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 2705  ax-rep 5221  ax-sep 5238  ax-nul 5248  ax-pow 5307  ax-pr 5374  ax-un 7677  ax-cnex 11072  ax-resscn 11073  ax-1cn 11074  ax-icn 11075  ax-addcl 11076  ax-addrcl 11077  ax-mulcl 11078  ax-mulrcl 11079  ax-mulcom 11080  ax-addass 11081  ax-mulass 11082  ax-distr 11083  ax-i2m1 11084  ax-1ne0 11085  ax-1rid 11086  ax-rnegex 11087  ax-rrecex 11088  ax-cnre 11089  ax-pre-lttri 11090  ax-pre-lttrn 11091  ax-pre-ltadd 11092  ax-pre-mulgt0 11093

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 2566  df-clab 2712  df-cleq 2725  df-clel 2808  df-nfc 2883  df-ne 2931  df-nel 3035  df-ral 3050  df-rex 3059  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 4285  df-if 4477  df-pw 4553  df-sn 4578  df-pr 4580  df-tp 4582  df-op 4584  df-uni 4861  df-int 4900  df-iun 4945  df-br 5096  df-opab 5158  df-mpt 5177  df-tr 5203  df-id 5516  df-eprel 5521  df-po 5529  df-so 5530  df-fr 5574  df-we 5576  df-xp 5627  df-rel 5628  df-cnv 5629  df-co 5630  df-dm 5631  df-rn 5632  df-res 5633  df-ima 5634  df-pred 6256  df-ord 6317  df-on 6318  df-lim 6319  df-suc 6320  df-iota 6445  df-fun 6491  df-fn 6492  df-f 6493  df-f1 6494  df-fo 6495  df-f1o 6496  df-fv 6497  df-riota 7312  df-ov 7358  df-oprab 7359  df-mpo 7360  df-om 7806  df-1st 7930  df-2nd 7931  df-frecs 8220  df-wrecs 8251  df-recs 8300  df-rdg 8338  df-1o 8394  df-oadd 8398  df-er 8631  df-pm 8762  df-en 8879  df-dom 8880  df-sdom 8881  df-fin 8882  df-dju 9804  df-card 9842  df-pnf 11158  df-mnf 11159  df-xr 11160  df-ltxr 11161  df-le 11162  df-sub 11356  df-neg 11357  df-nn 12136  df-2 12198  df-3 12199  df-n0 12392  df-xnn0 12465  df-z 12479  df-uz 12743  df-fz 13418  df-fzo 13565  df-hash 14248  df-word 14431  df-concat 14488  df-s1 14514  df-s2 14765  df-s3 14766  df-trkgc 28436  df-trkgb 28437  df-trkgcb 28438  df-trkg 28441  df-cgrg 28499  df-hlg 28589

This theorem is referenced by:  hlcgreu  28606  trgcopy  28792  cgraswap  28808  cgracom  28810  cgratr  28811  acopy  28821  acopyeu  28822  tgasa1  28846