Theorem hlcgrex 28703

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 727	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → 𝐺 ∈ TarskiG)
6		simplr 769	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → 𝑦 ∈ 𝑃)
7		ishlg.a	. . . . 5 ⊢ (𝜑 → 𝐴 ∈ 𝑃)
8	7	ad2antrr 727	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → 𝐴 ∈ 𝑃)
9		ishlg.b	. . . . 5 ⊢ (𝜑 → 𝐵 ∈ 𝑃)
10	9	ad2antrr 727	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → 𝐵 ∈ 𝑃)
11		ishlg.c	. . . . 5 ⊢ (𝜑 → 𝐶 ∈ 𝑃)
12	11	ad2antrr 727	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → 𝐶 ∈ 𝑃)
13	1, 2, 3, 5, 6, 8, 10, 12	axtgsegcon 28551	. . 3 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → ∃𝑥 ∈ 𝑃 (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶)))
14	5	ad2antrr 727	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐺 ∈ TarskiG)
15	10	ad2antrr 727	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐵 ∈ 𝑃)
16	12	ad2antrr 727	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐶 ∈ 𝑃)
17		simplr 769	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝑥 ∈ 𝑃)
18	8	ad2antrr 727	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐴 ∈ 𝑃)
19		simprr 773	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → (𝐴 − 𝑥) = (𝐵 − 𝐶))
20	1, 2, 3, 14, 18, 17, 15, 16, 19	tgcgrcoml 28566	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → (𝑥 − 𝐴) = (𝐵 − 𝐶))
21	20	eqcomd 2743	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → (𝐵 − 𝐶) = (𝑥 − 𝐴))
22		hlcgrex.2	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ≠ 𝐶)
23	22	ad4antr 733	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐵 ≠ 𝐶)
24	1, 2, 3, 14, 15, 16, 17, 18, 21, 23	tgcgrneq 28570	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝑥 ≠ 𝐴)
25		hlcgrex.1	. . . . . . . 8 ⊢ (𝜑 → 𝐷 ≠ 𝐴)
26	25	ad4antr 733	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐷 ≠ 𝐴)
27	6	ad2antrr 727	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝑦 ∈ 𝑃)
28		hltr.d	. . . . . . . . 9 ⊢ (𝜑 → 𝐷 ∈ 𝑃)
29	28	ad4antr 733	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐷 ∈ 𝑃)
30		simpllr 776	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦))
31	30	simprd 495	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐴 ≠ 𝑦)
32	31	necomd 2988	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝑦 ≠ 𝐴)
33		simprl 771	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐴 ∈ (𝑦𝐼𝑥))
34	30	simpld 494	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐴 ∈ (𝐷𝐼𝑦))
35	1, 2, 3, 14, 29, 18, 27, 34	tgbtwncom 28575	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝐴 ∈ (𝑦𝐼𝐷))
36	1, 3, 14, 27, 18, 17, 29, 32, 33, 35	tgbtwnconn2 28663	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → (𝑥 ∈ (𝐴𝐼𝐷) ∨ 𝐷 ∈ (𝐴𝐼𝑥)))
37		ishlg.k	. . . . . . . 8 ⊢ 𝐾 = (hlG‘𝐺)
38	1, 3, 37, 17, 29, 18, 14	ishlg 28689	. . . . . . 7 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → (𝑥(𝐾‘𝐴)𝐷 ↔ (𝑥 ≠ 𝐴 ∧ 𝐷 ≠ 𝐴 ∧ (𝑥 ∈ (𝐴𝐼𝐷) ∨ 𝐷 ∈ (𝐴𝐼𝑥)))))
39	24, 26, 36, 38	mpbir3and 1344	. . . . . 6 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → 𝑥(𝐾‘𝐴)𝐷)
40	39, 19	jca 511	. . . . 5 ⊢ (((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) ∧ (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))) → (𝑥(𝐾‘𝐴)𝐷 ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶)))
41	40	ex 412	. . . 4 ⊢ ((((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) ∧ 𝑥 ∈ 𝑃) → ((𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶)) → (𝑥(𝐾‘𝐴)𝐷 ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))))
42	41	reximdva 3151	. . 3 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → (∃𝑥 ∈ 𝑃 (𝐴 ∈ (𝑦𝐼𝑥) ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶)) → ∃𝑥 ∈ 𝑃 (𝑥(𝐾‘𝐴)𝐷 ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶))))
43	13, 42	mpd 15	. 2 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝑃) ∧ (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦)) → ∃𝑥 ∈ 𝑃 (𝑥(𝐾‘𝐴)𝐷 ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶)))
44	1	fvexi 6846	. . . . 5 ⊢ 𝑃 ∈ V
45	44	a1i 11	. . . 4 ⊢ (𝜑 → 𝑃 ∈ V)
46	45, 9, 11, 22	nehash2 14425	. . 3 ⊢ (𝜑 → 2 ≤ (♯‘𝑃))
47	1, 2, 3, 4, 28, 7, 46	tgbtwndiff 28593	. 2 ⊢ (𝜑 → ∃𝑦 ∈ 𝑃 (𝐴 ∈ (𝐷𝐼𝑦) ∧ 𝐴 ≠ 𝑦))
48	43, 47	r19.29a 3146	1 ⊢ (𝜑 → ∃𝑥 ∈ 𝑃 (𝑥(𝐾‘𝐴)𝐷 ∧ (𝐴 − 𝑥) = (𝐵 − 𝐶)))

