MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  grprcan Structured version   Visualization version   GIF version

Theorem grprcan 19004
Description: Right cancellation law for groups. (Contributed by NM, 24-Aug-2011.) (Proof shortened by Mario Carneiro, 6-Jan-2015.)
Hypotheses
Ref Expression
grprcan.b 𝐵 = (Base‘𝐺)
grprcan.p + = (+g𝐺)
Assertion
Ref Expression
grprcan ((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑋 + 𝑍) = (𝑌 + 𝑍) ↔ 𝑋 = 𝑌))

Proof of Theorem grprcan
Dummy variables 𝑣 𝑢 𝑤 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 grprcan.b . . . . 5 𝐵 = (Base‘𝐺)
2 grprcan.p . . . . 5 + = (+g𝐺)
3 eqid 2735 . . . . 5 (0g𝐺) = (0g𝐺)
41, 2, 3grpinvex 18974 . . . 4 ((𝐺 ∈ Grp ∧ 𝑍𝐵) → ∃𝑦𝐵 (𝑦 + 𝑍) = (0g𝐺))
543ad2antr3 1189 . . 3 ((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ∃𝑦𝐵 (𝑦 + 𝑍) = (0g𝐺))
6 simprr 773 . . . . . . . 8 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → (𝑋 + 𝑍) = (𝑌 + 𝑍))
76oveq1d 7446 . . . . . . 7 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → ((𝑋 + 𝑍) + 𝑦) = ((𝑌 + 𝑍) + 𝑦))
8 simpll 767 . . . . . . . . 9 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → 𝐺 ∈ Grp)
91, 2grpass 18973 . . . . . . . . 9 ((𝐺 ∈ Grp ∧ (𝑢𝐵𝑣𝐵𝑤𝐵)) → ((𝑢 + 𝑣) + 𝑤) = (𝑢 + (𝑣 + 𝑤)))
108, 9sylan 580 . . . . . . . 8 ((((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) ∧ (𝑢𝐵𝑣𝐵𝑤𝐵)) → ((𝑢 + 𝑣) + 𝑤) = (𝑢 + (𝑣 + 𝑤)))
11 simplr1 1214 . . . . . . . 8 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → 𝑋𝐵)
12 simplr3 1216 . . . . . . . 8 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → 𝑍𝐵)
13 simprll 779 . . . . . . . 8 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → 𝑦𝐵)
1410, 11, 12, 13caovassd 7632 . . . . . . 7 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → ((𝑋 + 𝑍) + 𝑦) = (𝑋 + (𝑍 + 𝑦)))
15 simplr2 1215 . . . . . . . 8 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → 𝑌𝐵)
1610, 15, 12, 13caovassd 7632 . . . . . . 7 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → ((𝑌 + 𝑍) + 𝑦) = (𝑌 + (𝑍 + 𝑦)))
177, 14, 163eqtr3d 2783 . . . . . 6 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → (𝑋 + (𝑍 + 𝑦)) = (𝑌 + (𝑍 + 𝑦)))
181, 2grpcl 18972 . . . . . . . . . 10 ((𝐺 ∈ Grp ∧ 𝑢𝐵𝑣𝐵) → (𝑢 + 𝑣) ∈ 𝐵)
198, 18syl3an1 1162 . . . . . . . . 9 ((((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) ∧ 𝑢𝐵𝑣𝐵) → (𝑢 + 𝑣) ∈ 𝐵)
201, 3grpidcl 18996 . . . . . . . . . 10 (𝐺 ∈ Grp → (0g𝐺) ∈ 𝐵)
218, 20syl 17 . . . . . . . . 9 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → (0g𝐺) ∈ 𝐵)
221, 2, 3grplid 18998 . . . . . . . . . 10 ((𝐺 ∈ Grp ∧ 𝑢𝐵) → ((0g𝐺) + 𝑢) = 𝑢)
238, 22sylan 580 . . . . . . . . 9 ((((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) ∧ 𝑢𝐵) → ((0g𝐺) + 𝑢) = 𝑢)
241, 2, 3grpinvex 18974 . . . . . . . . . 10 ((𝐺 ∈ Grp ∧ 𝑢𝐵) → ∃𝑣𝐵 (𝑣 + 𝑢) = (0g𝐺))
258, 24sylan 580 . . . . . . . . 9 ((((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) ∧ 𝑢𝐵) → ∃𝑣𝐵 (𝑣 + 𝑢) = (0g𝐺))
26 simpr 484 . . . . . . . . 9 ((((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) ∧ 𝑍𝐵) → 𝑍𝐵)
2713adantr 480 . . . . . . . . 9 ((((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) ∧ 𝑍𝐵) → 𝑦𝐵)
28 simprlr 780 . . . . . . . . . 10 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → (𝑦 + 𝑍) = (0g𝐺))
2928adantr 480 . . . . . . . . 9 ((((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) ∧ 𝑍𝐵) → (𝑦 + 𝑍) = (0g𝐺))
3019, 21, 23, 10, 25, 26, 27, 29grpinva 18700 . . . . . . . 8 ((((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) ∧ 𝑍𝐵) → (𝑍 + 𝑦) = (0g𝐺))
3112, 30mpdan 687 . . . . . . 7 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → (𝑍 + 𝑦) = (0g𝐺))
3231oveq2d 7447 . . . . . 6 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → (𝑋 + (𝑍 + 𝑦)) = (𝑋 + (0g𝐺)))
3331oveq2d 7447 . . . . . 6 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → (𝑌 + (𝑍 + 𝑦)) = (𝑌 + (0g𝐺)))
3417, 32, 333eqtr3d 2783 . . . . 5 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → (𝑋 + (0g𝐺)) = (𝑌 + (0g𝐺)))
351, 2, 3, 8, 11grpridd 19001 . . . . 5 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → (𝑋 + (0g𝐺)) = 𝑋)
361, 2, 3, 8, 15grpridd 19001 . . . . 5 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → (𝑌 + (0g𝐺)) = 𝑌)
3734, 35, 363eqtr3d 2783 . . . 4 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ ((𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺)) ∧ (𝑋 + 𝑍) = (𝑌 + 𝑍))) → 𝑋 = 𝑌)
3837expr 456 . . 3 (((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) ∧ (𝑦𝐵 ∧ (𝑦 + 𝑍) = (0g𝐺))) → ((𝑋 + 𝑍) = (𝑌 + 𝑍) → 𝑋 = 𝑌))
395, 38rexlimddv 3159 . 2 ((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑋 + 𝑍) = (𝑌 + 𝑍) → 𝑋 = 𝑌))
40 oveq1 7438 . 2 (𝑋 = 𝑌 → (𝑋 + 𝑍) = (𝑌 + 𝑍))
4139, 40impbid1 225 1 ((𝐺 ∈ Grp ∧ (𝑋𝐵𝑌𝐵𝑍𝐵)) → ((𝑋 + 𝑍) = (𝑌 + 𝑍) ↔ 𝑋 = 𝑌))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1537  wcel 2106  wrex 3068  cfv 6563  (class class class)co 7431  Basecbs 17245  +gcplusg 17298  0gc0g 17486  Grpcgrp 18964
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1908  ax-6 1965  ax-7 2005  ax-8 2108  ax-9 2116  ax-10 2139  ax-11 2155  ax-12 2175  ax-ext 2706  ax-sep 5302  ax-nul 5312  ax-pr 5438
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1540  df-fal 1550  df-ex 1777  df-nf 1781  df-sb 2063  df-mo 2538  df-eu 2567  df-clab 2713  df-cleq 2727  df-clel 2814  df-nfc 2890  df-ne 2939  df-ral 3060  df-rex 3069  df-rmo 3378  df-reu 3379  df-rab 3434  df-v 3480  df-sbc 3792  df-dif 3966  df-un 3968  df-ss 3980  df-nul 4340  df-if 4532  df-sn 4632  df-pr 4634  df-op 4638  df-uni 4913  df-br 5149  df-opab 5211  df-mpt 5232  df-id 5583  df-xp 5695  df-rel 5696  df-cnv 5697  df-co 5698  df-dm 5699  df-iota 6516  df-fun 6565  df-fv 6571  df-riota 7388  df-ov 7434  df-0g 17488  df-mgm 18666  df-sgrp 18745  df-mnd 18761  df-grp 18967
This theorem is referenced by:  grpinveu  19005  grpid  19006  grpidlcan  19035  grpraddf1o  19045  grpinvssd  19048  grpsubrcan  19052  grpsubadd  19059  sylow1lem4  19634  rngrz  20184  ringcom  20294  rhmunitinv  20528  lmodcom  20923  r1pid2  26216  ogrpaddlt  33077  ply1dg1rt  33584  r1pid2OLD  33609  grpcominv1  42495  isnumbasgrplem2  43093  grptcepi  48903
  Copyright terms: Public domain W3C validator