Theorem rngmgp 20078

Description: A non-unital ring is a semigroup under multiplication. (Contributed by AV, 17-Feb-2020.)

Hypothesis

Ref	Expression
rngmgp.g	⊢ 𝐺 = (mulGrp‘𝑅)

Assertion

Ref	Expression
rngmgp	⊢ (𝑅 ∈ Rng → 𝐺 ∈ Smgrp)

Proof of Theorem rngmgp

Dummy variables 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eqid 2733	. . 3 ⊢ (Base‘𝑅) = (Base‘𝑅)
2		rngmgp.g	. . 3 ⊢ 𝐺 = (mulGrp‘𝑅)
3		eqid 2733	. . 3 ⊢ (+g‘𝑅) = (+g‘𝑅)
4		eqid 2733	. . 3 ⊢ (.r‘𝑅) = (.r‘𝑅)
5	1, 2, 3, 4	isrng 20076	. 2 ⊢ (𝑅 ∈ Rng ↔ (𝑅 ∈ Abel ∧ 𝐺 ∈ Smgrp ∧ ∀𝑥 ∈ (Base‘𝑅)∀𝑦 ∈ (Base‘𝑅)∀𝑧 ∈ (Base‘𝑅)((𝑥(.r‘𝑅)(𝑦(+g‘𝑅)𝑧)) = ((𝑥(.r‘𝑅)𝑦)(+g‘𝑅)(𝑥(.r‘𝑅)𝑧)) ∧ ((𝑥(+g‘𝑅)𝑦)(.r‘𝑅)𝑧) = ((𝑥(.r‘𝑅)𝑧)(+g‘𝑅)(𝑦(.r‘𝑅)𝑧)))))
6	5	simp2bi 1146	1 ⊢ (𝑅 ∈ Rng → 𝐺 ∈ Smgrp)

Syntax hints:   → wi 4   ∧ wa 395   = wceq 1541   ∈ wcel 2113  ∀wral 3048  ‘cfv 6488  (class class class)co 7354  Basecbs 17124  +_gcplusg 17165  ._rcmulr 17166  Smgrpcsgrp 18630  Abelcabl 19697  mulGrpcmgp 20062  Rngcrng 20074

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 2115  ax-9 2123  ax-ext 2705  ax-nul 5248

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 2712  df-cleq 2725  df-clel 2808  df-ne 2930  df-ral 3049  df-rab 3397  df-v 3439  df-sbc 3738  df-dif 3901  df-un 3903  df-ss 3915  df-nul 4283  df-if 4477  df-sn 4578  df-pr 4580  df-op 4584  df-uni 4861  df-br 5096  df-iota 6444  df-fv 6496  df-ov 7357  df-rng 20075

This theorem is referenced by:  rngmgpf  20079  rngass  20081  rngcl  20086  isringrng  20209  isrnghmmul  20364  idrnghm  20380  c0rnghm  20454  cntzsubrng  20486  rnglidlmsgrp  21187