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

Theorem issrg 20119
Description: The predicate "is a semiring". (Contributed by Thierry Arnoux, 21-Mar-2018.)
Hypotheses
Ref Expression
issrg.b ๐ต = (Baseโ€˜๐‘…)
issrg.g ๐บ = (mulGrpโ€˜๐‘…)
issrg.p + = (+gโ€˜๐‘…)
issrg.t ยท = (.rโ€˜๐‘…)
issrg.0 0 = (0gโ€˜๐‘…)
Assertion
Ref Expression
issrg (๐‘… โˆˆ SRing โ†” (๐‘… โˆˆ CMnd โˆง ๐บ โˆˆ Mnd โˆง โˆ€๐‘ฅ โˆˆ ๐ต (โˆ€๐‘ฆ โˆˆ ๐ต โˆ€๐‘ง โˆˆ ๐ต ((๐‘ฅ ยท (๐‘ฆ + ๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง)) โˆง ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง))) โˆง (( 0 ยท ๐‘ฅ) = 0 โˆง (๐‘ฅ ยท 0 ) = 0 ))))
Distinct variable groups:   ๐‘ฅ,๐‘ฆ,๐‘ง, +   ๐‘ฅ, 0 ,๐‘ฆ,๐‘ง   ๐‘ฅ, ยท ,๐‘ฆ,๐‘ง   ๐‘ฅ,๐ต,๐‘ฆ,๐‘ง   ๐‘ฅ,๐‘…,๐‘ฆ,๐‘ง
Allowed substitution hints:   ๐บ(๐‘ฅ,๐‘ฆ,๐‘ง)

