Theorem axtgcgrrflx 28440

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 28431	. . . . 5 ⊢ TarskiG = ((TarskiGC ∩ TarskiGB) ∩ (TarskiGCB ∩ {𝑓 ∣ [(Base‘𝑓) / 𝑝][(Itv‘𝑓) / 𝑖](LineG‘𝑓) = (𝑥 ∈ 𝑝, 𝑦 ∈ (𝑝 ∖ {𝑥}) ↦ {𝑧 ∈ 𝑝 ∣ (𝑧 ∈ (𝑥𝑖𝑦) ∨ 𝑥 ∈ (𝑧𝑖𝑦) ∨ 𝑦 ∈ (𝑥𝑖𝑧))})}))
2		inss1 4184	. . . . . 6 ⊢ ((TarskiGC ∩ TarskiGB) ∩ (TarskiGCB ∩ {𝑓 ∣ [(Base‘𝑓) / 𝑝][(Itv‘𝑓) / 𝑖](LineG‘𝑓) = (𝑥 ∈ 𝑝, 𝑦 ∈ (𝑝 ∖ {𝑥}) ↦ {𝑧 ∈ 𝑝 ∣ (𝑧 ∈ (𝑥𝑖𝑦) ∨ 𝑥 ∈ (𝑧𝑖𝑦) ∨ 𝑦 ∈ (𝑥𝑖𝑧))})})) ⊆ (TarskiGC ∩ TarskiGB)
3		inss1 4184	. . . . . 6 ⊢ (TarskiGC ∩ TarskiGB) ⊆ TarskiGC
4	2, 3	sstri 3939	. . . . 5 ⊢ ((TarskiGC ∩ TarskiGB) ∩ (TarskiGCB ∩ {𝑓 ∣ [(Base‘𝑓) / 𝑝][(Itv‘𝑓) / 𝑖](LineG‘𝑓) = (𝑥 ∈ 𝑝, 𝑦 ∈ (𝑝 ∖ {𝑥}) ↦ {𝑧 ∈ 𝑝 ∣ (𝑧 ∈ (𝑥𝑖𝑦) ∨ 𝑥 ∈ (𝑧𝑖𝑦) ∨ 𝑦 ∈ (𝑥𝑖𝑧))})})) ⊆ TarskiGC
5	1, 4	eqsstri 3976	. . . 4 ⊢ TarskiG ⊆ TarskiGC
6		axtrkg.g	. . . 4 ⊢ (𝜑 → 𝐺 ∈ TarskiG)
7	5, 6	sselid 3927	. . 3 ⊢ (𝜑 → 𝐺 ∈ TarskiGC)
8		axtrkg.p	. . . . . 6 ⊢ 𝑃 = (Base‘𝐺)
9		axtrkg.d	. . . . . 6 ⊢ − = (dist‘𝐺)
10		axtrkg.i	. . . . . 6 ⊢ 𝐼 = (Itv‘𝐺)
11	8, 9, 10	istrkgc 28432	. . . . 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 7353	. . . . 5 ⊢ (𝑥 = 𝑋 → (𝑥 − 𝑦) = (𝑋 − 𝑦))
18		oveq2 7354	. . . . 5 ⊢ (𝑥 = 𝑋 → (𝑦 − 𝑥) = (𝑦 − 𝑋))
19	17, 18	eqeq12d 2747	. . . 4 ⊢ (𝑥 = 𝑋 → ((𝑥 − 𝑦) = (𝑦 − 𝑥) ↔ (𝑋 − 𝑦) = (𝑦 − 𝑋)))
20		oveq2 7354	. . . . 5 ⊢ (𝑦 = 𝑌 → (𝑋 − 𝑦) = (𝑋 − 𝑌))
21		oveq1 7353	. . . . 5 ⊢ (𝑦 = 𝑌 → (𝑦 − 𝑋) = (𝑌 − 𝑋))
22	20, 21	eqeq12d 2747	. . . 4 ⊢ (𝑦 = 𝑌 → ((𝑋 − 𝑦) = (𝑦 − 𝑋) ↔ (𝑋 − 𝑌) = (𝑌 − 𝑋)))
23	19, 22	rspc2v 3583	. . 3 ⊢ ((𝑋 ∈ 𝑃 ∧ 𝑌 ∈ 𝑃) → (∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝑃 (𝑥 − 𝑦) = (𝑦 − 𝑥) → (𝑋 − 𝑌) = (𝑌 − 𝑋)))
24	15, 16, 23	syl2anc 584	. 2 ⊢ (𝜑 → (∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝑃 (𝑥 − 𝑦) = (𝑦 − 𝑥) → (𝑋 − 𝑌) = (𝑌 − 𝑋)))
25	14, 24	mpd 15	1 ⊢ (𝜑 → (𝑋 − 𝑌) = (𝑌 − 𝑋))

Syntax hints:   → wi 4   ∧ wa 395   ∨ w3o 1085   = wceq 1541   ∈ wcel 2111  {cab 2709  ∀wral 3047  {crab 3395  Vcvv 3436  [wsbc 3736   ∖ cdif 3894   ∩ cin 3896  {csn 4573  ‘cfv 6481  (class class class)co 7346   ∈ cmpo 7348  Basecbs 17120  distcds 17170  TarskiGcstrkg 28405  TarskiG_Ccstrkgc 28406  TarskiG_Bcstrkgb 28407  TarskiG_CBcstrkgcb 28408  Itvcitv 28411  LineGclng 28412

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 2113  ax-9 2121  ax-ext 2703  ax-nul 5242

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-sb 2068  df-clab 2710  df-cleq 2723  df-clel 2806  df-ne 2929  df-ral 3048  df-rab 3396  df-v 3438  df-sbc 3737  df-dif 3900  df-un 3902  df-in 3904  df-ss 3914  df-nul 4281  df-if 4473  df-sn 4574  df-pr 4576  df-op 4580  df-uni 4857  df-br 5090  df-iota 6437  df-fv 6489  df-ov 7349  df-trkgc 28426  df-trkg 28431

This theorem is referenced by:  tgcgrcomimp  28455  tgcgrcomr  28456  tgcgrcoml  28457  tgcgrcomlr  28458  tgbtwnconn1lem1  28550  tgbtwnconn1lem2  28551  tgbtwnconn1lem3  28552  miriso  28648  symquadlem  28667  midexlem  28670  footexALT  28696  footexlem1  28697  footexlem2  28698  colperpexlem1  28708  opphllem  28713  cgraswap  28798  isoas  28842  f1otrg  28849