Theorem opprrng 13420

Description: An opposite non-unital ring is a non-unital ring. (Contributed by AV, 15-Feb-2025.)

Hypothesis

Ref	Expression
opprbas.1	⊢ 𝑂 = (oppr‘𝑅)

Assertion

Ref	Expression
opprrng	⊢ (𝑅 ∈ Rng → 𝑂 ∈ Rng)

Proof of Theorem opprrng

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

Step	Hyp	Ref	Expression
1		opprbas.1	. . 3 ⊢ 𝑂 = (oppr‘𝑅)
2		eqid 2189	. . 3 ⊢ (Base‘𝑅) = (Base‘𝑅)
3	1, 2	opprbasg 13418	. 2 ⊢ (𝑅 ∈ Rng → (Base‘𝑅) = (Base‘𝑂))
4		eqid 2189	. . 3 ⊢ (+g‘𝑅) = (+g‘𝑅)
5	1, 4	oppraddg 13419	. 2 ⊢ (𝑅 ∈ Rng → (+g‘𝑅) = (+g‘𝑂))
6		eqidd 2190	. 2 ⊢ (𝑅 ∈ Rng → (.r‘𝑂) = (.r‘𝑂))
7		rngabl 13282	. . 3 ⊢ (𝑅 ∈ Rng → 𝑅 ∈ Abel)
8		eqidd 2190	. . . 4 ⊢ (𝑅 ∈ Rng → (Base‘𝑅) = (Base‘𝑅))
9	5	oveqdr 5920	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅))) → (𝑥(+g‘𝑅)𝑦) = (𝑥(+g‘𝑂)𝑦))
10	8, 3, 9	ablpropd 13228	. . 3 ⊢ (𝑅 ∈ Rng → (𝑅 ∈ Abel ↔ 𝑂 ∈ Abel))
11	7, 10	mpbid 147	. 2 ⊢ (𝑅 ∈ Rng → 𝑂 ∈ Abel)
12		eqid 2189	. . . 4 ⊢ (.r‘𝑅) = (.r‘𝑅)
13		eqid 2189	. . . 4 ⊢ (.r‘𝑂) = (.r‘𝑂)
14	2, 12, 1, 13	opprmulg 13414	. . 3 ⊢ ((𝑅 ∈ Rng ∧ 𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅)) → (𝑥(.r‘𝑂)𝑦) = (𝑦(.r‘𝑅)𝑥))
15	2, 12	rngcl 13291	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑥 ∈ (Base‘𝑅)) → (𝑦(.r‘𝑅)𝑥) ∈ (Base‘𝑅))
16	15	3com23 1211	. . 3 ⊢ ((𝑅 ∈ Rng ∧ 𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅)) → (𝑦(.r‘𝑅)𝑥) ∈ (Base‘𝑅))
17	14, 16	eqeltrd 2266	. 2 ⊢ ((𝑅 ∈ Rng ∧ 𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅)) → (𝑥(.r‘𝑂)𝑦) ∈ (Base‘𝑅))
18		simpl 109	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → 𝑅 ∈ Rng)
19		simpr3 1007	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → 𝑧 ∈ (Base‘𝑅))
20		simpr2 1006	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → 𝑦 ∈ (Base‘𝑅))
21		simpr1 1005	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → 𝑥 ∈ (Base‘𝑅))
22	2, 12	rngass 13286	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑧 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑥 ∈ (Base‘𝑅))) → ((𝑧(.r‘𝑅)𝑦)(.r‘𝑅)𝑥) = (𝑧(.r‘𝑅)(𝑦(.r‘𝑅)𝑥)))
23	18, 19, 20, 21, 22	syl13anc 1251	. . 3 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → ((𝑧(.r‘𝑅)𝑦)(.r‘𝑅)𝑥) = (𝑧(.r‘𝑅)(𝑦(.r‘𝑅)𝑥)))
24	2, 12, 1, 13	opprmulg 13414	. . . . . 6 ⊢ ((𝑅 ∈ Rng ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅)) → (𝑦(.r‘𝑂)𝑧) = (𝑧(.r‘𝑅)𝑦))
25	24	3adant3r1 1214	. . . . 5 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → (𝑦(.r‘𝑂)𝑧) = (𝑧(.r‘𝑅)𝑦))
26	25	oveq2d 5908	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → (𝑥(.r‘𝑂)(𝑦(.r‘𝑂)𝑧)) = (𝑥(.r‘𝑂)(𝑧(.r‘𝑅)𝑦)))
27	2, 12	rngcl 13291	. . . . . 6 ⊢ ((𝑅 ∈ Rng ∧ 𝑧 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅)) → (𝑧(.r‘𝑅)𝑦) ∈ (Base‘𝑅))
28	18, 19, 20, 27	syl3anc 1249	. . . . 5 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → (𝑧(.r‘𝑅)𝑦) ∈ (Base‘𝑅))
29	2, 12, 1, 13	opprmulg 13414	. . . . 5 ⊢ ((𝑅 ∈ Rng ∧ 𝑥 ∈ (Base‘𝑅) ∧ (𝑧(.r‘𝑅)𝑦) ∈ (Base‘𝑅)) → (𝑥(.r‘𝑂)(𝑧(.r‘𝑅)𝑦)) = ((𝑧(.r‘𝑅)𝑦)(.r‘𝑅)𝑥))
30	18, 21, 28, 29	syl3anc 1249	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → (𝑥(.r‘𝑂)(𝑧(.r‘𝑅)𝑦)) = ((𝑧(.r‘𝑅)𝑦)(.r‘𝑅)𝑥))
31	26, 30	eqtrd 2222	. . 3 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → (𝑥(.r‘𝑂)(𝑦(.r‘𝑂)𝑧)) = ((𝑧(.r‘𝑅)𝑦)(.r‘𝑅)𝑥))
32	14	3adant3r3 1216	. . . . 5 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → (𝑥(.r‘𝑂)𝑦) = (𝑦(.r‘𝑅)𝑥))
33	32	oveq1d 5907	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → ((𝑥(.r‘𝑂)𝑦)(.r‘𝑂)𝑧) = ((𝑦(.r‘𝑅)𝑥)(.r‘𝑂)𝑧))
34	18, 20, 21, 15	syl3anc 1249	. . . . 5 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → (𝑦(.r‘𝑅)𝑥) ∈ (Base‘𝑅))
35	2, 12, 1, 13	opprmulg 13414	. . . . 5 ⊢ ((𝑅 ∈ Rng ∧ (𝑦(.r‘𝑅)𝑥) ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅)) → ((𝑦(.r‘𝑅)𝑥)(.r‘𝑂)𝑧) = (𝑧(.r‘𝑅)(𝑦(.r‘𝑅)𝑥)))
36	18, 34, 19, 35	syl3anc 1249	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → ((𝑦(.r‘𝑅)𝑥)(.r‘𝑂)𝑧) = (𝑧(.r‘𝑅)(𝑦(.r‘𝑅)𝑥)))
37	33, 36	eqtrd 2222	. . 3 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → ((𝑥(.r‘𝑂)𝑦)(.r‘𝑂)𝑧) = (𝑧(.r‘𝑅)(𝑦(.r‘𝑅)𝑥)))
38	23, 31, 37	3eqtr4rd 2233	. 2 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → ((𝑥(.r‘𝑂)𝑦)(.r‘𝑂)𝑧) = (𝑥(.r‘𝑂)(𝑦(.r‘𝑂)𝑧)))
39	2, 4, 12	rngdir 13288	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅) ∧ 𝑥 ∈ (Base‘𝑅))) → ((𝑦(+g‘𝑅)𝑧)(.r‘𝑅)𝑥) = ((𝑦(.r‘𝑅)𝑥)(+g‘𝑅)(𝑧(.r‘𝑅)𝑥)))
40	18, 20, 19, 21, 39	syl13anc 1251	. . 3 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → ((𝑦(+g‘𝑅)𝑧)(.r‘𝑅)𝑥) = ((𝑦(.r‘𝑅)𝑥)(+g‘𝑅)(𝑧(.r‘𝑅)𝑥)))
41	2, 4	rngacl 13289	. . . . 5 ⊢ ((𝑅 ∈ Rng ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅)) → (𝑦(+g‘𝑅)𝑧) ∈ (Base‘𝑅))
42	41	3adant3r1 1214	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → (𝑦(+g‘𝑅)𝑧) ∈ (Base‘𝑅))
43	2, 12, 1, 13	opprmulg 13414	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ 𝑥 ∈ (Base‘𝑅) ∧ (𝑦(+g‘𝑅)𝑧) ∈ (Base‘𝑅)) → (𝑥(.r‘𝑂)(𝑦(+g‘𝑅)𝑧)) = ((𝑦(+g‘𝑅)𝑧)(.r‘𝑅)𝑥))
44	18, 21, 42, 43	syl3anc 1249	. . 3 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → (𝑥(.r‘𝑂)(𝑦(+g‘𝑅)𝑧)) = ((𝑦(+g‘𝑅)𝑧)(.r‘𝑅)𝑥))
45	2, 12, 1, 13	opprmulg 13414	. . . . 5 ⊢ ((𝑅 ∈ Rng ∧ 𝑥 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅)) → (𝑥(.r‘𝑂)𝑧) = (𝑧(.r‘𝑅)𝑥))
46	18, 21, 19, 45	syl3anc 1249	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → (𝑥(.r‘𝑂)𝑧) = (𝑧(.r‘𝑅)𝑥))
47	32, 46	oveq12d 5910	. . 3 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → ((𝑥(.r‘𝑂)𝑦)(+g‘𝑅)(𝑥(.r‘𝑂)𝑧)) = ((𝑦(.r‘𝑅)𝑥)(+g‘𝑅)(𝑧(.r‘𝑅)𝑥)))
48	40, 44, 47	3eqtr4d 2232	. 2 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → (𝑥(.r‘𝑂)(𝑦(+g‘𝑅)𝑧)) = ((𝑥(.r‘𝑂)𝑦)(+g‘𝑅)(𝑥(.r‘𝑂)𝑧)))
49	2, 4, 12	rngdi 13287	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑧 ∈ (Base‘𝑅) ∧ 𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅))) → (𝑧(.r‘𝑅)(𝑥(+g‘𝑅)𝑦)) = ((𝑧(.r‘𝑅)𝑥)(+g‘𝑅)(𝑧(.r‘𝑅)𝑦)))
50	18, 19, 21, 20, 49	syl13anc 1251	. . 3 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → (𝑧(.r‘𝑅)(𝑥(+g‘𝑅)𝑦)) = ((𝑧(.r‘𝑅)𝑥)(+g‘𝑅)(𝑧(.r‘𝑅)𝑦)))
51	2, 4	rngacl 13289	. . . . 5 ⊢ ((𝑅 ∈ Rng ∧ 𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅)) → (𝑥(+g‘𝑅)𝑦) ∈ (Base‘𝑅))
52	51	3adant3r3 1216	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → (𝑥(+g‘𝑅)𝑦) ∈ (Base‘𝑅))
53	2, 12, 1, 13	opprmulg 13414	. . . 4 ⊢ ((𝑅 ∈ Rng ∧ (𝑥(+g‘𝑅)𝑦) ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅)) → ((𝑥(+g‘𝑅)𝑦)(.r‘𝑂)𝑧) = (𝑧(.r‘𝑅)(𝑥(+g‘𝑅)𝑦)))
54	18, 52, 19, 53	syl3anc 1249	. . 3 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → ((𝑥(+g‘𝑅)𝑦)(.r‘𝑂)𝑧) = (𝑧(.r‘𝑅)(𝑥(+g‘𝑅)𝑦)))
55	46, 25	oveq12d 5910	. . 3 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → ((𝑥(.r‘𝑂)𝑧)(+g‘𝑅)(𝑦(.r‘𝑂)𝑧)) = ((𝑧(.r‘𝑅)𝑥)(+g‘𝑅)(𝑧(.r‘𝑅)𝑦)))
56	50, 54, 55	3eqtr4d 2232	. 2 ⊢ ((𝑅 ∈ Rng ∧ (𝑥 ∈ (Base‘𝑅) ∧ 𝑦 ∈ (Base‘𝑅) ∧ 𝑧 ∈ (Base‘𝑅))) → ((𝑥(+g‘𝑅)𝑦)(.r‘𝑂)𝑧) = ((𝑥(.r‘𝑂)𝑧)(+g‘𝑅)(𝑦(.r‘𝑂)𝑧)))
57	3, 5, 6, 11, 17, 38, 48, 56	isrngd 13300	1 ⊢ (𝑅 ∈ Rng → 𝑂 ∈ Rng)

