Theorem tgcgrcomlr 28619

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 28601	. 2 ⊢ (𝜑 → (𝐴 − 𝐵) = (𝐵 − 𝐴))
9		tgcgrcomlr.c	. . 3 ⊢ (𝜑 → 𝐶 ∈ 𝑃)
10		tgcgrcomlr.d	. . 3 ⊢ (𝜑 → 𝐷 ∈ 𝑃)
11	2, 3, 4, 5, 9, 10	axtgcgrrflx 28601	. 2 ⊢ (𝜑 → (𝐶 − 𝐷) = (𝐷 − 𝐶))
12	1, 8, 11	3eqtr3d 2799	1 ⊢ (𝜑 → (𝐵 − 𝐴) = (𝐷 − 𝐶))

Syntax hints:   → wi 4   = wceq 1554   ∈ wcel 2136  ‘cfv 6510  (class class class)co 7385  Basecbs 17221  distcds 17271  TarskiGcstrkg 28566  Itvcitv 28572

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1809  ax-4 1823  ax-5 1924  ax-6 1981  ax-7 2022  ax-8 2138  ax-9 2146  ax-ext 2728  ax-nul 5250

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 857  df-3an 1097  df-tru 1557  df-fal 1567  df-ex 1794  df-sb 2085  df-clab 2735  df-cleq 2748  df-clel 2831  df-ne 2952  df-ral 3071  df-rab 3409  df-v 3450  df-sbc 3740  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-nul 4281  df-if 4475  df-sn 4577  df-pr 4579  df-op 4583  df-uni 4860  df-br 5095  df-iota 6466  df-fv 6518  df-ov 7388  df-trkgc 28587  df-trkg 28592

This theorem is referenced by:  tgcgrextend  28624  tgifscgr  28647  tgcgrsub  28648  iscgrglt  28653  trgcgrg  28654  tgcgrxfr  28657  cgr3swap12  28662  cgr3swap23  28663  tgbtwnxfr  28669  lnext  28706  tgbtwnconn1lem1  28711  tgbtwnconn1lem2  28712  tgbtwnconn1lem3  28713  tgbtwnconn1  28714  legov2  28725  legtri3  28729  legbtwn  28733  tgcgrsub2  28734  miriso  28809  mircgrextend  28821  mirtrcgr  28822  miduniq  28824  colmid  28827  symquadlem  28828  krippenlem  28829  midexlem  28831  ragcom  28837  ragflat  28843  ragcgr  28846  footexALT  28857  footexlem1  28858  footexlem2  28859  colperpexlem1  28869  mideulem2  28873  opphllem  28874  opphllem3  28888  lmiisolem  28935  hypcgrlem1  28938  trgcopy  28943  trgcopyeulem  28944  iscgra1  28949  cgracgr  28957  cgraswap  28959  cgrcgra  28960  cgracom  28961  cgratr  28962  flatcgra  28963  dfcgra2  28969  acopy  28972  acopyeu  28973  cgrg3col4  28992  tgsas1  28993  tgsas3  28996  tgasa1  28997