Theorem tgcgrcomlr 28567

Description: Congruence commutes on both sides. (Contributed by Thierry Arnoux, 23-Mar-2019.)

Hypotheses

Ref	Expression
tkgeom.p	⊢ 𝑃 = (Base‘𝐺)
tkgeom.d	⊢ − = (dist‘𝐺)
tkgeom.i	⊢ 𝐼 = (Itv‘𝐺)
tkgeom.g	⊢ (𝜑 → 𝐺 ∈ TarskiG)
tgcgrcomlr.a	⊢ (𝜑 → 𝐴 ∈ 𝑃)
tgcgrcomlr.b	⊢ (𝜑 → 𝐵 ∈ 𝑃)
tgcgrcomlr.c	⊢ (𝜑 → 𝐶 ∈ 𝑃)
tgcgrcomlr.d	⊢ (𝜑 → 𝐷 ∈ 𝑃)
tgcgrcomlr.6	⊢ (𝜑 → (𝐴 − 𝐵) = (𝐶 − 𝐷))

Assertion

Ref	Expression
tgcgrcomlr	⊢ (𝜑 → (𝐵 − 𝐴) = (𝐷 − 𝐶))

Proof of Theorem tgcgrcomlr

Step	Hyp	Ref	Expression
1		tgcgrcomlr.6	. 2 ⊢ (𝜑 → (𝐴 − 𝐵) = (𝐶 − 𝐷))
2		tkgeom.p	. . 3 ⊢ 𝑃 = (Base‘𝐺)
3		tkgeom.d	. . 3 ⊢ − = (dist‘𝐺)
4		tkgeom.i	. . 3 ⊢ 𝐼 = (Itv‘𝐺)
5		tkgeom.g	. . 3 ⊢ (𝜑 → 𝐺 ∈ TarskiG)
6		tgcgrcomlr.a	. . 3 ⊢ (𝜑 → 𝐴 ∈ 𝑃)
7		tgcgrcomlr.b	. . 3 ⊢ (𝜑 → 𝐵 ∈ 𝑃)
8	2, 3, 4, 5, 6, 7	axtgcgrrflx 28549	. 2 ⊢ (𝜑 → (𝐴 − 𝐵) = (𝐵 − 𝐴))
9		tgcgrcomlr.c	. . 3 ⊢ (𝜑 → 𝐶 ∈ 𝑃)
10		tgcgrcomlr.d	. . 3 ⊢ (𝜑 → 𝐷 ∈ 𝑃)
11	2, 3, 4, 5, 9, 10	axtgcgrrflx 28549	. 2 ⊢ (𝜑 → (𝐶 − 𝐷) = (𝐷 − 𝐶))
12	1, 8, 11	3eqtr3d 2780	1 ⊢ (𝜑 → (𝐵 − 𝐴) = (𝐷 − 𝐶))

Syntax hints:   → wi 4   = wceq 1542   ∈ wcel 2114  ‘cfv 6490  (class class class)co 7358  Basecbs 17168  distcds 17218  TarskiGcstrkg 28514  Itvcitv 28520

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-ext 2709  ax-nul 5241

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-sb 2069  df-clab 2716  df-cleq 2729  df-clel 2812  df-ne 2934  df-ral 3053  df-rab 3391  df-v 3432  df-sbc 3730  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-nul 4275  df-if 4468  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-br 5087  df-iota 6446  df-fv 6498  df-ov 7361  df-trkgc 28535  df-trkg 28540

This theorem is referenced by:  tgcgrextend  28572  tgifscgr  28595  tgcgrsub  28596  iscgrglt  28601  trgcgrg  28602  tgcgrxfr  28605  cgr3swap12  28610  cgr3swap23  28611  tgbtwnxfr  28617  lnext  28654  tgbtwnconn1lem1  28659  tgbtwnconn1lem2  28660  tgbtwnconn1lem3  28661  tgbtwnconn1  28662  legov2  28673  legtri3  28677  legbtwn  28681  tgcgrsub2  28682  miriso  28757  mircgrextend  28769  mirtrcgr  28770  miduniq  28772  colmid  28775  symquadlem  28776  krippenlem  28777  midexlem  28779  ragcom  28785  ragflat  28791  ragcgr  28794  footexALT  28805  footexlem1  28806  footexlem2  28807  colperpexlem1  28817  mideulem2  28821  opphllem  28822  opphllem3  28836  lmiisolem  28883  hypcgrlem1  28886  trgcopy  28891  trgcopyeulem  28892  iscgra1  28897  cgracgr  28905  cgraswap  28907  cgrcgra  28908  cgracom  28909  cgratr  28910  flatcgra  28911  dfcgra2  28917  acopy  28920  acopyeu  28921  cgrg3col4  28940  tgsas1  28941  tgsas3  28944  tgasa1  28945