Syntax hints:   → wi 4   ∧ wa 395   ∨ wo 848   = wceq 1542   ∈ wcel 2114   ≠ wne 2933  ∃wrex 3062  Vcvv 3430   class class class wbr 5086  ‘cfv 6490  (class class class)co 7358  Basecbs 17168  distcds 17218  TarskiGcstrkg 28514  Itvcitv 28520  hlGchlg 28687

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5212  ax-sep 5231  ax-nul 5241  ax-pow 5300  ax-pr 5368  ax-un 7680  ax-cnex 11083  ax-resscn 11084  ax-1cn 11085  ax-icn 11086  ax-addcl 11087  ax-addrcl 11088  ax-mulcl 11089  ax-mulrcl 11090  ax-mulcom 11091  ax-addass 11092  ax-mulass 11093  ax-distr 11094  ax-i2m1 11095  ax-1ne0 11096  ax-1rid 11097  ax-rnegex 11098  ax-rrecex 11099  ax-cnre 11100  ax-pre-lttri 11101  ax-pre-lttrn 11102  ax-pre-ltadd 11103  ax-pre-mulgt0 11104

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-tp 4573  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  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 7315  df-ov 7361  df-oprab 7362  df-mpo 7363  df-om 7809  df-1st 7933  df-2nd 7934  df-frecs 8222  df-wrecs 8253  df-recs 8302  df-rdg 8340  df-1o 8396  df-oadd 8400  df-er 8634  df-pm 8767  df-en 8885  df-dom 8886  df-sdom 8887  df-fin 8888  df-dju 9814  df-card 9852  df-pnf 11170  df-mnf 11171  df-xr 11172  df-ltxr 11173  df-le 11174  df-sub 11368  df-neg 11369  df-nn 12164  df-2 12233  df-3 12234  df-n0 12427  df-xnn0 12500  df-z 12514  df-uz 12778  df-fz 13451  df-fzo 13598  df-hash 14282  df-word 14465  df-concat 14522  df-s1 14548  df-s2 14799  df-s3 14800  df-trkgc 28535  df-trkgb 28536  df-trkgcb 28537  df-trkg 28540  df-cgrg 28598  df-hlg 28688

This theorem is referenced by:  hlcgreu  28705  trgcopy  28891  cgraswap  28907  cgracom  28909  cgratr  28910  acopy  28920  acopyeu  28921  tgasa1  28945