Theorem axtgcgrrflx 26727

Description: Axiom of reflexivity of congruence, Axiom A1 of [Schwabhauser] p. 10. (Contributed by Thierry Arnoux, 14-Mar-2019.)

Hypotheses

Ref	Expression
axtrkg.p	⊢ 𝑃 = (Base‘𝐺)
axtrkg.d	⊢ − = (dist‘𝐺)
axtrkg.i	⊢ 𝐼 = (Itv‘𝐺)
axtrkg.g	⊢ (𝜑 → 𝐺 ∈ TarskiG)
axtgcgrrflx.1	⊢ (𝜑 → 𝑋 ∈ 𝑃)
axtgcgrrflx.2	⊢ (𝜑 → 𝑌 ∈ 𝑃)

Assertion

Ref	Expression
axtgcgrrflx	⊢ (𝜑 → (𝑋 − 𝑌) = (𝑌 − 𝑋))

Proof of Theorem axtgcgrrflx

Dummy variables 𝑓 𝑖 𝑝 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-trkg 26718	. . . . 5 ⊢ TarskiG = ((TarskiGC ∩ TarskiGB) ∩ (TarskiGCB ∩ {𝑓 ∣ [(Base‘𝑓) / 𝑝][(Itv‘𝑓) / 𝑖](LineG‘𝑓) = (𝑥 ∈ 𝑝, 𝑦 ∈ (𝑝 ∖ {𝑥}) ↦ {𝑧 ∈ 𝑝 ∣ (𝑧 ∈ (𝑥𝑖𝑦) ∨ 𝑥 ∈ (𝑧𝑖𝑦) ∨ 𝑦 ∈ (𝑥𝑖𝑧))})}))
2		inss1 4159	. . . . . 6 ⊢ ((TarskiGC ∩ TarskiGB) ∩ (TarskiGCB ∩ {𝑓 ∣ [(Base‘𝑓) / 𝑝][(Itv‘𝑓) / 𝑖](LineG‘𝑓) = (𝑥 ∈ 𝑝, 𝑦 ∈ (𝑝 ∖ {𝑥}) ↦ {𝑧 ∈ 𝑝 ∣ (𝑧 ∈ (𝑥𝑖𝑦) ∨ 𝑥 ∈ (𝑧𝑖𝑦) ∨ 𝑦 ∈ (𝑥𝑖𝑧))})})) ⊆ (TarskiGC ∩ TarskiGB)
3		inss1 4159	. . . . . 6 ⊢ (TarskiGC ∩ TarskiGB) ⊆ TarskiGC
4	2, 3	sstri 3926	. . . . 5 ⊢ ((TarskiGC ∩ TarskiGB) ∩ (TarskiGCB ∩ {𝑓 ∣ [(Base‘𝑓) / 𝑝][(Itv‘𝑓) / 𝑖](LineG‘𝑓) = (𝑥 ∈ 𝑝, 𝑦 ∈ (𝑝 ∖ {𝑥}) ↦ {𝑧 ∈ 𝑝 ∣ (𝑧 ∈ (𝑥𝑖𝑦) ∨ 𝑥 ∈ (𝑧𝑖𝑦) ∨ 𝑦 ∈ (𝑥𝑖𝑧))})})) ⊆ TarskiGC
5	1, 4	eqsstri 3951	. . . 4 ⊢ TarskiG ⊆ TarskiGC
6		axtrkg.g	. . . 4 ⊢ (𝜑 → 𝐺 ∈ TarskiG)
7	5, 6	sselid 3915	. . 3 ⊢ (𝜑 → 𝐺 ∈ TarskiGC)
8		axtrkg.p	. . . . . 6 ⊢ 𝑃 = (Base‘𝐺)
9		axtrkg.d	. . . . . 6 ⊢ − = (dist‘𝐺)
10		axtrkg.i	. . . . . 6 ⊢ 𝐼 = (Itv‘𝐺)
11	8, 9, 10	istrkgc 26719	. . . . 5 ⊢ (𝐺 ∈ TarskiGC ↔ (𝐺 ∈ V ∧ (∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝑃 (𝑥 − 𝑦) = (𝑦 − 𝑥) ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝑃 ∀𝑧 ∈ 𝑃 ((𝑥 − 𝑦) = (𝑧 − 𝑧) → 𝑥 = 𝑦))))
12	11	simprbi 496	. . . 4 ⊢ (𝐺 ∈ TarskiGC → (∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝑃 (𝑥 − 𝑦) = (𝑦 − 𝑥) ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝑃 ∀𝑧 ∈ 𝑃 ((𝑥 − 𝑦) = (𝑧 − 𝑧) → 𝑥 = 𝑦)))
13	12	simpld 494	. . 3 ⊢ (𝐺 ∈ TarskiGC → ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝑃 (𝑥 − 𝑦) = (𝑦 − 𝑥))
14	7, 13	syl 17	. 2 ⊢ (𝜑 → ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝑃 (𝑥 − 𝑦) = (𝑦 − 𝑥))
15		axtgcgrrflx.1	. . 3 ⊢ (𝜑 → 𝑋 ∈ 𝑃)
16		axtgcgrrflx.2	. . 3 ⊢ (𝜑 → 𝑌 ∈ 𝑃)
17		oveq1 7262	. . . . 5 ⊢ (𝑥 = 𝑋 → (𝑥 − 𝑦) = (𝑋 − 𝑦))
18		oveq2 7263	. . . . 5 ⊢ (𝑥 = 𝑋 → (𝑦 − 𝑥) = (𝑦 − 𝑋))
19	17, 18	eqeq12d 2754	. . . 4 ⊢ (𝑥 = 𝑋 → ((𝑥 − 𝑦) = (𝑦 − 𝑥) ↔ (𝑋 − 𝑦) = (𝑦 − 𝑋)))
20		oveq2 7263	. . . . 5 ⊢ (𝑦 = 𝑌 → (𝑋 − 𝑦) = (𝑋 − 𝑌))
21		oveq1 7262	. . . . 5 ⊢ (𝑦 = 𝑌 → (𝑦 − 𝑋) = (𝑌 − 𝑋))
22	20, 21	eqeq12d 2754	. . . 4 ⊢ (𝑦 = 𝑌 → ((𝑋 − 𝑦) = (𝑦 − 𝑋) ↔ (𝑋 − 𝑌) = (𝑌 − 𝑋)))
23	19, 22	rspc2v 3562	. . 3 ⊢ ((𝑋 ∈ 𝑃 ∧ 𝑌 ∈ 𝑃) → (∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝑃 (𝑥 − 𝑦) = (𝑦 − 𝑥) → (𝑋 − 𝑌) = (𝑌 − 𝑋)))
24	15, 16, 23	syl2anc 583	. 2 ⊢ (𝜑 → (∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝑃 (𝑥 − 𝑦) = (𝑦 − 𝑥) → (𝑋 − 𝑌) = (𝑌 − 𝑋)))
25	14, 24	mpd 15	1 ⊢ (𝜑 → (𝑋 − 𝑌) = (𝑌 − 𝑋))