Syntax hints:   → wi 4   ∧ wa 104   ∧ w3a 980   = wceq 1364   ∈ wcel 2160  ‘cfv 5232  (class class class)co 5892  Basecbs 12507  +_gcplusg 12582  ._rcmulr 12583  Abelcabl 13217  Rngcrng 13279  opp_rcoppr 13410

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 615  ax-in2 616  ax-io 710  ax-5 1458  ax-7 1459  ax-gen 1460  ax-ie1 1504  ax-ie2 1505  ax-8 1515  ax-10 1516  ax-11 1517  ax-i12 1518  ax-bndl 1520  ax-4 1521  ax-17 1537  ax-i9 1541  ax-ial 1545  ax-i5r 1546  ax-13 2162  ax-14 2163  ax-ext 2171  ax-sep 4136  ax-nul 4144  ax-pow 4189  ax-pr 4224  ax-un 4448  ax-setind 4551  ax-cnex 7927  ax-resscn 7928  ax-1cn 7929  ax-1re 7930  ax-icn 7931  ax-addcl 7932  ax-addrcl 7933  ax-mulcl 7934  ax-addcom 7936  ax-addass 7938  ax-i2m1 7941  ax-0lt1 7942  ax-0id 7944  ax-rnegex 7945  ax-pre-ltirr 7948  ax-pre-lttrn 7950  ax-pre-ltadd 7952

