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

Theorem mdetmul 22107
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 2733 . . 3 (Baseโ€˜๐‘…) = (Baseโ€˜๐‘…)
4 eqid 2733 . . 3 (0gโ€˜๐‘…) = (0gโ€˜๐‘…)
5 eqid 2733 . . 3 (1rโ€˜๐‘…) = (1rโ€˜๐‘…)
6 eqid 2733 . . 3 (+gโ€˜๐‘…) = (+gโ€˜๐‘…)
7 mdetmul.t1 . . 3 ยท = (.rโ€˜๐‘…)
81, 2matrcl 21894 . . . . 5 (๐น โˆˆ ๐ต โ†’ (๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ V))
98simpld 496 . . . 4 (๐น โˆˆ ๐ต โ†’ ๐‘ โˆˆ Fin)
1093ad2ant2 1135 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐‘ โˆˆ Fin)
11 crngring 20059 . . . 4 (๐‘… โˆˆ CRing โ†’ ๐‘… โˆˆ Ring)
12113ad2ant1 1134 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐‘… โˆˆ Ring)
13 mdetmul.d . . . . . . . 8 ๐ท = (๐‘ maDet ๐‘…)
1413, 1, 2, 3mdetf 22079 . . . . . . 7 (๐‘… โˆˆ CRing โ†’ ๐ท:๐ตโŸถ(Baseโ€˜๐‘…))
15143ad2ant1 1134 . . . . . 6 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐ท:๐ตโŸถ(Baseโ€˜๐‘…))
1615adantr 482 . . . . 5 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ๐‘Ž โˆˆ ๐ต) โ†’ ๐ท:๐ตโŸถ(Baseโ€˜๐‘…))
171matring 21927 . . . . . . . 8 ((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ Ring) โ†’ ๐ด โˆˆ Ring)
1810, 12, 17syl2anc 585 . . . . . . 7 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐ด โˆˆ Ring)
1918adantr 482 . . . . . 6 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ๐‘Ž โˆˆ ๐ต) โ†’ ๐ด โˆˆ Ring)
20 simpr 486 . . . . . 6 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ๐‘Ž โˆˆ ๐ต) โ†’ ๐‘Ž โˆˆ ๐ต)
21 simpl3 1194 . . . . . 6 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ๐‘Ž โˆˆ ๐ต) โ†’ ๐บ โˆˆ ๐ต)
22 mdetmul.t2 . . . . . . 7 โˆ™ = (.rโ€˜๐ด)
232, 22ringcl 20064 . . . . . 6 ((๐ด โˆˆ Ring โˆง ๐‘Ž โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐‘Ž โˆ™ ๐บ) โˆˆ ๐ต)
2419, 20, 21, 23syl3anc 1372 . . . . 5 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ๐‘Ž โˆˆ ๐ต) โ†’ (๐‘Ž โˆ™ ๐บ) โˆˆ ๐ต)
2516, 24ffvelcdmd 7083 . . . 4 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ๐‘Ž โˆˆ ๐ต) โ†’ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)) โˆˆ (Baseโ€˜๐‘…))
2625fmpttd 7110 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ))):๐ตโŸถ(Baseโ€˜๐‘…))
27 simp21 1207 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐‘ โˆˆ ๐ต)
28 fvoveq1 7427 . . . . . . . 8 (๐‘Ž = ๐‘ โ†’ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
29 eqid 2733 . . . . . . . 8 (๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ))) = (๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))
30 fvex 6901 . . . . . . . 8 (๐ทโ€˜(๐‘ โˆ™ ๐บ)) โˆˆ V
3128, 29, 30fvmpt 6994 . . . . . . 7 (๐‘ โˆˆ ๐ต โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
3227, 31syl 17 . . . . . 6 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
33 simp11 1204 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐‘… โˆˆ CRing)
3418adantr 482 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โ†’ ๐ด โˆˆ Ring)
35 simpr1 1195 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โ†’ ๐‘ โˆˆ ๐ต)
36 simpl3 1194 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โ†’ ๐บ โˆˆ ๐ต)
372, 22ringcl 20064 . . . . . . . . 9 ((๐ด โˆˆ Ring โˆง ๐‘ โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
3834, 35, 36, 37syl3anc 1372 . . . . . . . 8 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
39383adant3 1133 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
40 simp22 1208 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐‘ โˆˆ ๐‘)
41 simp23 1209 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐‘‘ โˆˆ ๐‘)
42 simp3l 1202 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐‘ โ‰  ๐‘‘)
43 simpl3r 1230 . . . . . . . . . 10 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))
44 eqid 2733 . . . . . . . . . . . 12 ๐‘ = ๐‘
45 oveq1 7411 . . . . . . . . . . . . 13 ((๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’) โ†’ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)) = ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))
4645ralimi 3084 . . . . . . . . . . . 12 (โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’) โ†’ โˆ€๐‘’ โˆˆ ๐‘ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)) = ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))
47 mpteq12 5239 . . . . . . . . . . . 12 ((๐‘ = ๐‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)) = ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž))) โ†’ (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž))) = (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž))))
4844, 46, 47sylancr 588 . . . . . . . . . . 11 (โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’) โ†’ (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž))) = (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž))))
4948oveq2d 7420 . . . . . . . . . 10 (โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’) โ†’ (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
5043, 49syl 17 . . . . . . . . 9 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
51 simp1 1137 . . . . . . . . . . . . . . 15 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐‘… โˆˆ CRing)
52 eqid 2733 . . . . . . . . . . . . . . . . 17 (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ) = (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)
531, 52matmulr 21922 . . . . . . . . . . . . . . . 16 ((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ CRing) โ†’ (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ) = (.rโ€˜๐ด))
5453, 22eqtr4di 2791 . . . . . . . . . . . . . . 15 ((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ CRing) โ†’ (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ) = โˆ™ )
5510, 51, 54syl2anc 585 . . . . . . . . . . . . . 14 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ) = โˆ™ )
5655ad2antrr 725 . . . . . . . . . . . . 13 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ) = โˆ™ )
5756oveqd 7421 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) = (๐‘ โˆ™ ๐บ))
5857oveqd 7421 . . . . . . . . . . 11 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘(๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ)๐‘Ž) = (๐‘(๐‘ โˆ™ ๐บ)๐‘Ž))
59 simpll1 1213 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐‘… โˆˆ CRing)
6010ad2antrr 725 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐‘ โˆˆ Fin)
61 simplr1 1216 . . . . . . . . . . . . 13 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐‘ โˆˆ ๐ต)
621, 3, 2matbas2i 21906 . . . . . . . . . . . . 13 (๐‘ โˆˆ ๐ต โ†’ ๐‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
6361, 62syl 17 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
641, 3, 2matbas2i 21906 . . . . . . . . . . . . . 14 (๐บ โˆˆ ๐ต โ†’ ๐บ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
65643ad2ant3 1136 . . . . . . . . . . . . 13 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐บ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
6665ad2antrr 725 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐บ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
67 simplr2 1217 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐‘ โˆˆ ๐‘)
68 simpr 486 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐‘Ž โˆˆ ๐‘)
6952, 3, 7, 59, 60, 60, 60, 63, 66, 67, 68mamufv 21871 . . . . . . . . . . 11 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘(๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ)๐‘Ž) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
7058, 69eqtr3d 2775 . . . . . . . . . 10 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘(๐‘ โˆ™ ๐บ)๐‘Ž) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
71703adantl3 1169 . . . . . . . . 9 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘(๐‘ โˆ™ ๐บ)๐‘Ž) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
7257oveqd 7421 . . . . . . . . . . 11 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘‘(๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ)๐‘Ž) = (๐‘‘(๐‘ โˆ™ ๐บ)๐‘Ž))
73 simplr3 1218 . . . . . . . . . . . 12 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ ๐‘‘ โˆˆ ๐‘)
7452, 3, 7, 59, 60, 60, 60, 63, 66, 73, 68mamufv 21871 . . . . . . . . . . 11 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘‘(๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ)๐‘Ž) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
7572, 74eqtr3d 2775 . . . . . . . . . 10 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘‘(๐‘ โˆ™ ๐บ)๐‘Ž) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
76753adantl3 1169 . . . . . . . . 9 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘‘(๐‘ โˆ™ ๐บ)๐‘Ž) = (๐‘… ฮฃg (๐‘’ โˆˆ ๐‘ โ†ฆ ((๐‘‘๐‘๐‘’) ยท (๐‘’๐บ๐‘Ž)))))
7750, 71, 763eqtr4d 2783 . . . . . . . 8 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โˆง ๐‘Ž โˆˆ ๐‘) โ†’ (๐‘(๐‘ โˆ™ ๐บ)๐‘Ž) = (๐‘‘(๐‘ โˆ™ ๐บ)๐‘Ž))
7877ralrimiva 3147 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ โˆ€๐‘Ž โˆˆ ๐‘ (๐‘(๐‘ โˆ™ ๐บ)๐‘Ž) = (๐‘‘(๐‘ โˆ™ ๐บ)๐‘Ž))
7913, 1, 2, 4, 33, 39, 40, 41, 42, 78mdetralt 22092 . . . . . 6 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ (๐ทโ€˜(๐‘ โˆ™ ๐บ)) = (0gโ€˜๐‘…))
8032, 79eqtrd 2773 . . . . 5 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (0gโ€˜๐‘…))
81803expia 1122 . . . 4 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โ†’ ((๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’)) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (0gโ€˜๐‘…)))
8281ralrimivvva 3204 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ โˆ€๐‘ โˆˆ ๐ต โˆ€๐‘ โˆˆ ๐‘ โˆ€๐‘‘ โˆˆ ๐‘ ((๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’)) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (0gโ€˜๐‘…)))
83 simp11 1204 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘… โˆˆ CRing)
8418adantr 482 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐ด โˆˆ Ring)
85 simprll 778 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ๐ต)
86 simpl3 1194 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐บ โˆˆ ๐ต)
8784, 85, 86, 37syl3anc 1372 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
88873adant3 1133 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
89 simprlr 779 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ๐ต)
902, 22ringcl 20064 . . . . . . . . . . 11 ((๐ด โˆˆ Ring โˆง ๐‘ โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
9184, 89, 86, 90syl3anc 1372 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
92913adant3 1133 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
93 simprrl 780 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘‘ โˆˆ ๐ต)
942, 22ringcl 20064 . . . . . . . . . . 11 ((๐ด โˆˆ Ring โˆง ๐‘‘ โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐‘‘ โˆ™ ๐บ) โˆˆ ๐ต)
9584, 93, 86, 94syl3anc 1372 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘‘ โˆ™ ๐บ) โˆˆ ๐ต)
96953adant3 1133 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘‘ โˆ™ ๐บ) โˆˆ ๐ต)
97 simp2rr 1244 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘’ โˆˆ ๐‘)
98 simp31 1210 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))))
9998oveq1d 7419 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) = (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘)))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
10012adantr 482 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘… โˆˆ Ring)
101 eqid 2733 . . . . . . . . . . . . 13 (๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ) = (๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)
102 snfi 9040 . . . . . . . . . . . . . 14 {๐‘’} โˆˆ Fin
103102a1i 11 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ {๐‘’} โˆˆ Fin)
10410adantr 482 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ Fin)
1051, 3, 2matbas2i 21906 . . . . . . . . . . . . . . 15 (๐‘ โˆˆ ๐ต โ†’ ๐‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
10689, 105syl 17 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
107 simprrr 781 . . . . . . . . . . . . . . . 16 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘’ โˆˆ ๐‘)
108107snssd 4811 . . . . . . . . . . . . . . 15 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ {๐‘’} โŠ† ๐‘)
109 xpss1 5694 . . . . . . . . . . . . . . 15 ({๐‘’} โŠ† ๐‘ โ†’ ({๐‘’} ร— ๐‘) โŠ† (๐‘ ร— ๐‘))
110108, 109syl 17 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ({๐‘’} ร— ๐‘) โŠ† (๐‘ ร— ๐‘))
111 elmapssres 8857 . . . . . . . . . . . . . 14 ((๐‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)) โˆง ({๐‘’} ร— ๐‘) โŠ† (๐‘ ร— ๐‘)) โ†’ (๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆˆ ((Baseโ€˜๐‘…) โ†‘m ({๐‘’} ร— ๐‘)))
112106, 110, 111syl2anc 585 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆˆ ((Baseโ€˜๐‘…) โ†‘m ({๐‘’} ร— ๐‘)))
1131, 3, 2matbas2i 21906 . . . . . . . . . . . . . . 15 (๐‘‘ โˆˆ ๐ต โ†’ ๐‘‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
11493, 113syl 17 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
115 elmapssres 8857 . . . . . . . . . . . . . 14 ((๐‘‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)) โˆง ({๐‘’} ร— ๐‘) โŠ† (๐‘ ร— ๐‘)) โ†’ (๐‘‘ โ†พ ({๐‘’} ร— ๐‘)) โˆˆ ((Baseโ€˜๐‘…) โ†‘m ({๐‘’} ร— ๐‘)))
116114, 110, 115syl2anc 585 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘‘ โ†พ ({๐‘’} ร— ๐‘)) โˆˆ ((Baseโ€˜๐‘…) โ†‘m ({๐‘’} ร— ๐‘)))
11765adantr 482 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐บ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
1183, 100, 101, 103, 104, 104, 6, 112, 116, 117mamudi 21885 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘)))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) = (((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ)))
1191183adant3 1133 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘)))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) = (((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ)))
12099, 119eqtrd 2773 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) = (((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ)))
12155adantr 482 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ) = โˆ™ )
122121oveqd 7421 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) = (๐‘ โˆ™ ๐บ))
123122reseq1d 5978 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)))
124 simpl1 1192 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘… โˆˆ CRing)
12585, 62syl 17 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
12652, 101, 3, 124, 104, 104, 104, 108, 125, 117mamures 21874 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
127123, 126eqtr3d 2775 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
1281273adant3 1133 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
129121oveqd 7421 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) = (๐‘ โˆ™ ๐บ))
130129reseq1d 5978 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)))
13152, 101, 3, 124, 104, 104, 104, 108, 106, 117mamures 21874 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
132130, 131eqtr3d 2775 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
133121oveqd 7421 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) = (๐‘‘ โˆ™ ๐บ))
134133reseq1d 5978 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)))
13552, 101, 3, 124, 104, 104, 104, 108, 114, 117mamures 21874 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
136134, 135eqtr3d 2775 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
137132, 136oveq12d 7422 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘))) = (((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ)))
1381373adant3 1133 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘))) = (((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ)))
139120, 128, 1383eqtr4d 2783 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = (((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘))))
140 simp32 1211 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
141140oveq1d 7419 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
142122reseq1d 5978 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
143 eqid 2733 . . . . . . . . . . . . 13 (๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ) = (๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)
144 difssd 4131 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ โˆ– {๐‘’}) โŠ† ๐‘)
14552, 143, 3, 124, 104, 104, 104, 144, 125, 117mamures 21874 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
146142, 145eqtr3d 2775 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
1471463adant3 1133 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
148129reseq1d 5978 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
14952, 143, 3, 124, 104, 104, 104, 144, 106, 117mamures 21874 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
150148, 149eqtr3d 2775 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
1511503adant3 1133 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
152141, 147, 1513eqtr4d 2783 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
153 simp33 1212 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
154153oveq1d 7419 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
155133reseq1d 5978 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
15652, 143, 3, 124, 104, 104, 104, 144, 114, 117mamures 21874 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
157155, 156eqtr3d 2775 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
1581573adant3 1133 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
159154, 147, 1583eqtr4d 2783 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
16013, 1, 2, 6, 83, 88, 92, 96, 97, 139, 152, 159mdetrlin 22086 . . . . . . . 8 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐ทโ€˜(๐‘ โˆ™ ๐บ)) = ((๐ทโ€˜(๐‘ โˆ™ ๐บ))(+gโ€˜๐‘…)(๐ทโ€˜(๐‘‘ โˆ™ ๐บ))))
16185, 31syl 17 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
1621613adant3 1133 . . . . . . . 8 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
163 fvoveq1 7427 . . . . . . . . . . . 12 (๐‘Ž = ๐‘ โ†’ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
164 fvex 6901 . . . . . . . . . . . 12 (๐ทโ€˜(๐‘ โˆ™ ๐บ)) โˆˆ V
165163, 29, 164fvmpt 6994 . . . . . . . . . . 11 (๐‘ โˆˆ ๐ต โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
16689, 165syl 17 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
167 fvoveq1 7427 . . . . . . . . . . . 12 (๐‘Ž = ๐‘‘ โ†’ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)) = (๐ทโ€˜(๐‘‘ โˆ™ ๐บ)))
168 fvex 6901 . . . . . . . . . . . 12 (๐ทโ€˜(๐‘‘ โˆ™ ๐บ)) โˆˆ V
169167, 29, 168fvmpt 6994 . . . . . . . . . . 11 (๐‘‘ โˆˆ ๐ต โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘) = (๐ทโ€˜(๐‘‘ โˆ™ ๐บ)))
17093, 169syl 17 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘) = (๐ทโ€˜(๐‘‘ โˆ™ ๐บ)))
171166, 170oveq12d 7422 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘)(+gโ€˜๐‘…)((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘)) = ((๐ทโ€˜(๐‘ โˆ™ ๐บ))(+gโ€˜๐‘…)(๐ทโ€˜(๐‘‘ โˆ™ ๐บ))))
1721713adant3 1133 . . . . . . . 8 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘)(+gโ€˜๐‘…)((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘)) = ((๐ทโ€˜(๐‘ โˆ™ ๐บ))(+gโ€˜๐‘…)(๐ทโ€˜(๐‘‘ โˆ™ ๐บ))))
173160, 162, 1723eqtr4d 2783 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘)(+gโ€˜๐‘…)((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘)))
1741733expia 1122 . . . . . 6 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘)(+gโ€˜๐‘…)((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
175174anassrs 469 . . . . 5 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘)(+gโ€˜๐‘…)((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
176175ralrimivva 3201 . . . 4 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต)) โ†’ โˆ€๐‘‘ โˆˆ ๐ต โˆ€๐‘’ โˆˆ ๐‘ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘)(+gโ€˜๐‘…)((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
177176ralrimivva 3201 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ โˆ€๐‘ โˆˆ ๐ต โˆ€๐‘ โˆˆ ๐ต โˆ€๐‘‘ โˆˆ ๐ต โˆ€๐‘’ โˆˆ ๐‘ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f (+gโ€˜๐‘…)(๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘)(+gโ€˜๐‘…)((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
178 simp11 1204 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘… โˆˆ CRing)
17918adantr 482 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐ด โˆˆ Ring)
180 simprll 778 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ๐ต)
181 simpl3 1194 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐บ โˆˆ ๐ต)
182179, 180, 181, 37syl3anc 1372 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
1831823adant3 1133 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โˆ™ ๐บ) โˆˆ ๐ต)
184 simp2lr 1242 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘ โˆˆ (Baseโ€˜๐‘…))
185 simprrl 780 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘‘ โˆˆ ๐ต)
186179, 185, 181, 94syl3anc 1372 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘‘ โˆ™ ๐บ) โˆˆ ๐ต)
1871863adant3 1133 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘‘ โˆ™ ๐บ) โˆˆ ๐ต)
188 simp2rr 1244 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘’ โˆˆ ๐‘)
189 simp3l 1202 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))))
190189oveq1d 7419 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) = (((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘)))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
19155adantr 482 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ) = โˆ™ )
192191oveqd 7421 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) = (๐‘ โˆ™ ๐บ))
193192reseq1d 5978 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)))
194 simpl1 1192 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘… โˆˆ CRing)
19510adantr 482 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ Fin)
196 simprrr 781 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘’ โˆˆ ๐‘)
197196snssd 4811 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ {๐‘’} โŠ† ๐‘)
198180, 62syl 17 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
19965adantr 482 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐บ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
20052, 101, 3, 194, 195, 195, 195, 197, 198, 199mamures 21874 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
201193, 200eqtr3d 2775 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
2022013adant3 1133 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
203191oveqd 7421 . . . . . . . . . . . . . . 15 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) = (๐‘‘ โˆ™ ๐บ))
204203reseq1d 5978 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)))
205185, 113syl 17 . . . . . . . . . . . . . . 15 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘‘ โˆˆ ((Baseโ€˜๐‘…) โ†‘m (๐‘ ร— ๐‘)))
20652, 101, 3, 194, 195, 195, 195, 197, 205, 199mamures 21874 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
207204, 206eqtr3d 2775 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
208207oveq2d 7420 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘))) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท ((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ)))
20912adantr 482 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘… โˆˆ Ring)
210102a1i 11 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ {๐‘’} โˆˆ Fin)
211 simprlr 779 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ (Baseโ€˜๐‘…))
212197, 109syl 17 . . . . . . . . . . . . . 14 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ({๐‘’} ร— ๐‘) โŠ† (๐‘ ร— ๐‘))
213205, 212, 115syl2anc 585 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘‘ โ†พ ({๐‘’} ร— ๐‘)) โˆˆ ((Baseโ€˜๐‘…) โ†‘m ({๐‘’} ร— ๐‘)))
2143, 209, 101, 210, 195, 195, 7, 211, 213, 199mamuvs1 21887 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘)))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท ((๐‘‘ โ†พ ({๐‘’} ร— ๐‘))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ)))
215208, 214eqtr4d 2776 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘))) = (((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘)))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
2162153adant3 1133 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘))) = (((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘)))(๐‘… maMul โŸจ{๐‘’}, ๐‘, ๐‘โŸฉ)๐บ))
217190, 202, 2163eqtr4d 2783 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท ((๐‘‘ โˆ™ ๐บ) โ†พ ({๐‘’} ร— ๐‘))))
218 simp3r 1203 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
219218oveq1d 7419 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
220192reseq1d 5978 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
221 difssd 4131 . . . . . . . . . . . . 13 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ โˆ– {๐‘’}) โŠ† ๐‘)
22252, 143, 3, 194, 195, 195, 195, 221, 198, 199mamures 21874 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
223220, 222eqtr3d 2775 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
2242233adant3 1133 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
225203reseq1d 5978 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
22652, 143, 3, 194, 195, 195, 195, 221, 205, 199mamures 21874 . . . . . . . . . . . 12 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘(๐‘… maMul โŸจ๐‘, ๐‘, ๐‘โŸฉ)๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
227225, 226eqtr3d 2775 . . . . . . . . . . 11 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
2282273adant3 1133 . . . . . . . . . 10 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))(๐‘… maMul โŸจ(๐‘ โˆ– {๐‘’}), ๐‘, ๐‘โŸฉ)๐บ))
229219, 224, 2283eqtr4d 2783 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = ((๐‘‘ โˆ™ ๐บ) โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
23013, 1, 2, 3, 7, 178, 183, 184, 187, 188, 217, 229mdetrsca 22087 . . . . . . . 8 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐ทโ€˜(๐‘ โˆ™ ๐บ)) = (๐‘ ยท (๐ทโ€˜(๐‘‘ โˆ™ ๐บ))))
231 simp2ll 1241 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘ โˆˆ ๐ต)
232231, 31syl 17 . . . . . . . 8 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐ทโ€˜(๐‘ โˆ™ ๐บ)))
233 simp2rl 1243 . . . . . . . . 9 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘‘ โˆˆ ๐ต)
234169oveq2d 7420 . . . . . . . . 9 (๐‘‘ โˆˆ ๐ต โ†’ (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘)) = (๐‘ ยท (๐ทโ€˜(๐‘‘ โˆ™ ๐บ))))
235233, 234syl 17 . . . . . . . 8 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘)) = (๐‘ ยท (๐ทโ€˜(๐‘‘ โˆ™ ๐บ))))
236230, 232, 2353eqtr4d 2783 . . . . . . 7 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘)))
2372363expia 1122 . . . . . 6 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
238237anassrs 469 . . . . 5 ((((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…))) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
239238ralrimivva 3201 . . . 4 (((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ (Baseโ€˜๐‘…))) โ†’ โˆ€๐‘‘ โˆˆ ๐ต โˆ€๐‘’ โˆˆ ๐‘ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
240239ralrimivva 3201 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ โˆ€๐‘ โˆˆ ๐ต โˆ€๐‘ โˆˆ (Baseโ€˜๐‘…)โˆ€๐‘‘ โˆˆ ๐ต โˆ€๐‘’ โˆˆ ๐‘ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘) = (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐‘‘))))
241 simp2 1138 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐น โˆˆ ๐ต)
2421, 2, 3, 4, 5, 6, 7, 10, 12, 26, 82, 177, 240, 13, 51, 241mdetuni0 22105 . 2 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐น) = (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜(1rโ€˜๐ด)) ยท (๐ทโ€˜๐น)))
243 fvoveq1 7427 . . . 4 (๐‘Ž = ๐น โ†’ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)) = (๐ทโ€˜(๐น โˆ™ ๐บ)))
244 fvex 6901 . . . 4 (๐ทโ€˜(๐น โˆ™ ๐บ)) โˆˆ V
245243, 29, 244fvmpt 6994 . . 3 (๐น โˆˆ ๐ต โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐น) = (๐ทโ€˜(๐น โˆ™ ๐บ)))
2462453ad2ant2 1135 . 2 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜๐น) = (๐ทโ€˜(๐น โˆ™ ๐บ)))
247 eqid 2733 . . . . . . 7 (1rโ€˜๐ด) = (1rโ€˜๐ด)
2482, 247ringidcl 20073 . . . . . 6 (๐ด โˆˆ Ring โ†’ (1rโ€˜๐ด) โˆˆ ๐ต)
249 fvoveq1 7427 . . . . . . 7 (๐‘Ž = (1rโ€˜๐ด) โ†’ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)) = (๐ทโ€˜((1rโ€˜๐ด) โˆ™ ๐บ)))
250 fvex 6901 . . . . . . 7 (๐ทโ€˜((1rโ€˜๐ด) โˆ™ ๐บ)) โˆˆ V
251249, 29, 250fvmpt 6994 . . . . . 6 ((1rโ€˜๐ด) โˆˆ ๐ต โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜(1rโ€˜๐ด)) = (๐ทโ€˜((1rโ€˜๐ด) โˆ™ ๐บ)))
25218, 248, 2513syl 18 . . . . 5 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜(1rโ€˜๐ด)) = (๐ทโ€˜((1rโ€˜๐ด) โˆ™ ๐บ)))
253 simp3 1139 . . . . . . 7 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ๐บ โˆˆ ๐ต)
2542, 22, 247ringlidm 20076 . . . . . . 7 ((๐ด โˆˆ Ring โˆง ๐บ โˆˆ ๐ต) โ†’ ((1rโ€˜๐ด) โˆ™ ๐บ) = ๐บ)
25518, 253, 254syl2anc 585 . . . . . 6 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ((1rโ€˜๐ด) โˆ™ ๐บ) = ๐บ)
256255fveq2d 6892 . . . . 5 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐ทโ€˜((1rโ€˜๐ด) โˆ™ ๐บ)) = (๐ทโ€˜๐บ))
257252, 256eqtrd 2773 . . . 4 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜(1rโ€˜๐ด)) = (๐ทโ€˜๐บ))
258257oveq1d 7419 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜(1rโ€˜๐ด)) ยท (๐ทโ€˜๐น)) = ((๐ทโ€˜๐บ) ยท (๐ทโ€˜๐น)))
25915, 253ffvelcdmd 7083 . . . 4 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐ทโ€˜๐บ) โˆˆ (Baseโ€˜๐‘…))
26015, 241ffvelcdmd 7083 . . . 4 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐ทโ€˜๐น) โˆˆ (Baseโ€˜๐‘…))
2613, 7crngcom 20065 . . . 4 ((๐‘… โˆˆ CRing โˆง (๐ทโ€˜๐บ) โˆˆ (Baseโ€˜๐‘…) โˆง (๐ทโ€˜๐น) โˆˆ (Baseโ€˜๐‘…)) โ†’ ((๐ทโ€˜๐บ) ยท (๐ทโ€˜๐น)) = ((๐ทโ€˜๐น) ยท (๐ทโ€˜๐บ)))
26251, 259, 260, 261syl3anc 1372 . . 3 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ ((๐ทโ€˜๐บ) ยท (๐ทโ€˜๐น)) = ((๐ทโ€˜๐น) ยท (๐ทโ€˜๐บ)))
263258, 262eqtrd 2773 . 2 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (((๐‘Ž โˆˆ ๐ต โ†ฆ (๐ทโ€˜(๐‘Ž โˆ™ ๐บ)))โ€˜(1rโ€˜๐ด)) ยท (๐ทโ€˜๐น)) = ((๐ทโ€˜๐น) ยท (๐ทโ€˜๐บ)))
264242, 246, 2633eqtr3d 2781 1 ((๐‘… โˆˆ CRing โˆง ๐น โˆˆ ๐ต โˆง ๐บ โˆˆ ๐ต) โ†’ (๐ทโ€˜(๐น โˆ™ ๐บ)) = ((๐ทโ€˜๐น) ยท (๐ทโ€˜๐บ)))
Colors of variables: wff setvar class
Syntax hints:   โ†’ wi 4   โˆง wa 397   โˆง w3a 1088   = wceq 1542   โˆˆ wcel 2107   โ‰  wne 2941  โˆ€wral 3062  Vcvv 3475   โˆ– cdif 3944   โŠ† wss 3947  {csn 4627  โŸจcotp 4635   โ†ฆ cmpt 5230   ร— cxp 5673   โ†พ cres 5677  โŸถwf 6536  โ€˜cfv 6540  (class class class)co 7404   โˆ˜f cof 7663   โ†‘m cmap 8816  Fincfn 8935  Basecbs 17140  +gcplusg 17193  .rcmulr 17194  0gc0g 17381   ฮฃg cgsu 17382  1rcur 19996  Ringcrg 20047  CRingccrg 20048   maMul cmmul 21867   Mat cmat 21889   maDet cmdat 22068
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7720  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-addf 11185  ax-mulf 11186
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-xor 1511  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-tp 4632  df-op 4634  df-ot 4636  df-uni 4908  df-int 4950  df-iun 4998  df-iin 4999  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-se 5631  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6297  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7360  df-ov 7407  df-oprab 7408  df-mpo 7409  df-of 7665  df-om 7851  df-1st 7970  df-2nd 7971  df-supp 8142  df-tpos 8206  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-1o 8461  df-2o 8462  df-er 8699  df-map 8818  df-pm 8819  df-ixp 8888  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-fsupp 9358  df-sup 9433  df-oi 9501  df-card 9930  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 18557  df-sgrp 18606  df-mnd 18622  df-mhm 18667  df-submnd 18668  df-efmnd 18746  df-grp 18818  df-minusg 18819  df-sbg 18820  df-mulg 18945  df-subg 18997  df-ghm 19084  df-gim 19127  df-cntz 19175  df-oppg 19203  df-symg 19228  df-pmtr 19303  df-psgn 19352  df-evpm 19353  df-cmn 19643  df-abl 19644  df-mgp 19980  df-ur 19997  df-srg 20001  df-ring 20049  df-cring 20050  df-oppr 20139  df-dvdsr 20160  df-unit 20161  df-invr 20191  df-dvr 20204  df-rnghom 20240  df-drng 20306  df-subrg 20349  df-lmod 20461  df-lss 20531  df-sra 20773  df-rgmod 20774  df-cnfld 20930  df-zring 21003  df-zrh 21037  df-dsmm 21271  df-frlm 21286  df-mamu 21868  df-mat 21890  df-mdet 22069
This theorem is referenced by:  matunit  22162  cramerimplem3  22169  matunitlindflem2  36423
  Copyright terms: Public domain W3C validator