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

Theorem ring1 19346
Description: The (smallest) structure representing a zero ring. (Contributed by AV, 28-Apr-2019.)
Hypothesis
Ref Expression
ring1.m 𝑀 = {⟨(Base‘ndx), {𝑍}⟩, ⟨(+g‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩, ⟨(.r‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩}
Assertion
Ref Expression
ring1 (𝑍𝑉𝑀 ∈ Ring)

Proof of Theorem ring1
Dummy variables 𝑎 𝑏 𝑐 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqid 2821 . . . 4 {⟨(Base‘ndx), {𝑍}⟩, ⟨(+g‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩} = {⟨(Base‘ndx), {𝑍}⟩, ⟨(+g‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩}
21grp1 18200 . . 3 (𝑍𝑉 → {⟨(Base‘ndx), {𝑍}⟩, ⟨(+g‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩} ∈ Grp)
3 snex 5323 . . . . . 6 {𝑍} ∈ V
4 ring1.m . . . . . . 7 𝑀 = {⟨(Base‘ndx), {𝑍}⟩, ⟨(+g‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩, ⟨(.r‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩}
54rngbase 16614 . . . . . 6 ({𝑍} ∈ V → {𝑍} = (Base‘𝑀))
63, 5ax-mp 5 . . . . 5 {𝑍} = (Base‘𝑀)
76eqcomi 2830 . . . 4 (Base‘𝑀) = {𝑍}
8 snex 5323 . . . . 5 {⟨⟨𝑍, 𝑍⟩, 𝑍⟩} ∈ V
94rngplusg 16615 . . . . . 6 ({⟨⟨𝑍, 𝑍⟩, 𝑍⟩} ∈ V → {⟨⟨𝑍, 𝑍⟩, 𝑍⟩} = (+g𝑀))
109eqcomd 2827 . . . . 5 ({⟨⟨𝑍, 𝑍⟩, 𝑍⟩} ∈ V → (+g𝑀) = {⟨⟨𝑍, 𝑍⟩, 𝑍⟩})
118, 10ax-mp 5 . . . 4 (+g𝑀) = {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}
127, 11, 1grppropstr 18114 . . 3 (𝑀 ∈ Grp ↔ {⟨(Base‘ndx), {𝑍}⟩, ⟨(+g‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩} ∈ Grp)
132, 12sylibr 236 . 2 (𝑍𝑉𝑀 ∈ Grp)
141mnd1 17946 . . 3 (𝑍𝑉 → {⟨(Base‘ndx), {𝑍}⟩, ⟨(+g‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩} ∈ Mnd)
15 eqid 2821 . . . . . 6 (mulGrp‘𝑀) = (mulGrp‘𝑀)
1615, 6mgpbas 19239 . . . . 5 {𝑍} = (Base‘(mulGrp‘𝑀))
171grpbase 16604 . . . . . 6 ({𝑍} ∈ V → {𝑍} = (Base‘{⟨(Base‘ndx), {𝑍}⟩, ⟨(+g‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩}))
183, 17ax-mp 5 . . . . 5 {𝑍} = (Base‘{⟨(Base‘ndx), {𝑍}⟩, ⟨(+g‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩})
1916, 18eqtr3i 2846 . . . 4 (Base‘(mulGrp‘𝑀)) = (Base‘{⟨(Base‘ndx), {𝑍}⟩, ⟨(+g‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩})
204rngmulr 16616 . . . . . 6 ({⟨⟨𝑍, 𝑍⟩, 𝑍⟩} ∈ V → {⟨⟨𝑍, 𝑍⟩, 𝑍⟩} = (.r𝑀))
218, 20ax-mp 5 . . . . 5 {⟨⟨𝑍, 𝑍⟩, 𝑍⟩} = (.r𝑀)
221grpplusg 16605 . . . . . 6 ({⟨⟨𝑍, 𝑍⟩, 𝑍⟩} ∈ V → {⟨⟨𝑍, 𝑍⟩, 𝑍⟩} = (+g‘{⟨(Base‘ndx), {𝑍}⟩, ⟨(+g‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩}))
238, 22ax-mp 5 . . . . 5 {⟨⟨𝑍, 𝑍⟩, 𝑍⟩} = (+g‘{⟨(Base‘ndx), {𝑍}⟩, ⟨(+g‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩})
24 eqid 2821 . . . . . 6 (.r𝑀) = (.r𝑀)
2515, 24mgpplusg 19237 . . . . 5 (.r𝑀) = (+g‘(mulGrp‘𝑀))
2621, 23, 253eqtr3ri 2853 . . . 4 (+g‘(mulGrp‘𝑀)) = (+g‘{⟨(Base‘ndx), {𝑍}⟩, ⟨(+g‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩})
2719, 26mndprop 17931 . . 3 ((mulGrp‘𝑀) ∈ Mnd ↔ {⟨(Base‘ndx), {𝑍}⟩, ⟨(+g‘ndx), {⟨⟨𝑍, 𝑍⟩, 𝑍⟩}⟩} ∈ Mnd)
2814, 27sylibr 236 . 2 (𝑍𝑉 → (mulGrp‘𝑀) ∈ Mnd)
29 df-ov 7153 . . . . . 6 (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍) = ({⟨⟨𝑍, 𝑍⟩, 𝑍⟩}‘⟨𝑍, 𝑍⟩)
30 opex 5348 . . . . . . 7 𝑍, 𝑍⟩ ∈ V
31 fvsng 6936 . . . . . . 7 ((⟨𝑍, 𝑍⟩ ∈ V ∧ 𝑍𝑉) → ({⟨⟨𝑍, 𝑍⟩, 𝑍⟩}‘⟨𝑍, 𝑍⟩) = 𝑍)
3230, 31mpan 688 . . . . . 6 (𝑍𝑉 → ({⟨⟨𝑍, 𝑍⟩, 𝑍⟩}‘⟨𝑍, 𝑍⟩) = 𝑍)
3329, 32syl5eq 2868 . . . . 5 (𝑍𝑉 → (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍) = 𝑍)
3433oveq2d 7166 . . . 4 (𝑍𝑉 → (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)) = (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍))
3533, 33oveq12d 7168 . . . 4 (𝑍𝑉 → ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)) = (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍))
3634, 35eqtr4d 2859 . . 3 (𝑍𝑉 → (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)))
3733oveq1d 7165 . . . 4 (𝑍𝑉 → ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍) = (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍))
3837, 35eqtr4d 2859 . . 3 (𝑍𝑉 → ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)))
39 oveq1 7157 . . . . . . . 8 (𝑎 = 𝑍 → (𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)))
40 oveq1 7157 . . . . . . . . 9 (𝑎 = 𝑍 → (𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏) = (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏))
41 oveq1 7157 . . . . . . . . 9 (𝑎 = 𝑍 → (𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))
4240, 41oveq12d 7168 . . . . . . . 8 (𝑎 = 𝑍 → ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)))
4339, 42eqeq12d 2837 . . . . . . 7 (𝑎 = 𝑍 → ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ↔ (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))))
4440oveq1d 7165 . . . . . . . 8 (𝑎 = 𝑍 → ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))
4541oveq1d 7165 . . . . . . . 8 (𝑎 = 𝑍 → ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)))
4644, 45eqeq12d 2837 . . . . . . 7 (𝑎 = 𝑍 → (((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ↔ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))))
4743, 46anbi12d 632 . . . . . 6 (𝑎 = 𝑍 → (((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))) ↔ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)))))
48472ralbidv 3199 . . . . 5 (𝑎 = 𝑍 → (∀𝑏 ∈ {𝑍}∀𝑐 ∈ {𝑍} ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))) ↔ ∀𝑏 ∈ {𝑍}∀𝑐 ∈ {𝑍} ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)))))
4948ralsng 4606 . . . 4 (𝑍𝑉 → (∀𝑎 ∈ {𝑍}∀𝑏 ∈ {𝑍}∀𝑐 ∈ {𝑍} ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))) ↔ ∀𝑏 ∈ {𝑍}∀𝑐 ∈ {𝑍} ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)))))
50 oveq1 7157 . . . . . . . . 9 (𝑏 = 𝑍 → (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))
5150oveq2d 7166 . . . . . . . 8 (𝑏 = 𝑍 → (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)))
52 oveq2 7158 . . . . . . . . 9 (𝑏 = 𝑍 → (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏) = (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍))
5352oveq1d 7165 . . . . . . . 8 (𝑏 = 𝑍 → ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)))
5451, 53eqeq12d 2837 . . . . . . 7 (𝑏 = 𝑍 → ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ↔ (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))))
5552oveq1d 7165 . . . . . . . 8 (𝑏 = 𝑍 → ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))
5650oveq2d 7166 . . . . . . . 8 (𝑏 = 𝑍 → ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)))
5755, 56eqeq12d 2837 . . . . . . 7 (𝑏 = 𝑍 → (((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ↔ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))))
5854, 57anbi12d 632 . . . . . 6 (𝑏 = 𝑍 → (((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))) ↔ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)))))
5958ralbidv 3197 . . . . 5 (𝑏 = 𝑍 → (∀𝑐 ∈ {𝑍} ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))) ↔ ∀𝑐 ∈ {𝑍} ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)))))
6059ralsng 4606 . . . 4 (𝑍𝑉 → (∀𝑏 ∈ {𝑍}∀𝑐 ∈ {𝑍} ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))) ↔ ∀𝑐 ∈ {𝑍} ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)))))
61 oveq2 7158 . . . . . . . 8 (𝑐 = 𝑍 → (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍))
6261oveq2d 7166 . . . . . . 7 (𝑐 = 𝑍 → (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)))
6361oveq2d 7166 . . . . . . 7 (𝑐 = 𝑍 → ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)))
6462, 63eqeq12d 2837 . . . . . 6 (𝑐 = 𝑍 → ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ↔ (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍))))
65 oveq2 7158 . . . . . . 7 (𝑐 = 𝑍 → ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍))
6661, 61oveq12d 7168 . . . . . . 7 (𝑐 = 𝑍 → ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)))
6765, 66eqeq12d 2837 . . . . . 6 (𝑐 = 𝑍 → (((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ↔ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍))))
6864, 67anbi12d 632 . . . . 5 (𝑐 = 𝑍 → (((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))) ↔ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)) ∧ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)))))
6968ralsng 4606 . . . 4 (𝑍𝑉 → (∀𝑐 ∈ {𝑍} ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))) ↔ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)) ∧ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)))))
7049, 60, 693bitrd 307 . . 3 (𝑍𝑉 → (∀𝑎 ∈ {𝑍}∀𝑏 ∈ {𝑍}∀𝑐 ∈ {𝑍} ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))) ↔ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)) ∧ ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍) = ((𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑍{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑍)))))
7136, 38, 70mpbir2and 711 . 2 (𝑍𝑉 → ∀𝑎 ∈ {𝑍}∀𝑏 ∈ {𝑍}∀𝑐 ∈ {𝑍} ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐))))
728, 9ax-mp 5 . . 3 {⟨⟨𝑍, 𝑍⟩, 𝑍⟩} = (+g𝑀)
736, 15, 72, 21isring 19295 . 2 (𝑀 ∈ Ring ↔ (𝑀 ∈ Grp ∧ (mulGrp‘𝑀) ∈ Mnd ∧ ∀𝑎 ∈ {𝑍}∀𝑏 ∈ {𝑍}∀𝑐 ∈ {𝑍} ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) = ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)) ∧ ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑏){⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐) = ((𝑎{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐){⟨⟨𝑍, 𝑍⟩, 𝑍⟩} (𝑏{⟨⟨𝑍, 𝑍⟩, 𝑍⟩}𝑐)))))
7413, 28, 71, 73syl3anbrc 1339 1 (𝑍𝑉𝑀 ∈ Ring)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 398   = wceq 1533  wcel 2110  wral 3138  Vcvv 3494  {csn 4560  {cpr 4562  {ctp 4564  cop 4566  cfv 6349  (class class class)co 7150  ndxcnx 16474  Basecbs 16477  +gcplusg 16559  .rcmulr 16560  Mndcmnd 17905  Grpcgrp 18097  mulGrpcmgp 19233  Ringcrg 19291
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 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-sep 5195  ax-nul 5202  ax-pow 5258  ax-pr 5321  ax-un 7455  ax-cnex 10587  ax-resscn 10588  ax-1cn 10589  ax-icn 10590  ax-addcl 10591  ax-addrcl 10592  ax-mulcl 10593  ax-mulrcl 10594  ax-mulcom 10595  ax-addass 10596  ax-mulass 10597  ax-distr 10598  ax-i2m1 10599  ax-1ne0 10600  ax-1rid 10601  ax-rnegex 10602  ax-rrecex 10603  ax-cnre 10604  ax-pre-lttri 10605  ax-pre-lttrn 10606  ax-pre-ltadd 10607  ax-pre-mulgt0 10608
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1536  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3772  df-csb 3883  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-pss 3953  df-nul 4291  df-if 4467  df-pw 4540  df-sn 4561  df-pr 4563  df-tp 4565  df-op 4567  df-uni 4832  df-int 4869  df-iun 4913  df-br 5059  df-opab 5121  df-mpt 5139  df-tr 5165  df-id 5454  df-eprel 5459  df-po 5468  df-so 5469  df-fr 5508  df-we 5510  df-xp 5555  df-rel 5556  df-cnv 5557  df-co 5558  df-dm 5559  df-rn 5560  df-res 5561  df-ima 5562  df-pred 6142  df-ord 6188  df-on 6189  df-lim 6190  df-suc 6191  df-iota 6308  df-fun 6351  df-fn 6352  df-f 6353  df-f1 6354  df-fo 6355  df-f1o 6356  df-fv 6357  df-riota 7108  df-ov 7153  df-oprab 7154  df-mpo 7155  df-om 7575  df-1st 7683  df-2nd 7684  df-wrecs 7941  df-recs 8002  df-rdg 8040  df-1o 8096  df-oadd 8100  df-er 8283  df-en 8504  df-dom 8505  df-sdom 8506  df-fin 8507  df-pnf 10671  df-mnf 10672  df-xr 10673  df-ltxr 10674  df-le 10675  df-sub 10866  df-neg 10867  df-nn 11633  df-2 11694  df-3 11695  df-n0 11892  df-z 11976  df-uz 12238  df-fz 12887  df-struct 16479  df-ndx 16480  df-slot 16481  df-base 16483  df-sets 16484  df-plusg 16572  df-mulr 16573  df-0g 16709  df-mgm 17846  df-sgrp 17895  df-mnd 17906  df-grp 18100  df-mgp 19234  df-ring 19293
This theorem is referenced by:  ringn0  19347  rng1nnzr  20041  lmod1zr  44542
  Copyright terms: Public domain W3C validator