This theorem depends on definitions:  df-bi 117  df-3an 982  df-tru 1367  df-fal 1370  df-nf 1472  df-sb 1774  df-eu 2041  df-mo 2042  df-clab 2176  df-cleq 2182  df-clel 2185  df-nfc 2321  df-ne 2361  df-nel 2456  df-ral 2473  df-rex 2474  df-rab 2477  df-v 2754  df-sbc 2978  df-csb 3073  df-dif 3146  df-un 3148  df-in 3150  df-ss 3157  df-nul 3438  df-pw 3592  df-sn 3613  df-pr 3614  df-op 3616  df-uni 3825  df-int 3860  df-br 4019  df-opab 4080  df-mpt 4081  df-id 4308  df-xp 4647  df-rel 4648  df-cnv 4649  df-co 4650  df-dm 4651  df-rn 4652  df-res 4653  df-ima 4654  df-iota 5193  df-fun 5234  df-fn 5235  df-fv 5240  df-riota 5848  df-ov 5895  df-oprab 5896  df-mpo 5897  df-tpos 6265  df-pnf 8019  df-mnf 8020  df-ltxr 8022  df-inn 8945  df-2 9003  df-3 9004  df-ndx 12510  df-slot 12511  df-base 12513  df-sets 12514  df-plusg 12595  df-mulr 12596  df-0g 12756  df-mgm 12825  df-sgrp 12858  df-mnd 12871  df-grp 12941  df-cmn 13218  df-abl 13219  df-mgp 13268  df-rng 13280  df-oppr 13411

This theorem is referenced by:  opprrngbg  13421  opprsubrngg  13551  isridlrng  13791  2idlcpblrng  13831