Proof of Theorem issrg
Dummy variables ๐‘› ๐‘ ๐‘ ๐‘Ÿ ๐‘ก are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 issrg.g . . . . . 6 ๐บ = (mulGrpโ€˜๐‘…)
21eleq1i 2819 . . . . 5 (๐บ โˆˆ Mnd โ†” (mulGrpโ€˜๐‘…) โˆˆ Mnd)
32bicomi 223 . . . 4 ((mulGrpโ€˜๐‘…) โˆˆ Mnd โ†” ๐บ โˆˆ Mnd)
4 issrg.b . . . . . 6 ๐ต = (Baseโ€˜๐‘…)
54fvexi 6905 . . . . 5 ๐ต โˆˆ V
6 issrg.p . . . . . 6 + = (+gโ€˜๐‘…)
76fvexi 6905 . . . . 5 + โˆˆ V
8 issrg.t . . . . . . . 8 ยท = (.rโ€˜๐‘…)
98fvexi 6905 . . . . . . 7 ยท โˆˆ V
109a1i 11 . . . . . 6 ((๐‘ = ๐ต โˆง ๐‘ = + ) โ†’ ยท โˆˆ V)
11 issrg.0 . . . . . . . . 9 0 = (0gโ€˜๐‘…)
1211fvexi 6905 . . . . . . . 8 0 โˆˆ V
1312a1i 11 . . . . . . 7 (((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โ†’ 0 โˆˆ V)
14 simplll 774 . . . . . . . 8 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ ๐‘ = ๐ต)
15 simplr 768 . . . . . . . . . . . . . 14 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ ๐‘ก = ยท )
16 eqidd 2728 . . . . . . . . . . . . . 14 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ ๐‘ฅ = ๐‘ฅ)
17 simpllr 775 . . . . . . . . . . . . . . 15 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ ๐‘ = + )
1817oveqd 7431 . . . . . . . . . . . . . 14 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ (๐‘ฆ๐‘๐‘ง) = (๐‘ฆ + ๐‘ง))
1915, 16, 18oveq123d 7435 . . . . . . . . . . . . 13 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ (๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = (๐‘ฅ ยท (๐‘ฆ + ๐‘ง)))
2015oveqd 7431 . . . . . . . . . . . . . 14 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ (๐‘ฅ๐‘ก๐‘ฆ) = (๐‘ฅ ยท ๐‘ฆ))
2115oveqd 7431 . . . . . . . . . . . . . 14 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ (๐‘ฅ๐‘ก๐‘ง) = (๐‘ฅ ยท ๐‘ง))
2217, 20, 21oveq123d 7435 . . . . . . . . . . . . 13 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง)))
2319, 22eqeq12d 2743 . . . . . . . . . . . 12 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โ†” (๐‘ฅ ยท (๐‘ฆ + ๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง))))
2417oveqd 7431 . . . . . . . . . . . . . 14 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ (๐‘ฅ๐‘๐‘ฆ) = (๐‘ฅ + ๐‘ฆ))
25 eqidd 2728 . . . . . . . . . . . . . 14 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ ๐‘ง = ๐‘ง)
2615, 24, 25oveq123d 7435 . . . . . . . . . . . . 13 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง))
2715oveqd 7431 . . . . . . . . . . . . . 14 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ (๐‘ฆ๐‘ก๐‘ง) = (๐‘ฆ ยท ๐‘ง))
2817, 21, 27oveq123d 7435 . . . . . . . . . . . . 13 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง)) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง)))
2926, 28eqeq12d 2743 . . . . . . . . . . . 12 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ (((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง)) โ†” ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง))))
3023, 29anbi12d 630 . . . . . . . . . . 11 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ (((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โ†” ((๐‘ฅ ยท (๐‘ฆ + ๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง)) โˆง ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง)))))
3114, 30raleqbidv 3337 . . . . . . . . . 10 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ (โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โ†” โˆ€๐‘ง โˆˆ ๐ต ((๐‘ฅ ยท (๐‘ฆ + ๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง)) โˆง ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง)))))
3214, 31raleqbidv 3337 . . . . . . . . 9 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โ†” โˆ€๐‘ฆ โˆˆ ๐ต โˆ€๐‘ง โˆˆ ๐ต ((๐‘ฅ ยท (๐‘ฆ + ๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง)) โˆง ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง)))))
33 simpr 484 . . . . . . . . . . . 12 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ ๐‘› = 0 )
3415, 33, 16oveq123d 7435 . . . . . . . . . . 11 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ (๐‘›๐‘ก๐‘ฅ) = ( 0 ยท ๐‘ฅ))
3534, 33eqeq12d 2743 . . . . . . . . . 10 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โ†” ( 0 ยท ๐‘ฅ) = 0 ))
3615, 16, 33oveq123d 7435 . . . . . . . . . . 11 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ (๐‘ฅ๐‘ก๐‘›) = (๐‘ฅ ยท 0 ))
3736, 33eqeq12d 2743 . . . . . . . . . 10 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ ((๐‘ฅ๐‘ก๐‘›) = ๐‘› โ†” (๐‘ฅ ยท 0 ) = 0 ))
3835, 37anbi12d 630 . . . . . . . . 9 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ (((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›) โ†” (( 0 ยท ๐‘ฅ) = 0 โˆง (๐‘ฅ ยท 0 ) = 0 )))
3932, 38anbi12d 630 . . . . . . . 8 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ ((โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›)) โ†” (โˆ€๐‘ฆ โˆˆ ๐ต โˆ€๐‘ง โˆˆ ๐ต ((๐‘ฅ ยท (๐‘ฆ + ๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง)) โˆง ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง))) โˆง (( 0 ยท ๐‘ฅ) = 0 โˆง (๐‘ฅ ยท 0 ) = 0 ))))
4014, 39raleqbidv 3337 . . . . . . 7 ((((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โˆง ๐‘› = 0 ) โ†’ (โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›)) โ†” โˆ€๐‘ฅ โˆˆ ๐ต (โˆ€๐‘ฆ โˆˆ ๐ต โˆ€๐‘ง โˆˆ ๐ต ((๐‘ฅ ยท (๐‘ฆ + ๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง)) โˆง ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง))) โˆง (( 0 ยท ๐‘ฅ) = 0 โˆง (๐‘ฅ ยท 0 ) = 0 ))))
4113, 40sbcied 3819 . . . . . 6 (((๐‘ = ๐ต โˆง ๐‘ = + ) โˆง ๐‘ก = ยท ) โ†’ ([ 0 / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›)) โ†” โˆ€๐‘ฅ โˆˆ ๐ต (โˆ€๐‘ฆ โˆˆ ๐ต โˆ€๐‘ง โˆˆ ๐ต ((๐‘ฅ ยท (๐‘ฆ + ๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง)) โˆง ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง))) โˆง (( 0 ยท ๐‘ฅ) = 0 โˆง (๐‘ฅ ยท 0 ) = 0 ))))
4210, 41sbcied 3819 . . . . 5 ((๐‘ = ๐ต โˆง ๐‘ = + ) โ†’ ([ ยท / ๐‘ก][ 0 / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›)) โ†” โˆ€๐‘ฅ โˆˆ ๐ต (โˆ€๐‘ฆ โˆˆ ๐ต โˆ€๐‘ง โˆˆ ๐ต ((๐‘ฅ ยท (๐‘ฆ + ๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง)) โˆง ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง))) โˆง (( 0 ยท ๐‘ฅ) = 0 โˆง (๐‘ฅ ยท 0 ) = 0 ))))
435, 7, 42sbc2ie 3856 . . . 4 ([๐ต / ๐‘][ + / ๐‘][ ยท / ๐‘ก][ 0 / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›)) โ†” โˆ€๐‘ฅ โˆˆ ๐ต (โˆ€๐‘ฆ โˆˆ ๐ต โˆ€๐‘ง โˆˆ ๐ต ((๐‘ฅ ยท (๐‘ฆ + ๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง)) โˆง ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง))) โˆง (( 0 ยท ๐‘ฅ) = 0 โˆง (๐‘ฅ ยท 0 ) = 0 )))
443, 43anbi12i 626 . . 3 (((mulGrpโ€˜๐‘…) โˆˆ Mnd โˆง [๐ต / ๐‘][ + / ๐‘][ ยท / ๐‘ก][ 0 / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›))) โ†” (๐บ โˆˆ Mnd โˆง โˆ€๐‘ฅ โˆˆ ๐ต (โˆ€๐‘ฆ โˆˆ ๐ต โˆ€๐‘ง โˆˆ ๐ต ((๐‘ฅ ยท (๐‘ฆ + ๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง)) โˆง ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง))) โˆง (( 0 ยท ๐‘ฅ) = 0 โˆง (๐‘ฅ ยท 0 ) = 0 ))))
4544anbi2i 622 . 2 ((๐‘… โˆˆ CMnd โˆง ((mulGrpโ€˜๐‘…) โˆˆ Mnd โˆง [๐ต / ๐‘][ + / ๐‘][ ยท / ๐‘ก][ 0 / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›)))) โ†” (๐‘… โˆˆ CMnd โˆง (๐บ โˆˆ Mnd โˆง โˆ€๐‘ฅ โˆˆ ๐ต (โˆ€๐‘ฆ โˆˆ ๐ต โˆ€๐‘ง โˆˆ ๐ต ((๐‘ฅ ยท (๐‘ฆ + ๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง)) โˆง ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง))) โˆง (( 0 ยท ๐‘ฅ) = 0 โˆง (๐‘ฅ ยท 0 ) = 0 )))))
46 fveq2 6891 . . . . 5 (๐‘Ÿ = ๐‘… โ†’ (mulGrpโ€˜๐‘Ÿ) = (mulGrpโ€˜๐‘…))
4746eleq1d 2813 . . . 4 (๐‘Ÿ = ๐‘… โ†’ ((mulGrpโ€˜๐‘Ÿ) โˆˆ Mnd โ†” (mulGrpโ€˜๐‘…) โˆˆ Mnd))
48 fveq2 6891 . . . . . 6 (๐‘Ÿ = ๐‘… โ†’ (Baseโ€˜๐‘Ÿ) = (Baseโ€˜๐‘…))
4948, 4eqtr4di 2785 . . . . 5 (๐‘Ÿ = ๐‘… โ†’ (Baseโ€˜๐‘Ÿ) = ๐ต)
50 fveq2 6891 . . . . . . 7 (๐‘Ÿ = ๐‘… โ†’ (+gโ€˜๐‘Ÿ) = (+gโ€˜๐‘…))
5150, 6eqtr4di 2785 . . . . . 6 (๐‘Ÿ = ๐‘… โ†’ (+gโ€˜๐‘Ÿ) = + )
52 fveq2 6891 . . . . . . . 8 (๐‘Ÿ = ๐‘… โ†’ (.rโ€˜๐‘Ÿ) = (.rโ€˜๐‘…))
5352, 8eqtr4di 2785 . . . . . . 7 (๐‘Ÿ = ๐‘… โ†’ (.rโ€˜๐‘Ÿ) = ยท )
54 fveq2 6891 . . . . . . . . 9 (๐‘Ÿ = ๐‘… โ†’ (0gโ€˜๐‘Ÿ) = (0gโ€˜๐‘…))
5554, 11eqtr4di 2785 . . . . . . . 8 (๐‘Ÿ = ๐‘… โ†’ (0gโ€˜๐‘Ÿ) = 0 )
5655sbceq1d 3779 . . . . . . 7 (๐‘Ÿ = ๐‘… โ†’ ([(0gโ€˜๐‘Ÿ) / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›)) โ†” [ 0 / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›))))
5753, 56sbceqbid 3781 . . . . . 6 (๐‘Ÿ = ๐‘… โ†’ ([(.rโ€˜๐‘Ÿ) / ๐‘ก][(0gโ€˜๐‘Ÿ) / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›)) โ†” [ ยท / ๐‘ก][ 0 / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›))))
5851, 57sbceqbid 3781 . . . . 5 (๐‘Ÿ = ๐‘… โ†’ ([(+gโ€˜๐‘Ÿ) / ๐‘][(.rโ€˜๐‘Ÿ) / ๐‘ก][(0gโ€˜๐‘Ÿ) / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›)) โ†” [ + / ๐‘][ ยท / ๐‘ก][ 0 / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›))))
5949, 58sbceqbid 3781 . . . 4 (๐‘Ÿ = ๐‘… โ†’ ([(Baseโ€˜๐‘Ÿ) / ๐‘][(+gโ€˜๐‘Ÿ) / ๐‘][(.rโ€˜๐‘Ÿ) / ๐‘ก][(0gโ€˜๐‘Ÿ) / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›)) โ†” [๐ต / ๐‘][ + / ๐‘][ ยท / ๐‘ก][ 0 / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›))))
6047, 59anbi12d 630 . . 3 (๐‘Ÿ = ๐‘… โ†’ (((mulGrpโ€˜๐‘Ÿ) โˆˆ Mnd โˆง [(Baseโ€˜๐‘Ÿ) / ๐‘][(+gโ€˜๐‘Ÿ) / ๐‘][(.rโ€˜๐‘Ÿ) / ๐‘ก][(0gโ€˜๐‘Ÿ) / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›))) โ†” ((mulGrpโ€˜๐‘…) โˆˆ Mnd โˆง [๐ต / ๐‘][ + / ๐‘][ ยท / ๐‘ก][ 0 / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›)))))
61 df-srg 20118 . . 3 SRing = {๐‘Ÿ โˆˆ CMnd โˆฃ ((mulGrpโ€˜๐‘Ÿ) โˆˆ Mnd โˆง [(Baseโ€˜๐‘Ÿ) / ๐‘][(+gโ€˜๐‘Ÿ) / ๐‘][(.rโ€˜๐‘Ÿ) / ๐‘ก][(0gโ€˜๐‘Ÿ) / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›)))}
6260, 61elrab2 3683 . 2 (๐‘… โˆˆ SRing โ†” (๐‘… โˆˆ CMnd โˆง ((mulGrpโ€˜๐‘…) โˆˆ Mnd โˆง [๐ต / ๐‘][ + / ๐‘][ ยท / ๐‘ก][ 0 / ๐‘›]โˆ€๐‘ฅ โˆˆ ๐‘ (โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฅ๐‘ก(๐‘ฆ๐‘๐‘ง)) = ((๐‘ฅ๐‘ก๐‘ฆ)๐‘(๐‘ฅ๐‘ก๐‘ง)) โˆง ((๐‘ฅ๐‘๐‘ฆ)๐‘ก๐‘ง) = ((๐‘ฅ๐‘ก๐‘ง)๐‘(๐‘ฆ๐‘ก๐‘ง))) โˆง ((๐‘›๐‘ก๐‘ฅ) = ๐‘› โˆง (๐‘ฅ๐‘ก๐‘›) = ๐‘›)))))
63 3anass 1093 . 2 ((๐‘… โˆˆ CMnd โˆง ๐บ โˆˆ Mnd โˆง โˆ€๐‘ฅ โˆˆ ๐ต (โˆ€๐‘ฆ โˆˆ ๐ต โˆ€๐‘ง โˆˆ ๐ต ((๐‘ฅ ยท (๐‘ฆ + ๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง)) โˆง ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง))) โˆง (( 0 ยท ๐‘ฅ) = 0 โˆง (๐‘ฅ ยท 0 ) = 0 ))) โ†” (๐‘… โˆˆ CMnd โˆง (๐บ โˆˆ Mnd โˆง โˆ€๐‘ฅ โˆˆ ๐ต (โˆ€๐‘ฆ โˆˆ ๐ต โˆ€๐‘ง โˆˆ ๐ต ((๐‘ฅ ยท (๐‘ฆ + ๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง)) โˆง ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง))) โˆง (( 0 ยท ๐‘ฅ) = 0 โˆง (๐‘ฅ ยท 0 ) = 0 )))))
6445, 62, 633bitr4i 303 1 (๐‘… โˆˆ SRing โ†” (๐‘… โˆˆ CMnd โˆง ๐บ โˆˆ Mnd โˆง โˆ€๐‘ฅ โˆˆ ๐ต (โˆ€๐‘ฆ โˆˆ ๐ต โˆ€๐‘ง โˆˆ ๐ต ((๐‘ฅ ยท (๐‘ฆ + ๐‘ง)) = ((๐‘ฅ ยท ๐‘ฆ) + (๐‘ฅ ยท ๐‘ง)) โˆง ((๐‘ฅ + ๐‘ฆ) ยท ๐‘ง) = ((๐‘ฅ ยท ๐‘ง) + (๐‘ฆ ยท ๐‘ง))) โˆง (( 0 ยท ๐‘ฅ) = 0 โˆง (๐‘ฅ ยท 0 ) = 0 ))))
Colors of variables: wff setvar class
Syntax hints:   โ†” wb 205   โˆง wa 395   โˆง w3a 1085   = wceq 1534   โˆˆ wcel 2099  โˆ€wral 3056  Vcvv 3469  [wsbc 3774  โ€˜cfv 6542  (class class class)co 7414  Basecbs 17171  +gcplusg 17224  .rcmulr 17225  0gc0g 17412  Mndcmnd 18685  CMndccmn 19726  mulGrpcmgp 20065  SRingcsrg 20117
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-ext 2698  ax-nul 5300
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 847  df-3an 1087  df-tru 1537  df-fal 1547  df-ex 1775  df-sb 2061  df-clab 2705  df-cleq 2719  df-clel 2805  df-ne 2936  df-ral 3057  df-rab 3428  df-v 3471  df-sbc 3775  df-dif 3947  df-un 3949  df-in 3951  df-ss 3961  df-nul 4319  df-if 4525  df-sn 4625  df-pr 4627  df-op 4631  df-uni 4904  df-br 5143  df-iota 6494  df-fv 6550  df-ov 7417  df-srg 20118
This theorem is referenced by:  srgcmn  20120  srgmgp  20122  srgdilem  20123  srgrz  20138  srglz  20139  ringsrg  20222  nn0srg  21357  rge0srg  21358
  Copyright terms: Public domain W3C validator