Theorem tgcgrcomlr 28535

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

Syntax hints:   → wi 4   = wceq 1542   ∈ wcel 2114  ‘cfv 6493  (class class class)co 7360  Basecbs 17140  distcds 17190  TarskiGcstrkg 28482  Itvcitv 28488

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 5252

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 3401  df-v 3443  df-sbc 3742  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-nul 4287  df-if 4481  df-sn 4582  df-pr 4584  df-op 4588  df-uni 4865  df-br 5100  df-iota 6449  df-fv 6501  df-ov 7363  df-trkgc 28503  df-trkg 28508

This theorem is referenced by:  tgcgrextend  28540  tgifscgr  28563  tgcgrsub  28564  iscgrglt  28569  trgcgrg  28570  tgcgrxfr  28573  cgr3swap12  28578  cgr3swap23  28579  tgbtwnxfr  28585  lnext  28622  tgbtwnconn1lem1  28627  tgbtwnconn1lem2  28628  tgbtwnconn1lem3  28629  tgbtwnconn1  28630  legov2  28641  legtri3  28645  legbtwn  28649  tgcgrsub2  28650  miriso  28725  mircgrextend  28737  mirtrcgr  28738  miduniq  28740  colmid  28743  symquadlem  28744  krippenlem  28745  midexlem  28747  ragcom  28753  ragflat  28759  ragcgr  28762  footexALT  28773  footexlem1  28774  footexlem2  28775  colperpexlem1  28785  mideulem2  28789  opphllem  28790  opphllem3  28804  lmiisolem  28851  hypcgrlem1  28854  trgcopy  28859  trgcopyeulem  28860  iscgra1  28865  cgracgr  28873  cgraswap  28875  cgrcgra  28876  cgracom  28877  cgratr  28878  flatcgra  28879  dfcgra2  28885  acopy  28888  acopyeu  28889  cgrg3col4  28908  tgsas1  28909  tgsas3  28912  tgasa1  28913