Syntax hints:   → wi 4   ∧ wa 395   ∨ w3o 1084   = wceq 1539   ∈ wcel 2108  {cab 2715  ∀wral 3063  {crab 3067  Vcvv 3422  [wsbc 3711   ∖ cdif 3880   ∩ cin 3882  {csn 4558  ‘cfv 6418  (class class class)co 7255   ∈ cmpo 7257  Basecbs 16840  distcds 16897  TarskiGcstrkg 26693  TarskiG_Ccstrkgc 26694  TarskiG_Bcstrkgb 26695  TarskiG_CBcstrkgcb 26696  Itvcitv 26699  LineGclng 26700

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-nul 5225

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-ral 3068  df-rex 3069  df-rab 3072  df-v 3424  df-sbc 3712  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-nul 4254  df-if 4457  df-sn 4559  df-pr 4561  df-op 4565  df-uni 4837  df-br 5071  df-iota 6376  df-fv 6426  df-ov 7258  df-trkgc 26713  df-trkg 26718

This theorem is referenced by:  tgcgrcomimp  26742  tgcgrcomr  26743  tgcgrcoml  26744  tgcgrcomlr  26745  tgbtwnconn1lem1  26837  tgbtwnconn1lem2  26838  tgbtwnconn1lem3  26839  miriso  26935  symquadlem  26954  midexlem  26957  footexALT  26983  footexlem1  26984  footexlem2  26985  colperpexlem1  26995  opphllem  27000  cgraswap  27085  isoas  27129  f1otrg  27136