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

Theorem mdetmul 22435
Description: Multiplicativity of the determinant function: the determinant of a matrix product of square matrices equals the product of their determinants. Proposition 4.15 in [Lang] p. 517. (Contributed by Stefan O'Rear, 16-Jul-2018.)
Hypotheses
Ref Expression
mdetmul.a ๐ด = (๐‘ Mat ๐‘…)
mdetmul.b ๐ต = (Baseโ€˜๐ด)
mdetmul.d ๐ท = (๐‘ maDet ๐‘…)
mdetmul.t1 ยท = (.rโ€˜๐‘…)
mdetmul.t2 โˆ™ = (.rโ€˜๐ด)
Assertion
Ref Expression
mdetmul ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐ทโ€˜(๐น โˆ™ ๐บ)) = ((๐ทโ€˜๐น) ยท (๐ทโ€˜๐บ)))

Proof of Theorem mdetmul
Dummy variables ๐‘Ž ๐‘ ๐‘ ๐‘‘ ๐‘’ are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 mdetmul.a . . 3 ๐ด = (๐‘ Mat ๐‘…)
2 mdetmul.b . . 3 ๐ต = (Baseโ€˜๐ด)
3 eqid 2724 . . 3 (Baseโ€˜๐‘…) = (Baseโ€˜๐‘…)
4 eqid 2724 . . 3 (0gโ€˜๐‘…) = (0gโ€˜๐‘…)
5 eqid 2724 . . 3 (1rโ€˜๐‘…) = (1rโ€˜๐‘…)
6 eqid 2724 . . 3 (+gโ€˜๐‘…) = (+gโ€˜๐‘…)
7 mdetmul.t1 . . 3 ยท = (.rโ€˜๐‘…)
81, 2matrcl 22222 . . . . 5 (๐น โˆˆ ๐ต โ†’ (๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ V))
98simpld 494 . . . 4 (๐น โˆˆ ๐ต โ†’ ๐‘ โˆˆ Fin)
1093ad2ant2 1131 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐‘ โˆˆ Fin)
11 crngring 20135 . . . 4 (๐‘… โˆˆ CRing โ†’ ๐‘… โˆˆ Ring)
12113ad2ant1 1130 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐‘… โˆˆ Ring)
13 mdetmul.d . . . . . . . 8 ๐ท = (๐‘ maDet ๐‘…)
1413, 1, 2, 3mdetf 22407 . . . . . . 7 (๐‘… โˆˆ CRing โ†’ ๐ท:๐ตโŸถ(Baseโ€˜๐‘…))
15143ad2ant1 1130 . . . . . 6 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐ท:๐ตโŸถ(Baseโ€˜๐‘…))
1615adantr 480 . . . . 5 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ๐‘Ž โˆˆ ๐ต) โ†’ ๐ท:๐ตโŸถ(Baseโ€˜๐‘…))
171matring 22255 . . . . . . . 8 ((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ Ring) โ†’ ๐ด โˆˆ Ring)
1810, 12, 17syl2anc 583 . . . . . . 7 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐ด โˆˆ Ring)
1918adantr 480 . . . . . 6 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ๐‘Ž โˆˆ ๐ต) โ†’ ๐ด โˆˆ Ring)
20 simpr 484 . . . . . 6 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ๐‘Ž โˆˆ ๐ต) โ†’ ๐‘Ž โˆˆ ๐ต)
21 simpl3 1190 . . . . . 6 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ๐‘Ž โˆˆ ๐ต) โ†’ ๐บ โˆˆ ๐ต)
22 mdetmul.t2 . . . . . . 7 โˆ™ = (.rโ€˜๐ด)
232, 22ringcl 20140 . . . . . 6 ((๐ด โˆˆ Ring โˆง ๐‘Ž โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐‘Ž โˆ™ ๐บ) โˆˆ ๐ต)
2419, 20, 21, 23syl3anc 1368 . . . . 5 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ๐‘Ž โˆˆ ๐ต) โ†’ (๐‘Ž โˆ™ ๐บ) โˆˆ ๐ต)
2516, 24ffvelcdmd 7077 . . . 4 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ๐‘Ž โˆˆ ๐ต) โ†’ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)) โˆˆ (Baseโ€˜๐‘…))
2625fmpttd 7106 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ))):๐ตโŸถ(Baseโ€˜๐‘…))
27 simp21 1203 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐‘ โˆˆ ๐ต)
28 fvoveq1 7424 . . . . . . . 8 (๐‘Ž = ๐‘ โ†’ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
29 eqid 2724 . . . . . . . 8 (๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ))) = (๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))
30 fvex 6894 . . . . . . . 8 (๐ทโ€˜(๐‘ โˆ™ ๐บ)) โˆˆ V
3128, 29, 30fvmpt 6988 . . . . . . 7 (๐‘ โˆˆ ๐ต โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
3227, 31syl 17 . . . . . 6 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
33 simp11 1200 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐‘… โˆˆ CRing)
3418adantr 480 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โ†’ ๐ด โˆˆ Ring)
35 simpr1 1191 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โ†’ ๐‘ โˆˆ ๐ต)
36 simpl3 1190 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โ†’ ๐บ โˆˆ ๐ต)
372, 22ringcl 20140 . . . . . . . . 9 ((๐ด โˆˆ Ring โˆง ๐‘ โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
3834, 35, 36, 37syl3anc 1368 . . . . . . . 8 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
39383adant3 1129 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
40 simp22 1204 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐‘ โˆˆ ๐‘)
41 simp23 1205 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐‘‘ โˆˆ ๐‘)
42 simp3l 1198 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐‘ โ‰  ๐‘‘)
43 simpl3r 1226 . . . . . . . . . 10 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))
44 eqid 2724 . . . . . . . . . . . 12 ๐‘ = ๐‘
45 oveq1 7408 . . . . . . . . . . . . 13 ((๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’) โ†’ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)) = ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))
4645ralimi 3075 . . . . . . . . . . . 12 (โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’) โ†’ โˆ€๐‘’ โˆˆ ๐‘ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)) = ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))
47 mpteq12 5230 . . . . . . . . . . . 12 ((๐‘ = ๐‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)) = ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž))) โ†’ (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž))) = (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž))))
4844, 46, 47sylancr 586 . . . . . . . . . . 11 (โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’) โ†’ (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž))) = (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž))))
4948oveq2d 7417 . . . . . . . . . 10 (โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’) โ†’ (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
5043, 49syl 17 . . . . . . . . 9 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
51 simp1 1133 . . . . . . . . . . . . . . 15 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐‘… โˆˆ CRing)
52 eqid 2724 . . . . . . . . . . . . . . . . 17 (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ) = (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)
531, 52matmulr 22250 . . . . . . . . . . . . . . . 16 ((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ CRing) โ†’ (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ) = (.rโ€˜๐ด))
5453, 22eqtr4di 2782 . . . . . . . . . . . . . . 15 ((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ CRing) โ†’ (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ) = โˆ™ )
5510, 51, 54syl2anc 583 . . . . . . . . . . . . . 14 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ) = โˆ™ )
5655ad2antrr 723 . . . . . . . . . . . . 13 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ) = โˆ™ )
5756oveqd 7418 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) = (๐‘ โˆ™ ๐บ))
5857oveqd 7418 . . . . . . . . . . 11 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘(๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ)๐‘Ž) = (๐‘(๐‘ โˆ™ ๐บ)๐‘Ž))
59 simpll1 1209 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐‘… โˆˆ CRing)
6010ad2antrr 723 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐‘ โˆˆ Fin)
61 simplr1 1212 . . . . . . . . . . . . 13 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐‘ โˆˆ ๐ต)
621, 3, 2matbas2i 22234 . . . . . . . . . . . . 13 (๐‘ โˆˆ ๐ต โ†’ ๐‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
6361, 62syl 17 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
641, 3, 2matbas2i 22234 . . . . . . . . . . . . . 14 (๐บ โˆˆ ๐ต โ†’ ๐บ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
65643ad2ant3 1132 . . . . . . . . . . . . 13 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐บ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
6665ad2antrr 723 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐บ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
67 simplr2 1213 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐‘ โˆˆ ๐‘)
68 simpr 484 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐‘Ž โˆˆ ๐‘)
6952, 3, 7, 59, 60, 60, 60, 63, 66, 67, 68mamufv 22199 . . . . . . . . . . 11 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘(๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ)๐‘Ž) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
7058, 69eqtr3d 2766 . . . . . . . . . 10 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘(๐‘ โˆ™ ๐บ)๐‘Ž) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
71703adantl3 1165 . . . . . . . . 9 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘(๐‘ โˆ™ ๐บ)๐‘Ž) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
7257oveqd 7418 . . . . . . . . . . 11 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘‘(๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ)๐‘Ž) = (๐‘‘(๐‘ โˆ™ ๐บ)๐‘Ž))
73 simplr3 1214 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐‘‘ โˆˆ ๐‘)
7452, 3, 7, 59, 60, 60, 60, 63, 66, 73, 68mamufv 22199 . . . . . . . . . . 11 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘‘(๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ)๐‘Ž) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
7572, 74eqtr3d 2766 . . . . . . . . . 10 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘‘(๐‘ โˆ™ ๐บ)๐‘Ž) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
76753adantl3 1165 . . . . . . . . 9 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘‘(๐‘ โˆ™ ๐บ)๐‘Ž) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
7750, 71, 763eqtr4d 2774 . . . . . . . 8 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘(๐‘ โˆ™ ๐บ)๐‘Ž) = (๐‘‘(๐‘ โˆ™ ๐บ)๐‘Ž))
7877ralrimiva 3138 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ โˆ€๐‘Ž โˆˆ ๐‘ (๐‘(๐‘ โˆ™ ๐บ)๐‘Ž) = (๐‘‘(๐‘ โˆ™ ๐บ)๐‘Ž))
7913, 1, 2, 4, 33, 39, 40, 41, 42, 78mdetralt 22420 . . . . . 6 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ (๐ทโ€˜(๐‘ โˆ™ ๐บ)) = (0gโ€˜๐‘…))
8032, 79eqtrd 2764 . . . . 5 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (0gโ€˜๐‘…))
81803expia 1118 . . . 4 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โ†’ ((๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’)) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (0gโ€˜๐‘…)))
8281ralrimivvva 3195 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ โˆ€๐‘ โˆˆ ๐ต โˆ€๐‘ โˆˆ ๐‘ โˆ€๐‘‘ โˆˆ ๐‘ ((๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’)) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (0gโ€˜๐‘…)))
83 simp11 1200 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘… โˆˆ CRing)
8418adantr 480 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐ด โˆˆ Ring)
85 simprll 776 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ๐ต)
86 simpl3 1190 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐บ โˆˆ ๐ต)
8784, 85, 86, 37syl3anc 1368 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
88873adant3 1129 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
89 simprlr 777 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ๐ต)
902, 22ringcl 20140 . . . . . . . . . . 11 ((๐ด โˆˆ Ring โˆง ๐‘ โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
9184, 89, 86, 90syl3anc 1368 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
92913adant3 1129 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
93 simprrl 778 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘‘ โˆˆ ๐ต)
942, 22ringcl 20140 . . . . . . . . . . 11 ((๐ด โˆˆ Ring โˆง ๐‘‘ โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐‘‘ โˆ™ ๐บ) โˆˆ ๐ต)
9584, 93, 86, 94syl3anc 1368 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘‘ โˆ™ ๐บ) โˆˆ ๐ต)
96953adant3 1129 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘‘ โˆ™ ๐บ) โˆˆ ๐ต)
97 simp2rr 1240 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘’ โˆˆ ๐‘)
98 simp31 1206 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))))
9998oveq1d 7416 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) = (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘)))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
10012adantr 480 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘… โˆˆ Ring)
101 eqid 2724 . . . . . . . . . . . . 13 (๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ) = (๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)
102 snfi 9039 . . . . . . . . . . . . . 14 {๐‘’} โˆˆ Fin
103102a1i 11 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ {๐‘’} โˆˆ Fin)
10410adantr 480 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ Fin)
1051, 3, 2matbas2i 22234 . . . . . . . . . . . . . . 15 (๐‘ โˆˆ ๐ต โ†’ ๐‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
10689, 105syl 17 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
107 simprrr 779 . . . . . . . . . . . . . . . 16 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘’ โˆˆ ๐‘)
108107snssd 4804 . . . . . . . . . . . . . . 15 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ {๐‘’} โІ ๐‘)
109 xpss1 5685 . . . . . . . . . . . . . . 15 ({๐‘’} โІ ๐‘ โ†’ ({๐‘’} ร— ๐‘) โІ (๐‘ ร— ๐‘))
110108, 109syl 17 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ({๐‘’} ร— ๐‘) โІ (๐‘ ร— ๐‘))
111 elmapssres 8856 . . . . . . . . . . . . . 14 ((๐‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)) โˆง ({๐‘’} ร— ๐‘) โІ (๐‘ ร— ๐‘)) โ†’ (๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆˆ ((Baseโ€˜๐‘…) โ†‘m ({๐‘’} ร— ๐‘)))
112106, 110, 111syl2anc 583 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆˆ ((Baseโ€˜๐‘…) โ†‘m ({๐‘’} ร— ๐‘)))
1131, 3, 2matbas2i 22234 . . . . . . . . . . . . . . 15 (๐‘‘ โˆˆ ๐ต โ†’ ๐‘‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
11493, 113syl 17 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
115 elmapssres 8856 . . . . . . . . . . . . . 14 ((๐‘‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)) โˆง ({๐‘’} ร— ๐‘) โІ (๐‘ ร— ๐‘)) โ†’ (๐‘‘ โ†พ ({๐‘’} ร— ๐‘)) โˆˆ ((Baseโ€˜๐‘…) โ†‘m ({๐‘’} ร— ๐‘)))
116114, 110, 115syl2anc 583 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘‘ โ†พ ({๐‘’} ร— ๐‘)) โˆˆ ((Baseโ€˜๐‘…) โ†‘m ({๐‘’} ร— ๐‘)))
11765adantr 480 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐บ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
1183, 100, 101, 103, 104, 104, 6, 112, 116, 117mamudi 22213 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘)))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) = (((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ)))
1191183adant3 1129 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘)))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) = (((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ)))
12099, 119eqtrd 2764 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) = (((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ)))
12155adantr 480 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ) = โˆ™ )
122121oveqd 7418 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) = (๐‘ โˆ™ ๐บ))
123122reseq1d 5970 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)))
124 simpl1 1188 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘… โˆˆ CRing)
12585, 62syl 17 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
12652, 101, 3, 124, 104, 104, 104, 108, 125, 117mamures 22202 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
127123, 126eqtr3d 2766 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
1281273adant3 1129 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
129121oveqd 7418 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) = (๐‘ โˆ™ ๐บ))
130129reseq1d 5970 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)))
13152, 101, 3, 124, 104, 104, 104, 108, 106, 117mamures 22202 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
132130, 131eqtr3d 2766 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
133121oveqd 7418 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) = (๐‘‘ โˆ™ ๐บ))
134133reseq1d 5970 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)))
13552, 101, 3, 124, 104, 104, 104, 108, 114, 117mamures 22202 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
136134, 135eqtr3d 2766 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
137132, 136oveq12d 7419 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘))) = (((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ)))
1381373adant3 1129 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘))) = (((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ)))
139120, 128, 1383eqtr4d 2774 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = (((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘))))
140 simp32 1207 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
141140oveq1d 7416 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
142122reseq1d 5970 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
143 eqid 2724 . . . . . . . . . . . . 13 (๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ) = (๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)
144 difssd 4124 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ โˆ– {๐‘’}) โІ ๐‘)
14552, 143, 3, 124, 104, 104, 104, 144, 125, 117mamures 22202 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
146142, 145eqtr3d 2766 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
1471463adant3 1129 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
148129reseq1d 5970 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
14952, 143, 3, 124, 104, 104, 104, 144, 106, 117mamures 22202 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
150148, 149eqtr3d 2766 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
1511503adant3 1129 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
152141, 147, 1513eqtr4d 2774 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
153 simp33 1208 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
154153oveq1d 7416 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
155133reseq1d 5970 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
15652, 143, 3, 124, 104, 104, 104, 144, 114, 117mamures 22202 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
157155, 156eqtr3d 2766 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
1581573adant3 1129 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
159154, 147, 1583eqtr4d 2774 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
16013, 1, 2, 6, 83, 88, 92, 96, 97, 139, 152, 159mdetrlin 22414 . . . . . . . 8 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐ทโ€˜(๐‘ โˆ™ ๐บ)) = ((๐ทโ€˜(๐‘ โˆ™ ๐บ))(+gโ€˜๐‘…)(๐ทโ€˜(๐‘‘ โˆ™ ๐บ))))
16185, 31syl 17 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
1621613adant3 1129 . . . . . . . 8 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
163 fvoveq1 7424 . . . . . . . . . . . 12 (๐‘Ž = ๐‘ โ†’ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
164 fvex 6894 . . . . . . . . . . . 12 (๐ทโ€˜(๐‘ โˆ™ ๐บ)) โˆˆ V
165163, 29, 164fvmpt 6988 . . . . . . . . . . 11 (๐‘ โˆˆ ๐ต โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
16689, 165syl 17 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
167 fvoveq1 7424 . . . . . . . . . . . 12 (๐‘Ž = ๐‘‘ โ†’ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)) = (๐ทโ€˜(๐‘‘ โˆ™ ๐บ)))
168 fvex 6894 . . . . . . . . . . . 12 (๐ทโ€˜(๐‘‘ โˆ™ ๐บ)) โˆˆ V
169167, 29, 168fvmpt 6988 . . . . . . . . . . 11 (๐‘‘ โˆˆ ๐ต โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘) = (๐ทโ€˜(๐‘‘ โˆ™ ๐บ)))
17093, 169syl 17 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘) = (๐ทโ€˜(๐‘‘ โˆ™ ๐บ)))
171166, 170oveq12d 7419 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘)(+gโ€˜๐‘…)((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘)) = ((๐ทโ€˜(๐‘ โˆ™ ๐บ))(+gโ€˜๐‘…)(๐ทโ€˜(๐‘‘ โˆ™ ๐บ))))
1721713adant3 1129 . . . . . . . 8 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘)(+gโ€˜๐‘…)((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘)) = ((๐ทโ€˜(๐‘ โˆ™ ๐บ))(+gโ€˜๐‘…)(๐ทโ€˜(๐‘‘ โˆ™ ๐บ))))
173160, 162, 1723eqtr4d 2774 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘)(+gโ€˜๐‘…)((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘)))
1741733expia 1118 . . . . . 6 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘)(+gโ€˜๐‘…)((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
175174anassrs 467 . . . . 5 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘)(+gโ€˜๐‘…)((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
176175ralrimivva 3192 . . . 4 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต)) โ†’ โˆ€๐‘‘ โˆˆ ๐ต โˆ€๐‘’ โˆˆ ๐‘ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘)(+gโ€˜๐‘…)((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
177176ralrimivva 3192 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ โˆ€๐‘ โˆˆ ๐ต โˆ€๐‘ โˆˆ ๐ต โˆ€๐‘‘ โˆˆ ๐ต โˆ€๐‘’ โˆˆ ๐‘ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘)(+gโ€˜๐‘…)((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
178 simp11 1200 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘… โˆˆ CRing)
17918adantr 480 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐ด โˆˆ Ring)
180 simprll 776 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ๐ต)
181 simpl3 1190 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐บ โˆˆ ๐ต)
182179, 180, 181, 37syl3anc 1368 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
1831823adant3 1129 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
184 simp2lr 1238 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘ โˆˆ (Baseโ€˜๐‘…))
185 simprrl 778 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘‘ โˆˆ ๐ต)
186179, 185, 181, 94syl3anc 1368 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘‘ โˆ™ ๐บ) โˆˆ ๐ต)
1871863adant3 1129 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘‘ โˆ™ ๐บ) โˆˆ ๐ต)
188 simp2rr 1240 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘’ โˆˆ ๐‘)
189 simp3l 1198 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))))
190189oveq1d 7416 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) = (((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘)))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
19155adantr 480 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ) = โˆ™ )
192191oveqd 7418 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) = (๐‘ โˆ™ ๐บ))
193192reseq1d 5970 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)))
194 simpl1 1188 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘… โˆˆ CRing)
19510adantr 480 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ Fin)
196 simprrr 779 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘’ โˆˆ ๐‘)
197196snssd 4804 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ {๐‘’} โІ ๐‘)
198180, 62syl 17 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
19965adantr 480 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐บ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
20052, 101, 3, 194, 195, 195, 195, 197, 198, 199mamures 22202 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
201193, 200eqtr3d 2766 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
2022013adant3 1129 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
203191oveqd 7418 . . . . . . . . . . . . . . 15 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) = (๐‘‘ โˆ™ ๐บ))
204203reseq1d 5970 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)))
205185, 113syl 17 . . . . . . . . . . . . . . 15 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
20652, 101, 3, 194, 195, 195, 195, 197, 205, 199mamures 22202 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
207204, 206eqtr3d 2766 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
208207oveq2d 7417 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘))) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท ((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ)))
20912adantr 480 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘… โˆˆ Ring)
210102a1i 11 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ {๐‘’} โˆˆ Fin)
211 simprlr 777 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ (Baseโ€˜๐‘…))
212197, 109syl 17 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ({๐‘’} ร— ๐‘) โІ (๐‘ ร— ๐‘))
213205, 212, 115syl2anc 583 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘‘ โ†พ ({๐‘’} ร— ๐‘)) โˆˆ ((Baseโ€˜๐‘…) โ†‘m ({๐‘’} ร— ๐‘)))
2143, 209, 101, 210, 195, 195, 7, 211, 213, 199mamuvs1 22215 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘)))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท ((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ)))
215208, 214eqtr4d 2767 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘))) = (((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘)))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
2162153adant3 1129 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘))) = (((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘)))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
217190, 202, 2163eqtr4d 2774 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘))))
218 simp3r 1199 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
219218oveq1d 7416 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
220192reseq1d 5970 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
221 difssd 4124 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ โˆ– {๐‘’}) โІ ๐‘)
22252, 143, 3, 194, 195, 195, 195, 221, 198, 199mamures 22202 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
223220, 222eqtr3d 2766 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
2242233adant3 1129 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
225203reseq1d 5970 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
22652, 143, 3, 194, 195, 195, 195, 221, 205, 199mamures 22202 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
227225, 226eqtr3d 2766 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
2282273adant3 1129 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
229219, 224, 2283eqtr4d 2774 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
23013, 1, 2, 3, 7, 178, 183, 184, 187, 188, 217, 229mdetrsca 22415 . . . . . . . 8 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐ทโ€˜(๐‘ โˆ™ ๐บ)) = (๐‘ ยท (๐ทโ€˜(๐‘‘ โˆ™ ๐บ))))
231 simp2ll 1237 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘ โˆˆ ๐ต)
232231, 31syl 17 . . . . . . . 8 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
233 simp2rl 1239 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘‘ โˆˆ ๐ต)
234169oveq2d 7417 . . . . . . . . 9 (๐‘‘ โˆˆ ๐ต โ†’ (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘)) = (๐‘ ยท (๐ทโ€˜(๐‘‘ โˆ™ ๐บ))))
235233, 234syl 17 . . . . . . . 8 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘)) = (๐‘ ยท (๐ทโ€˜(๐‘‘ โˆ™ ๐บ))))
236230, 232, 2353eqtr4d 2774 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘)))
2372363expia 1118 . . . . . 6 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
238237anassrs 467 . . . . 5 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…))) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
239238ralrimivva 3192 . . . 4 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…))) โ†’ โˆ€๐‘‘ โˆˆ ๐ต โˆ€๐‘’ โˆˆ ๐‘ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
240239ralrimivva 3192 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ โˆ€๐‘ โˆˆ ๐ต โˆ€๐‘ โˆˆ (Baseโ€˜๐‘…)โˆ€๐‘‘ โˆˆ ๐ต โˆ€๐‘’ โˆˆ ๐‘ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
241 simp2 1134 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐น โˆˆ ๐ต)
2421, 2, 3, 4, 5, 6, 7, 10, 12, 26, 82, 177, 240, 13, 51, 241mdetuni0 22433 . 2 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐น) = (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜(1rโ€˜๐ด)) ยท (๐ทโ€˜๐น)))
243 fvoveq1 7424 . . . 4 (๐‘Ž = ๐น โ†’ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)) = (๐ทโ€˜(๐น โˆ™ ๐บ)))
244 fvex 6894 . . . 4 (๐ทโ€˜(๐น โˆ™ ๐บ)) โˆˆ V
245243, 29, 244fvmpt 6988 . . 3 (๐น โˆˆ ๐ต โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐น) = (๐ทโ€˜(๐น โˆ™ ๐บ)))
2462453ad2ant2 1131 . 2 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐น) = (๐ทโ€˜(๐น โˆ™ ๐บ)))
247 eqid 2724 . . . . . . 7 (1rโ€˜๐ด) = (1rโ€˜๐ด)
2482, 247ringidcl 20150 . . . . . 6 (๐ด โˆˆ Ring โ†’ (1rโ€˜๐ด) โˆˆ ๐ต)
249 fvoveq1 7424 . . . . . . 7 (๐‘Ž = (1rโ€˜๐ด) โ†’ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)) = (๐ทโ€˜((1rโ€˜๐ด) โˆ™ ๐บ)))
250 fvex 6894 . . . . . . 7 (๐ทโ€˜((1rโ€˜๐ด) โˆ™ ๐บ)) โˆˆ V
251249, 29, 250fvmpt 6988 . . . . . 6 ((1rโ€˜๐ด) โˆˆ ๐ต โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜(1rโ€˜๐ด)) = (๐ทโ€˜((1rโ€˜๐ด) โˆ™ ๐บ)))
25218, 248, 2513syl 18 . . . . 5 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜(1rโ€˜๐ด)) = (๐ทโ€˜((1rโ€˜๐ด) โˆ™ ๐บ)))
253 simp3 1135 . . . . . . 7 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐บ โˆˆ ๐ต)
2542, 22, 247ringlidm 20153 . . . . . . 7 ((๐ด โˆˆ Ring โˆง ๐บ โˆˆ ๐ต) โ†’ ((1rโ€˜๐ด) โˆ™ ๐บ) = ๐บ)
25518, 253, 254syl2anc 583 . . . . . 6 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ((1rโ€˜๐ด) โˆ™ ๐บ) = ๐บ)
256255fveq2d 6885 . . . . 5 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐ทโ€˜((1rโ€˜๐ด) โˆ™ ๐บ)) = (๐ทโ€˜๐บ))
257252, 256eqtrd 2764 . . . 4 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜(1rโ€˜๐ด)) = (๐ทโ€˜๐บ))
258257oveq1d 7416 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜(1rโ€˜๐ด)) ยท (๐ทโ€˜๐น)) = ((๐ทโ€˜๐บ) ยท (๐ทโ€˜๐น)))
25915, 253ffvelcdmd 7077 . . . 4 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐ทโ€˜๐บ) โˆˆ (Baseโ€˜๐‘…))
26015, 241ffvelcdmd 7077 . . . 4 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐ทโ€˜๐น) โˆˆ (Baseโ€˜๐‘…))
2613, 7crngcom 20141 . . . 4 ((๐‘… โˆˆ CRing โˆง (๐ทโ€˜๐บ) โˆˆ (Baseโ€˜๐‘…) โˆง (๐ทโ€˜๐น) โˆˆ (Baseโ€˜๐‘…)) โ†’ ((๐ทโ€˜๐บ) ยท (๐ทโ€˜๐น)) = ((๐ทโ€˜๐น) ยท (๐ทโ€˜๐บ)))
26251, 259, 260, 261syl3anc 1368 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ((๐ทโ€˜๐บ) ยท (๐ทโ€˜๐น)) = ((๐ทโ€˜๐น) ยท (๐ทโ€˜๐บ)))
263258, 262eqtrd 2764 . 2 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜(1rโ€˜๐ด)) ยท (๐ทโ€˜๐น)) = ((๐ทโ€˜๐น) ยท (๐ทโ€˜๐บ)))
264242, 246, 2633eqtr3d 2772 1 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐ทโ€˜(๐น โˆ™ ๐บ)) = ((๐ทโ€˜๐น) ยท (๐ทโ€˜๐บ)))
Colors of variables: wff setvar class
Syntax hints:   โ†’ wi 4   โˆง wa 395   โˆง w3a 1084   = wceq 1533   โˆˆ wcel 2098   โ‰  wne 2932  โˆ€wral 3053  Vcvv 3466   โˆ– cdif 3937   โІ wss 3940  {csn 4620  โŸจcotp 4628   โ†ฆ cmpt 5221   ร— cxp 5664   โ†พ cres 5668  โŸถwf 6529  โ€˜cfv 6533  (class class class)co 7401   โˆ˜f cof 7661   โ†‘m cmap 8815  Fincfn 8934  Basecbs 17140  +gcplusg 17193  .rcmulr 17194  0gc0g 17381   ฮฃg cgsu 17382  1rcur 20071  Ringcrg 20123  CRingccrg 20124   maMul cmmul 22195   Mat cmat 22217   maDet cmdat 22396
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5275  ax-sep 5289  ax-nul 5296  ax-pow 5353  ax-pr 5417  ax-un 7718  ax-cnex 11161  ax-resscn 11162  ax-1cn 11163  ax-icn 11164  ax-addcl 11165  ax-addrcl 11166  ax-mulcl 11167  ax-mulrcl 11168  ax-mulcom 11169  ax-addass 11170  ax-mulass 11171  ax-distr 11172  ax-i2m1 11173  ax-1ne0 11174  ax-1rid 11175  ax-rnegex 11176  ax-rrecex 11177  ax-cnre 11178  ax-pre-lttri 11179  ax-pre-lttrn 11180  ax-pre-ltadd 11181  ax-pre-mulgt0 11182  ax-addf 11184  ax-mulf 11185
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-xor 1505  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3770  df-csb 3886  df-dif 3943  df-un 3945  df-in 3947  df-ss 3957  df-pss 3959  df-nul 4315  df-if 4521  df-pw 4596  df-sn 4621  df-pr 4623  df-tp 4625  df-op 4627  df-ot 4629  df-uni 4900  df-int 4941  df-iun 4989  df-iin 4990  df-br 5139  df-opab 5201  df-mpt 5222  df-tr 5256  df-id 5564  df-eprel 5570  df-po 5578  df-so 5579  df-fr 5621  df-se 5622  df-we 5623  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6290  df-ord 6357  df-on 6358  df-lim 6359  df-suc 6360  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-isom 6542  df-riota 7357  df-ov 7404  df-oprab 7405  df-mpo 7406  df-of 7663  df-om 7849  df-1st 7968  df-2nd 7969  df-supp 8141  df-tpos 8206  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-1o 8461  df-2o 8462  df-er 8698  df-map 8817  df-pm 8818  df-ixp 8887  df-en 8935  df-dom 8936  df-sdom 8937  df-fin 8938  df-fsupp 9357  df-sup 9432  df-oi 9500  df-card 9929  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-div 11868  df-nn 12209  df-2 12271  df-3 12272  df-4 12273  df-5 12274  df-6 12275  df-7 12276  df-8 12277  df-9 12278  df-n0 12469  df-xnn0 12541  df-z 12555  df-dec 12674  df-uz 12819  df-rp 12971  df-fz 13481  df-fzo 13624  df-seq 13963  df-exp 14024  df-hash 14287  df-word 14461  df-lsw 14509  df-concat 14517  df-s1 14542  df-substr 14587  df-pfx 14617  df-splice 14696  df-reverse 14705  df-s2 14795  df-struct 17076  df-sets 17093  df-slot 17111  df-ndx 17123  df-base 17141  df-ress 17170  df-plusg 17206  df-mulr 17207  df-starv 17208  df-sca 17209  df-vsca 17210  df-ip 17211  df-tset 17212  df-ple 17213  df-ds 17215  df-unif 17216  df-hom 17217  df-cco 17218  df-0g 17383  df-gsum 17384  df-prds 17389  df-pws 17391  df-mre 17526  df-mrc 17527  df-acs 17529  df-mgm 18560  df-sgrp 18639  df-mnd 18655  df-mhm 18700  df-submnd 18701  df-efmnd 18781  df-grp 18853  df-minusg 18854  df-sbg 18855  df-mulg 18983  df-subg 19035  df-ghm 19124  df-gim 19169  df-cntz 19218  df-oppg 19247  df-symg 19272  df-pmtr 19347  df-psgn 19396  df-evpm 19397  df-cmn 19687  df-abl 19688  df-mgp 20025  df-rng 20043  df-ur 20072  df-srg 20077  df-ring 20125  df-cring 20126  df-oppr 20221  df-dvdsr 20244  df-unit 20245  df-invr 20275  df-dvr 20288  df-rhm 20359  df-subrng 20431  df-subrg 20456  df-drng 20574  df-lmod 20693  df-lss 20764  df-sra 21006  df-rgmod 21007  df-cnfld 21224  df-zring 21297  df-zrh 21353  df-dsmm 21587  df-frlm 21602  df-mamu 22196  df-mat 22218  df-mdet 22397
This theorem is referenced by:  matunit  22490  cramerimplem3  22497  matunitlindflem2  36941
  Copyright terms: Public domain W3C validator