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

Theorem mdetuni0 21993
Description: Lemma for mdetuni 21994. (Contributed by SO, 15-Jul-2018.)
Hypotheses
Ref Expression
mdetuni.a ๐ด = (๐‘ Mat ๐‘…)
mdetuni.b ๐ต = (Baseโ€˜๐ด)
mdetuni.k ๐พ = (Baseโ€˜๐‘…)
mdetuni.0g 0 = (0gโ€˜๐‘…)
mdetuni.1r 1 = (1rโ€˜๐‘…)
mdetuni.pg + = (+gโ€˜๐‘…)
mdetuni.tg ยท = (.rโ€˜๐‘…)
mdetuni.n (๐œ‘ โ†’ ๐‘ โˆˆ Fin)
mdetuni.r (๐œ‘ โ†’ ๐‘… โˆˆ Ring)
mdetuni.ff (๐œ‘ โ†’ ๐ท:๐ตโŸถ๐พ)
mdetuni.al (๐œ‘ โ†’ โˆ€๐‘ฅ โˆˆ ๐ต โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฆ โ‰  ๐‘ง โˆง โˆ€๐‘ค โˆˆ ๐‘ (๐‘ฆ๐‘ฅ๐‘ค) = (๐‘ง๐‘ฅ๐‘ค)) โ†’ (๐ทโ€˜๐‘ฅ) = 0 ))
mdetuni.li (๐œ‘ โ†’ โˆ€๐‘ฅ โˆˆ ๐ต โˆ€๐‘ฆ โˆˆ ๐ต โˆ€๐‘ง โˆˆ ๐ต โˆ€๐‘ค โˆˆ ๐‘ (((๐‘ฅ โ†พ ({๐‘ค} ร— ๐‘)) = ((๐‘ฆ โ†พ ({๐‘ค} ร— ๐‘)) โˆ˜f + (๐‘ง โ†พ ({๐‘ค} ร— ๐‘))) โˆง (๐‘ฅ โ†พ ((๐‘ โˆ– {๐‘ค}) ร— ๐‘)) = (๐‘ฆ โ†พ ((๐‘ โˆ– {๐‘ค}) ร— ๐‘)) โˆง (๐‘ฅ โ†พ ((๐‘ โˆ– {๐‘ค}) ร— ๐‘)) = (๐‘ง โ†พ ((๐‘ โˆ– {๐‘ค}) ร— ๐‘))) โ†’ (๐ทโ€˜๐‘ฅ) = ((๐ทโ€˜๐‘ฆ) + (๐ทโ€˜๐‘ง))))
mdetuni.sc (๐œ‘ โ†’ โˆ€๐‘ฅ โˆˆ ๐ต โˆ€๐‘ฆ โˆˆ ๐พ โˆ€๐‘ง โˆˆ ๐ต โˆ€๐‘ค โˆˆ ๐‘ (((๐‘ฅ โ†พ ({๐‘ค} ร— ๐‘)) = ((({๐‘ค} ร— ๐‘) ร— {๐‘ฆ}) โˆ˜f ยท (๐‘ง โ†พ ({๐‘ค} ร— ๐‘))) โˆง (๐‘ฅ โ†พ ((๐‘ โˆ– {๐‘ค}) ร— ๐‘)) = (๐‘ง โ†พ ((๐‘ โˆ– {๐‘ค}) ร— ๐‘))) โ†’ (๐ทโ€˜๐‘ฅ) = (๐‘ฆ ยท (๐ทโ€˜๐‘ง))))
mdetuni.e ๐ธ = (๐‘ maDet ๐‘…)
mdetuni.cr (๐œ‘ โ†’ ๐‘… โˆˆ CRing)
mdetuni.f (๐œ‘ โ†’ ๐น โˆˆ ๐ต)
Assertion
Ref Expression
mdetuni0 (๐œ‘ โ†’ (๐ทโ€˜๐น) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐น)))
Distinct variable groups:   ๐œ‘,๐‘ฅ,๐‘ฆ,๐‘ง,๐‘ค   ๐‘ฅ,๐ต,๐‘ฆ,๐‘ง,๐‘ค   ๐‘ฅ,๐พ,๐‘ฆ,๐‘ง,๐‘ค   ๐‘ฅ,๐‘,๐‘ฆ,๐‘ง,๐‘ค   ๐‘ฅ,๐ท,๐‘ฆ,๐‘ง,๐‘ค   ๐‘ฅ, ยท ,๐‘ฆ,๐‘ง,๐‘ค   ๐‘ฅ, + ,๐‘ฆ,๐‘ง,๐‘ค   ๐‘ฅ, 0 ,๐‘ฆ,๐‘ง,๐‘ค   ๐‘ฅ, 1 ,๐‘ฆ,๐‘ง,๐‘ค   ๐‘ฅ,๐‘…,๐‘ฆ,๐‘ง,๐‘ค   ๐‘ฅ,๐ด,๐‘ฆ,๐‘ง,๐‘ค   ๐‘ฅ,๐ธ,๐‘ฆ,๐‘ง,๐‘ค   ๐‘ฅ,๐น,๐‘ฆ,๐‘ง,๐‘ค

Proof of Theorem mdetuni0
Dummy variables ๐‘Ž ๐‘ ๐‘ ๐‘‘ ๐‘’ are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 mdetuni.a . . . . 5 ๐ด = (๐‘ Mat ๐‘…)
2 mdetuni.b . . . . 5 ๐ต = (Baseโ€˜๐ด)
3 mdetuni.k . . . . 5 ๐พ = (Baseโ€˜๐‘…)
4 mdetuni.0g . . . . 5 0 = (0gโ€˜๐‘…)
5 mdetuni.1r . . . . 5 1 = (1rโ€˜๐‘…)
6 mdetuni.pg . . . . 5 + = (+gโ€˜๐‘…)
7 mdetuni.tg . . . . 5 ยท = (.rโ€˜๐‘…)
8 mdetuni.n . . . . 5 (๐œ‘ โ†’ ๐‘ โˆˆ Fin)
9 mdetuni.r . . . . 5 (๐œ‘ โ†’ ๐‘… โˆˆ Ring)
10 ringgrp 19977 . . . . . . . . 9 (๐‘… โˆˆ Ring โ†’ ๐‘… โˆˆ Grp)
119, 10syl 17 . . . . . . . 8 (๐œ‘ โ†’ ๐‘… โˆˆ Grp)
1211adantr 482 . . . . . . 7 ((๐œ‘ โˆง ๐‘Ž โˆˆ ๐ต) โ†’ ๐‘… โˆˆ Grp)
13 mdetuni.ff . . . . . . . 8 (๐œ‘ โ†’ ๐ท:๐ตโŸถ๐พ)
1413ffvelcdmda 7039 . . . . . . 7 ((๐œ‘ โˆง ๐‘Ž โˆˆ ๐ต) โ†’ (๐ทโ€˜๐‘Ž) โˆˆ ๐พ)
159adantr 482 . . . . . . . 8 ((๐œ‘ โˆง ๐‘Ž โˆˆ ๐ต) โ†’ ๐‘… โˆˆ Ring)
168, 9jca 513 . . . . . . . . . . 11 (๐œ‘ โ†’ (๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ Ring))
171matring 21815 . . . . . . . . . . 11 ((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ Ring) โ†’ ๐ด โˆˆ Ring)
18 eqid 2733 . . . . . . . . . . . 12 (1rโ€˜๐ด) = (1rโ€˜๐ด)
192, 18ringidcl 19997 . . . . . . . . . . 11 (๐ด โˆˆ Ring โ†’ (1rโ€˜๐ด) โˆˆ ๐ต)
2016, 17, 193syl 18 . . . . . . . . . 10 (๐œ‘ โ†’ (1rโ€˜๐ด) โˆˆ ๐ต)
2113, 20ffvelcdmd 7040 . . . . . . . . 9 (๐œ‘ โ†’ (๐ทโ€˜(1rโ€˜๐ด)) โˆˆ ๐พ)
2221adantr 482 . . . . . . . 8 ((๐œ‘ โˆง ๐‘Ž โˆˆ ๐ต) โ†’ (๐ทโ€˜(1rโ€˜๐ด)) โˆˆ ๐พ)
23 mdetuni.cr . . . . . . . . . 10 (๐œ‘ โ†’ ๐‘… โˆˆ CRing)
24 mdetuni.e . . . . . . . . . . 11 ๐ธ = (๐‘ maDet ๐‘…)
2524, 1, 2, 3mdetf 21967 . . . . . . . . . 10 (๐‘… โˆˆ CRing โ†’ ๐ธ:๐ตโŸถ๐พ)
2623, 25syl 17 . . . . . . . . 9 (๐œ‘ โ†’ ๐ธ:๐ตโŸถ๐พ)
2726ffvelcdmda 7039 . . . . . . . 8 ((๐œ‘ โˆง ๐‘Ž โˆˆ ๐ต) โ†’ (๐ธโ€˜๐‘Ž) โˆˆ ๐พ)
283, 7ringcl 19989 . . . . . . . 8 ((๐‘… โˆˆ Ring โˆง (๐ทโ€˜(1rโ€˜๐ด)) โˆˆ ๐พ โˆง (๐ธโ€˜๐‘Ž) โˆˆ ๐พ) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž)) โˆˆ ๐พ)
2915, 22, 27, 28syl3anc 1372 . . . . . . 7 ((๐œ‘ โˆง ๐‘Ž โˆˆ ๐ต) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž)) โˆˆ ๐พ)
30 eqid 2733 . . . . . . . 8 (-gโ€˜๐‘…) = (-gโ€˜๐‘…)
313, 30grpsubcl 18835 . . . . . . 7 ((๐‘… โˆˆ Grp โˆง (๐ทโ€˜๐‘Ž) โˆˆ ๐พ โˆง ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž)) โˆˆ ๐พ) โ†’ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))) โˆˆ ๐พ)
3212, 14, 29, 31syl3anc 1372 . . . . . 6 ((๐œ‘ โˆง ๐‘Ž โˆˆ ๐ต) โ†’ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))) โˆˆ ๐พ)
3332fmpttd 7067 . . . . 5 (๐œ‘ โ†’ (๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž)))):๐ตโŸถ๐พ)
34 simpr1 1195 . . . . . . . . . 10 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โ†’ ๐‘ โˆˆ ๐ต)
35 fveq2 6846 . . . . . . . . . . . 12 (๐‘Ž = ๐‘ โ†’ (๐ทโ€˜๐‘Ž) = (๐ทโ€˜๐‘))
36 fveq2 6846 . . . . . . . . . . . . 13 (๐‘Ž = ๐‘ โ†’ (๐ธโ€˜๐‘Ž) = (๐ธโ€˜๐‘))
3736oveq2d 7377 . . . . . . . . . . . 12 (๐‘Ž = ๐‘ โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž)) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘)))
3835, 37oveq12d 7379 . . . . . . . . . . 11 (๐‘Ž = ๐‘ โ†’ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))) = ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))))
39 eqid 2733 . . . . . . . . . . 11 (๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž)))) = (๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))
40 ovex 7394 . . . . . . . . . . 11 ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))) โˆˆ V
4138, 39, 40fvmpt 6952 . . . . . . . . . 10 (๐‘ โˆˆ ๐ต โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))))
4234, 41syl 17 . . . . . . . . 9 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))))
43423adant3 1133 . . . . . . . 8 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))))
44 simp1 1137 . . . . . . . . . 10 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐œ‘)
45 simp21 1207 . . . . . . . . . 10 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐‘ โˆˆ ๐ต)
46 simp3r 1203 . . . . . . . . . . 11 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))
47 oveq2 7369 . . . . . . . . . . . . 13 (๐‘’ = ๐‘ค โ†’ (๐‘๐‘๐‘’) = (๐‘๐‘๐‘ค))
48 oveq2 7369 . . . . . . . . . . . . 13 (๐‘’ = ๐‘ค โ†’ (๐‘‘๐‘๐‘’) = (๐‘‘๐‘๐‘ค))
4947, 48eqeq12d 2749 . . . . . . . . . . . 12 (๐‘’ = ๐‘ค โ†’ ((๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’) โ†” (๐‘๐‘๐‘ค) = (๐‘‘๐‘๐‘ค)))
5049cbvralvw 3224 . . . . . . . . . . 11 (โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’) โ†” โˆ€๐‘ค โˆˆ ๐‘ (๐‘๐‘๐‘ค) = (๐‘‘๐‘๐‘ค))
5146, 50sylib 217 . . . . . . . . . 10 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ โˆ€๐‘ค โˆˆ ๐‘ (๐‘๐‘๐‘ค) = (๐‘‘๐‘๐‘ค))
52 simp22 1208 . . . . . . . . . 10 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐‘ โˆˆ ๐‘)
53 simp23 1209 . . . . . . . . . 10 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐‘‘ โˆˆ ๐‘)
54 simp3l 1202 . . . . . . . . . 10 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐‘ โ‰  ๐‘‘)
55 mdetuni.al . . . . . . . . . . 11 (๐œ‘ โ†’ โˆ€๐‘ฅ โˆˆ ๐ต โˆ€๐‘ฆ โˆˆ ๐‘ โˆ€๐‘ง โˆˆ ๐‘ ((๐‘ฆ โ‰  ๐‘ง โˆง โˆ€๐‘ค โˆˆ ๐‘ (๐‘ฆ๐‘ฅ๐‘ค) = (๐‘ง๐‘ฅ๐‘ค)) โ†’ (๐ทโ€˜๐‘ฅ) = 0 ))
56 mdetuni.li . . . . . . . . . . 11 (๐œ‘ โ†’ โˆ€๐‘ฅ โˆˆ ๐ต โˆ€๐‘ฆ โˆˆ ๐ต โˆ€๐‘ง โˆˆ ๐ต โˆ€๐‘ค โˆˆ ๐‘ (((๐‘ฅ โ†พ ({๐‘ค} ร— ๐‘)) = ((๐‘ฆ โ†พ ({๐‘ค} ร— ๐‘)) โˆ˜f + (๐‘ง โ†พ ({๐‘ค} ร— ๐‘))) โˆง (๐‘ฅ โ†พ ((๐‘ โˆ– {๐‘ค}) ร— ๐‘)) = (๐‘ฆ โ†พ ((๐‘ โˆ– {๐‘ค}) ร— ๐‘)) โˆง (๐‘ฅ โ†พ ((๐‘ โˆ– {๐‘ค}) ร— ๐‘)) = (๐‘ง โ†พ ((๐‘ โˆ– {๐‘ค}) ร— ๐‘))) โ†’ (๐ทโ€˜๐‘ฅ) = ((๐ทโ€˜๐‘ฆ) + (๐ทโ€˜๐‘ง))))
57 mdetuni.sc . . . . . . . . . . 11 (๐œ‘ โ†’ โˆ€๐‘ฅ โˆˆ ๐ต โˆ€๐‘ฆ โˆˆ ๐พ โˆ€๐‘ง โˆˆ ๐ต โˆ€๐‘ค โˆˆ ๐‘ (((๐‘ฅ โ†พ ({๐‘ค} ร— ๐‘)) = ((({๐‘ค} ร— ๐‘) ร— {๐‘ฆ}) โˆ˜f ยท (๐‘ง โ†พ ({๐‘ค} ร— ๐‘))) โˆง (๐‘ฅ โ†พ ((๐‘ โˆ– {๐‘ค}) ร— ๐‘)) = (๐‘ง โ†พ ((๐‘ โˆ– {๐‘ค}) ร— ๐‘))) โ†’ (๐ทโ€˜๐‘ฅ) = (๐‘ฆ ยท (๐ทโ€˜๐‘ง))))
581, 2, 3, 4, 5, 6, 7, 8, 9, 13, 55, 56, 57mdetunilem1 21984 . . . . . . . . . 10 (((๐œ‘ โˆง ๐‘ โˆˆ ๐ต โˆง โˆ€๐‘ค โˆˆ ๐‘ (๐‘๐‘๐‘ค) = (๐‘‘๐‘๐‘ค)) โˆง (๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘ โˆง ๐‘ โ‰  ๐‘‘)) โ†’ (๐ทโ€˜๐‘) = 0 )
5944, 45, 51, 52, 53, 54, 58syl33anc 1386 . . . . . . . . 9 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ (๐ทโ€˜๐‘) = 0 )
60233ad2ant1 1134 . . . . . . . . . . 11 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ๐‘… โˆˆ CRing)
6124, 1, 2, 4, 60, 45, 52, 53, 54, 46mdetralt 21980 . . . . . . . . . 10 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ (๐ธโ€˜๐‘) = 0 )
6261oveq2d 7377 . . . . . . . . 9 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘)) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท 0 ))
6359, 62oveq12d 7379 . . . . . . . 8 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))) = ( 0 (-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท 0 )))
643, 7, 4ringrz 20020 . . . . . . . . . . . 12 ((๐‘… โˆˆ Ring โˆง (๐ทโ€˜(1rโ€˜๐ด)) โˆˆ ๐พ) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท 0 ) = 0 )
659, 21, 64syl2anc 585 . . . . . . . . . . 11 (๐œ‘ โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท 0 ) = 0 )
6665oveq2d 7377 . . . . . . . . . 10 (๐œ‘ โ†’ ( 0 (-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท 0 )) = ( 0 (-gโ€˜๐‘…) 0 ))
673, 4grpidcl 18786 . . . . . . . . . . 11 (๐‘… โˆˆ Grp โ†’ 0 โˆˆ ๐พ)
683, 4, 30grpsubid 18839 . . . . . . . . . . 11 ((๐‘… โˆˆ Grp โˆง 0 โˆˆ ๐พ) โ†’ ( 0 (-gโ€˜๐‘…) 0 ) = 0 )
6911, 67, 68syl2anc2 586 . . . . . . . . . 10 (๐œ‘ โ†’ ( 0 (-gโ€˜๐‘…) 0 ) = 0 )
7066, 69eqtrd 2773 . . . . . . . . 9 (๐œ‘ โ†’ ( 0 (-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท 0 )) = 0 )
71703ad2ant1 1134 . . . . . . . 8 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ( 0 (-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท 0 )) = 0 )
7243, 63, 713eqtrd 2777 . . . . . . 7 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘) โˆง (๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = 0 )
73723expia 1122 . . . . . 6 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ โˆง ๐‘‘ โˆˆ ๐‘)) โ†’ ((๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’)) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = 0 ))
7473ralrimivvva 3197 . . . . 5 (๐œ‘ โ†’ โˆ€๐‘ โˆˆ ๐ต โˆ€๐‘ โˆˆ ๐‘ โˆ€๐‘‘ โˆˆ ๐‘ ((๐‘ โ‰  ๐‘‘ โˆง โˆ€๐‘’ โˆˆ ๐‘ (๐‘๐‘๐‘’) = (๐‘‘๐‘๐‘’)) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = 0 ))
75 simp1 1137 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐œ‘)
76 simp2ll 1241 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘ โˆˆ ๐ต)
77 simp2lr 1242 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘ โˆˆ ๐ต)
78 simp2rl 1243 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘‘ โˆˆ ๐ต)
79 simp2rr 1244 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘’ โˆˆ ๐‘)
80 simp31 1210 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))))
81 simp32 1211 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
82 simp33 1212 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
831, 2, 3, 4, 5, 6, 7, 8, 9, 13, 55, 56, 57mdetunilem3 21986 . . . . . . . . . . . 12 (((๐œ‘ โˆง ๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘ โˆง (๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘)))) โˆง ((๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐ทโ€˜๐‘) = ((๐ทโ€˜๐‘) + (๐ทโ€˜๐‘‘)))
8475, 76, 77, 78, 79, 80, 81, 82, 83syl332anc 1402 . . . . . . . . . . 11 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐ทโ€˜๐‘) = ((๐ทโ€˜๐‘) + (๐ทโ€˜๐‘‘)))
85233ad2ant1 1134 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘… โˆˆ CRing)
8624, 1, 2, 6, 85, 76, 77, 78, 79, 80, 81, 82mdetrlin 21974 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐ธโ€˜๐‘) = ((๐ธโ€˜๐‘) + (๐ธโ€˜๐‘‘)))
8786oveq2d 7377 . . . . . . . . . . 11 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘)) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท ((๐ธโ€˜๐‘) + (๐ธโ€˜๐‘‘))))
8884, 87oveq12d 7379 . . . . . . . . . 10 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))) = (((๐ทโ€˜๐‘) + (๐ทโ€˜๐‘‘))(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท ((๐ธโ€˜๐‘) + (๐ธโ€˜๐‘‘)))))
89 simprll 778 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ๐ต)
9089, 41syl 17 . . . . . . . . . . 11 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))))
91903adant3 1133 . . . . . . . . . 10 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))))
92 simprlr 779 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ๐ต)
93 fveq2 6846 . . . . . . . . . . . . . . . 16 (๐‘Ž = ๐‘ โ†’ (๐ทโ€˜๐‘Ž) = (๐ทโ€˜๐‘))
94 fveq2 6846 . . . . . . . . . . . . . . . . 17 (๐‘Ž = ๐‘ โ†’ (๐ธโ€˜๐‘Ž) = (๐ธโ€˜๐‘))
9594oveq2d 7377 . . . . . . . . . . . . . . . 16 (๐‘Ž = ๐‘ โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž)) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘)))
9693, 95oveq12d 7379 . . . . . . . . . . . . . . 15 (๐‘Ž = ๐‘ โ†’ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))) = ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))))
97 ovex 7394 . . . . . . . . . . . . . . 15 ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))) โˆˆ V
9896, 39, 97fvmpt 6952 . . . . . . . . . . . . . 14 (๐‘ โˆˆ ๐ต โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))))
9992, 98syl 17 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))))
100 simprrl 780 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘‘ โˆˆ ๐ต)
101 fveq2 6846 . . . . . . . . . . . . . . . 16 (๐‘Ž = ๐‘‘ โ†’ (๐ทโ€˜๐‘Ž) = (๐ทโ€˜๐‘‘))
102 fveq2 6846 . . . . . . . . . . . . . . . . 17 (๐‘Ž = ๐‘‘ โ†’ (๐ธโ€˜๐‘Ž) = (๐ธโ€˜๐‘‘))
103102oveq2d 7377 . . . . . . . . . . . . . . . 16 (๐‘Ž = ๐‘‘ โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž)) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘)))
104101, 103oveq12d 7379 . . . . . . . . . . . . . . 15 (๐‘Ž = ๐‘‘ โ†’ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))) = ((๐ทโ€˜๐‘‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘))))
105 ovex 7394 . . . . . . . . . . . . . . 15 ((๐ทโ€˜๐‘‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘))) โˆˆ V
106104, 39, 105fvmpt 6952 . . . . . . . . . . . . . 14 (๐‘‘ โˆˆ ๐ต โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘) = ((๐ทโ€˜๐‘‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘))))
107100, 106syl 17 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘) = ((๐ทโ€˜๐‘‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘))))
10899, 107oveq12d 7379 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) + ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘)) = (((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))) + ((๐ทโ€˜๐‘‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘)))))
109 ringabl 20010 . . . . . . . . . . . . . . 15 (๐‘… โˆˆ Ring โ†’ ๐‘… โˆˆ Abel)
1109, 109syl 17 . . . . . . . . . . . . . 14 (๐œ‘ โ†’ ๐‘… โˆˆ Abel)
111110adantr 482 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘… โˆˆ Abel)
11213adantr 482 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐ท:๐ตโŸถ๐พ)
113112, 92ffvelcdmd 7040 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐ทโ€˜๐‘) โˆˆ ๐พ)
114112, 100ffvelcdmd 7040 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐ทโ€˜๐‘‘) โˆˆ ๐พ)
1159adantr 482 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘… โˆˆ Ring)
11621adantr 482 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐ทโ€˜(1rโ€˜๐ด)) โˆˆ ๐พ)
11726adantr 482 . . . . . . . . . . . . . . 15 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐ธ:๐ตโŸถ๐พ)
118117, 92ffvelcdmd 7040 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐ธโ€˜๐‘) โˆˆ ๐พ)
1193, 7ringcl 19989 . . . . . . . . . . . . . 14 ((๐‘… โˆˆ Ring โˆง (๐ทโ€˜(1rโ€˜๐ด)) โˆˆ ๐พ โˆง (๐ธโ€˜๐‘) โˆˆ ๐พ) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘)) โˆˆ ๐พ)
120115, 116, 118, 119syl3anc 1372 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘)) โˆˆ ๐พ)
121117, 100ffvelcdmd 7040 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐ธโ€˜๐‘‘) โˆˆ ๐พ)
1223, 7ringcl 19989 . . . . . . . . . . . . . 14 ((๐‘… โˆˆ Ring โˆง (๐ทโ€˜(1rโ€˜๐ด)) โˆˆ ๐พ โˆง (๐ธโ€˜๐‘‘) โˆˆ ๐พ) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘)) โˆˆ ๐พ)
123115, 116, 121, 122syl3anc 1372 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘)) โˆˆ ๐พ)
1243, 6, 30ablsub4 19599 . . . . . . . . . . . . 13 ((๐‘… โˆˆ Abel โˆง ((๐ทโ€˜๐‘) โˆˆ ๐พ โˆง (๐ทโ€˜๐‘‘) โˆˆ ๐พ) โˆง (((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘)) โˆˆ ๐พ โˆง ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘)) โˆˆ ๐พ)) โ†’ (((๐ทโ€˜๐‘) + (๐ทโ€˜๐‘‘))(-gโ€˜๐‘…)(((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘)) + ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘)))) = (((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))) + ((๐ทโ€˜๐‘‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘)))))
125111, 113, 114, 120, 123, 124syl122anc 1380 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐ทโ€˜๐‘) + (๐ทโ€˜๐‘‘))(-gโ€˜๐‘…)(((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘)) + ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘)))) = (((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))) + ((๐ทโ€˜๐‘‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘)))))
1263, 6, 7ringdi 19995 . . . . . . . . . . . . . . 15 ((๐‘… โˆˆ Ring โˆง ((๐ทโ€˜(1rโ€˜๐ด)) โˆˆ ๐พ โˆง (๐ธโ€˜๐‘) โˆˆ ๐พ โˆง (๐ธโ€˜๐‘‘) โˆˆ ๐พ)) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท ((๐ธโ€˜๐‘) + (๐ธโ€˜๐‘‘))) = (((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘)) + ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘))))
127115, 116, 118, 121, 126syl13anc 1373 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท ((๐ธโ€˜๐‘) + (๐ธโ€˜๐‘‘))) = (((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘)) + ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘))))
128127eqcomd 2739 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘)) + ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘))) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท ((๐ธโ€˜๐‘) + (๐ธโ€˜๐‘‘))))
129128oveq2d 7377 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐ทโ€˜๐‘) + (๐ทโ€˜๐‘‘))(-gโ€˜๐‘…)(((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘)) + ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘)))) = (((๐ทโ€˜๐‘) + (๐ทโ€˜๐‘‘))(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท ((๐ธโ€˜๐‘) + (๐ธโ€˜๐‘‘)))))
130108, 125, 1293eqtr2d 2779 . . . . . . . . . . 11 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) + ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘)) = (((๐ทโ€˜๐‘) + (๐ทโ€˜๐‘‘))(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท ((๐ธโ€˜๐‘) + (๐ธโ€˜๐‘‘)))))
1311303adant3 1133 . . . . . . . . . 10 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) + ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘)) = (((๐ทโ€˜๐‘) + (๐ทโ€˜๐‘‘))(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท ((๐ธโ€˜๐‘) + (๐ธโ€˜๐‘‘)))))
13288, 91, 1313eqtr4d 2783 . . . . . . . . 9 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = (((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) + ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘)))
1331323expia 1122 . . . . . . . 8 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = (((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) + ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘))))
134133anassrs 469 . . . . . . 7 (((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = (((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) + ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘))))
135134ralrimivva 3194 . . . . . 6 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐ต)) โ†’ โˆ€๐‘‘ โˆˆ ๐ต โˆ€๐‘’ โˆˆ ๐‘ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = (((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) + ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘))))
136135ralrimivva 3194 . . . . 5 (๐œ‘ โ†’ โˆ€๐‘ โˆˆ ๐ต โˆ€๐‘ โˆˆ ๐ต โˆ€๐‘‘ โˆˆ ๐ต โˆ€๐‘’ โˆˆ ๐‘ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) โˆ˜f + (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = (((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) + ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘))))
137 simp1 1137 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐œ‘)
138 simp2ll 1241 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘ โˆˆ ๐ต)
139 simp2lr 1242 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘ โˆˆ ๐พ)
140 simp2rl 1243 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘‘ โˆˆ ๐ต)
141 simp2rr 1244 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘’ โˆˆ ๐‘)
142 simp3l 1202 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))))
143 simp3r 1203 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))
1441, 2, 3, 4, 5, 6, 7, 8, 9, 13, 55, 56, 57mdetunilem4 21987 . . . . . . . . . . . 12 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ โˆง ๐‘‘ โˆˆ ๐ต) โˆง (๐‘’ โˆˆ ๐‘ โˆง (๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐ทโ€˜๐‘) = (๐‘ ยท (๐ทโ€˜๐‘‘)))
145137, 138, 139, 140, 141, 142, 143, 144syl133anc 1394 . . . . . . . . . . 11 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐ทโ€˜๐‘) = (๐‘ ยท (๐ทโ€˜๐‘‘)))
146233ad2ant1 1134 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ๐‘… โˆˆ CRing)
14724, 1, 2, 3, 7, 146, 138, 139, 140, 141, 142, 143mdetrsca 21975 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐ธโ€˜๐‘) = (๐‘ ยท (๐ธโ€˜๐‘‘)))
148147oveq2d 7377 . . . . . . . . . . 11 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘)) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐‘ ยท (๐ธโ€˜๐‘‘))))
149145, 148oveq12d 7379 . . . . . . . . . 10 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))) = ((๐‘ ยท (๐ทโ€˜๐‘‘))(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐‘ ยท (๐ธโ€˜๐‘‘)))))
150 simprll 778 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ๐ต)
151150, 41syl 17 . . . . . . . . . . 11 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))))
1521513adant3 1133 . . . . . . . . . 10 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = ((๐ทโ€˜๐‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘))))
153 simprrl 780 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘‘ โˆˆ ๐ต)
154153, 106syl 17 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘) = ((๐ทโ€˜๐‘‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘))))
155154oveq2d 7377 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘)) = (๐‘ ยท ((๐ทโ€˜๐‘‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘)))))
1569adantr 482 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘… โˆˆ Ring)
157 simprlr 779 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐‘ โˆˆ ๐พ)
15813adantr 482 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐ท:๐ตโŸถ๐พ)
159158, 153ffvelcdmd 7040 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐ทโ€˜๐‘‘) โˆˆ ๐พ)
16021adantr 482 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐ทโ€˜(1rโ€˜๐ด)) โˆˆ ๐พ)
16126adantr 482 . . . . . . . . . . . . . . 15 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ๐ธ:๐ตโŸถ๐พ)
162161, 153ffvelcdmd 7040 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐ธโ€˜๐‘‘) โˆˆ ๐พ)
163156, 160, 162, 122syl3anc 1372 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘)) โˆˆ ๐พ)
1643, 7, 30, 156, 157, 159, 163ringsubdi 20031 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ ยท ((๐ทโ€˜๐‘‘)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘)))) = ((๐‘ ยท (๐ทโ€˜๐‘‘))(-gโ€˜๐‘…)(๐‘ ยท ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘)))))
165 eqid 2733 . . . . . . . . . . . . . . . . 17 (mulGrpโ€˜๐‘…) = (mulGrpโ€˜๐‘…)
166165crngmgp 19980 . . . . . . . . . . . . . . . 16 (๐‘… โˆˆ CRing โ†’ (mulGrpโ€˜๐‘…) โˆˆ CMnd)
16723, 166syl 17 . . . . . . . . . . . . . . 15 (๐œ‘ โ†’ (mulGrpโ€˜๐‘…) โˆˆ CMnd)
168167adantr 482 . . . . . . . . . . . . . 14 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (mulGrpโ€˜๐‘…) โˆˆ CMnd)
169165, 3mgpbas 19910 . . . . . . . . . . . . . . 15 ๐พ = (Baseโ€˜(mulGrpโ€˜๐‘…))
170165, 7mgpplusg 19908 . . . . . . . . . . . . . . 15 ยท = (+gโ€˜(mulGrpโ€˜๐‘…))
171169, 170cmn12 19592 . . . . . . . . . . . . . 14 (((mulGrpโ€˜๐‘…) โˆˆ CMnd โˆง (๐‘ โˆˆ ๐พ โˆง (๐ทโ€˜(1rโ€˜๐ด)) โˆˆ ๐พ โˆง (๐ธโ€˜๐‘‘) โˆˆ ๐พ)) โ†’ (๐‘ ยท ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘))) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐‘ ยท (๐ธโ€˜๐‘‘))))
172168, 157, 160, 162, 171syl13anc 1373 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ ยท ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘))) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐‘ ยท (๐ธโ€˜๐‘‘))))
173172oveq2d 7377 . . . . . . . . . . . 12 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ ((๐‘ ยท (๐ทโ€˜๐‘‘))(-gโ€˜๐‘…)(๐‘ ยท ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘‘)))) = ((๐‘ ยท (๐ทโ€˜๐‘‘))(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐‘ ยท (๐ธโ€˜๐‘‘)))))
174155, 164, 1733eqtrd 2777 . . . . . . . . . . 11 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘)) = ((๐‘ ยท (๐ทโ€˜๐‘‘))(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐‘ ยท (๐ธโ€˜๐‘‘)))))
1751743adant3 1133 . . . . . . . . . 10 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘)) = ((๐‘ ยท (๐ทโ€˜๐‘‘))(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐‘ ยท (๐ธโ€˜๐‘‘)))))
176149, 152, 1753eqtr4d 2783 . . . . . . . . 9 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โˆง ((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘)))
1771763expia 1122 . . . . . . . 8 ((๐œ‘ โˆง ((๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘))) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘))))
178177anassrs 469 . . . . . . 7 (((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ)) โˆง (๐‘‘ โˆˆ ๐ต โˆง ๐‘’ โˆˆ ๐‘)) โ†’ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘))))
179178ralrimivva 3194 . . . . . 6 ((๐œ‘ โˆง (๐‘ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐พ)) โ†’ โˆ€๐‘‘ โˆˆ ๐ต โˆ€๐‘’ โˆˆ ๐‘ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘))))
180179ralrimivva 3194 . . . . 5 (๐œ‘ โ†’ โˆ€๐‘ โˆˆ ๐ต โˆ€๐‘ โˆˆ ๐พ โˆ€๐‘‘ โˆˆ ๐ต โˆ€๐‘’ โˆˆ ๐‘ (((๐‘ โ†พ ({๐‘’} ร— ๐‘)) = ((({๐‘’} ร— ๐‘) ร— {๐‘}) โˆ˜f ยท (๐‘‘ โ†พ ({๐‘’} ร— ๐‘))) โˆง (๐‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘)) = (๐‘‘ โ†พ ((๐‘ โˆ– {๐‘’}) ร— ๐‘))) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = (๐‘ ยท ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘‘))))
181 eqidd 2734 . . . . . 6 (๐œ‘ โ†’ (๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž)))) = (๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž)))))
182 fveq2 6846 . . . . . . . 8 (๐‘Ž = (1rโ€˜๐ด) โ†’ (๐ทโ€˜๐‘Ž) = (๐ทโ€˜(1rโ€˜๐ด)))
183 fveq2 6846 . . . . . . . . 9 (๐‘Ž = (1rโ€˜๐ด) โ†’ (๐ธโ€˜๐‘Ž) = (๐ธโ€˜(1rโ€˜๐ด)))
184183oveq2d 7377 . . . . . . . 8 (๐‘Ž = (1rโ€˜๐ด) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž)) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜(1rโ€˜๐ด))))
185182, 184oveq12d 7379 . . . . . . 7 (๐‘Ž = (1rโ€˜๐ด) โ†’ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))) = ((๐ทโ€˜(1rโ€˜๐ด))(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜(1rโ€˜๐ด)))))
18624, 1, 18, 5mdet1 21973 . . . . . . . . . . . 12 ((๐‘… โˆˆ CRing โˆง ๐‘ โˆˆ Fin) โ†’ (๐ธโ€˜(1rโ€˜๐ด)) = 1 )
18723, 8, 186syl2anc 585 . . . . . . . . . . 11 (๐œ‘ โ†’ (๐ธโ€˜(1rโ€˜๐ด)) = 1 )
188187oveq2d 7377 . . . . . . . . . 10 (๐œ‘ โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜(1rโ€˜๐ด))) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท 1 ))
1893, 7, 5ringridm 20001 . . . . . . . . . . 11 ((๐‘… โˆˆ Ring โˆง (๐ทโ€˜(1rโ€˜๐ด)) โˆˆ ๐พ) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท 1 ) = (๐ทโ€˜(1rโ€˜๐ด)))
1909, 21, 189syl2anc 585 . . . . . . . . . 10 (๐œ‘ โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท 1 ) = (๐ทโ€˜(1rโ€˜๐ด)))
191188, 190eqtrd 2773 . . . . . . . . 9 (๐œ‘ โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜(1rโ€˜๐ด))) = (๐ทโ€˜(1rโ€˜๐ด)))
192191oveq2d 7377 . . . . . . . 8 (๐œ‘ โ†’ ((๐ทโ€˜(1rโ€˜๐ด))(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜(1rโ€˜๐ด)))) = ((๐ทโ€˜(1rโ€˜๐ด))(-gโ€˜๐‘…)(๐ทโ€˜(1rโ€˜๐ด))))
1933, 4, 30grpsubid 18839 . . . . . . . . 9 ((๐‘… โˆˆ Grp โˆง (๐ทโ€˜(1rโ€˜๐ด)) โˆˆ ๐พ) โ†’ ((๐ทโ€˜(1rโ€˜๐ด))(-gโ€˜๐‘…)(๐ทโ€˜(1rโ€˜๐ด))) = 0 )
19411, 21, 193syl2anc 585 . . . . . . . 8 (๐œ‘ โ†’ ((๐ทโ€˜(1rโ€˜๐ด))(-gโ€˜๐‘…)(๐ทโ€˜(1rโ€˜๐ด))) = 0 )
195192, 194eqtrd 2773 . . . . . . 7 (๐œ‘ โ†’ ((๐ทโ€˜(1rโ€˜๐ด))(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜(1rโ€˜๐ด)))) = 0 )
196185, 195sylan9eqr 2795 . . . . . 6 ((๐œ‘ โˆง ๐‘Ž = (1rโ€˜๐ด)) โ†’ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))) = 0 )
1974fvexi 6860 . . . . . . 7 0 โˆˆ V
198197a1i 11 . . . . . 6 (๐œ‘ โ†’ 0 โˆˆ V)
199181, 196, 20, 198fvmptd 6959 . . . . 5 (๐œ‘ โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜(1rโ€˜๐ด)) = 0 )
200 eqid 2733 . . . . 5 {๐‘ โˆฃ โˆ€๐‘ โˆˆ ๐ต โˆ€๐‘‘ โˆˆ (๐‘ โ†‘m ๐‘)(โˆ€๐‘’ โˆˆ ๐‘ (๐‘โ€˜๐‘’) = if(๐‘’ โˆˆ ๐‘‘, 1 , 0 ) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = 0 )} = {๐‘ โˆฃ โˆ€๐‘ โˆˆ ๐ต โˆ€๐‘‘ โˆˆ (๐‘ โ†‘m ๐‘)(โˆ€๐‘’ โˆˆ ๐‘ (๐‘โ€˜๐‘’) = if(๐‘’ โˆˆ ๐‘‘, 1 , 0 ) โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐‘) = 0 )}
2011, 2, 3, 4, 5, 6, 7, 8, 9, 33, 74, 136, 180, 199, 200mdetunilem9 21992 . . . 4 (๐œ‘ โ†’ (๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž)))) = (๐ต ร— { 0 }))
202201fveq1d 6848 . . 3 (๐œ‘ โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐น) = ((๐ต ร— { 0 })โ€˜๐น))
203 fveq2 6846 . . . . . 6 (๐‘Ž = ๐น โ†’ (๐ทโ€˜๐‘Ž) = (๐ทโ€˜๐น))
204 fveq2 6846 . . . . . . 7 (๐‘Ž = ๐น โ†’ (๐ธโ€˜๐‘Ž) = (๐ธโ€˜๐น))
205204oveq2d 7377 . . . . . 6 (๐‘Ž = ๐น โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž)) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐น)))
206203, 205oveq12d 7379 . . . . 5 (๐‘Ž = ๐น โ†’ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))) = ((๐ทโ€˜๐น)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐น))))
207206adantl 483 . . . 4 ((๐œ‘ โˆง ๐‘Ž = ๐น) โ†’ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))) = ((๐ทโ€˜๐น)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐น))))
208 mdetuni.f . . . 4 (๐œ‘ โ†’ ๐น โˆˆ ๐ต)
209 ovexd 7396 . . . 4 (๐œ‘ โ†’ ((๐ทโ€˜๐น)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐น))) โˆˆ V)
210181, 207, 208, 209fvmptd 6959 . . 3 (๐œ‘ โ†’ ((๐‘Ž โˆˆ ๐ต โ†ฆ ((๐ทโ€˜๐‘Ž)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐‘Ž))))โ€˜๐น) = ((๐ทโ€˜๐น)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐น))))
211197fvconst2 7157 . . . 4 (๐น โˆˆ ๐ต โ†’ ((๐ต ร— { 0 })โ€˜๐น) = 0 )
212208, 211syl 17 . . 3 (๐œ‘ โ†’ ((๐ต ร— { 0 })โ€˜๐น) = 0 )
213202, 210, 2123eqtr3d 2781 . 2 (๐œ‘ โ†’ ((๐ทโ€˜๐น)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐น))) = 0 )
21413, 208ffvelcdmd 7040 . . 3 (๐œ‘ โ†’ (๐ทโ€˜๐น) โˆˆ ๐พ)
21526, 208ffvelcdmd 7040 . . . 4 (๐œ‘ โ†’ (๐ธโ€˜๐น) โˆˆ ๐พ)
2163, 7ringcl 19989 . . . 4 ((๐‘… โˆˆ Ring โˆง (๐ทโ€˜(1rโ€˜๐ด)) โˆˆ ๐พ โˆง (๐ธโ€˜๐น) โˆˆ ๐พ) โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐น)) โˆˆ ๐พ)
2179, 21, 215, 216syl3anc 1372 . . 3 (๐œ‘ โ†’ ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐น)) โˆˆ ๐พ)
2183, 4, 30grpsubeq0 18841 . . 3 ((๐‘… โˆˆ Grp โˆง (๐ทโ€˜๐น) โˆˆ ๐พ โˆง ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐น)) โˆˆ ๐พ) โ†’ (((๐ทโ€˜๐น)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐น))) = 0 โ†” (๐ทโ€˜๐น) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐น))))
21911, 214, 217, 218syl3anc 1372 . 2 (๐œ‘ โ†’ (((๐ทโ€˜๐น)(-gโ€˜๐‘…)((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐น))) = 0 โ†” (๐ทโ€˜๐น) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐น))))
220213, 219mpbid 231 1 (๐œ‘ โ†’ (๐ทโ€˜๐น) = ((๐ทโ€˜(1rโ€˜๐ด)) ยท (๐ธโ€˜๐น)))
Colors of variables: wff setvar class
Syntax hints:   โ†’ wi 4   โ†” wb 205   โˆง wa 397   โˆง w3a 1088   = wceq 1542   โˆˆ wcel 2107  {cab 2710   โ‰  wne 2940  โˆ€wral 3061  Vcvv 3447   โˆ– cdif 3911  ifcif 4490  {csn 4590   โ†ฆ cmpt 5192   ร— cxp 5635   โ†พ cres 5639  โŸถwf 6496  โ€˜cfv 6500  (class class class)co 7361   โˆ˜f cof 7619   โ†‘m cmap 8771  Fincfn 8889  Basecbs 17091  +gcplusg 17141  .rcmulr 17142  0gc0g 17329  Grpcgrp 18756  -gcsg 18758  CMndccmn 19570  Abelcabl 19571  mulGrpcmgp 19904  1rcur 19921  Ringcrg 19972  CRingccrg 19973   Mat cmat 21777   maDet cmdat 21956
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 5246  ax-sep 5260  ax-nul 5267  ax-pow 5324  ax-pr 5388  ax-un 7676  ax-cnex 11115  ax-resscn 11116  ax-1cn 11117  ax-icn 11118  ax-addcl 11119  ax-addrcl 11120  ax-mulcl 11121  ax-mulrcl 11122  ax-mulcom 11123  ax-addass 11124  ax-mulass 11125  ax-distr 11126  ax-i2m1 11127  ax-1ne0 11128  ax-1rid 11129  ax-rnegex 11130  ax-rrecex 11131  ax-cnre 11132  ax-pre-lttri 11133  ax-pre-lttrn 11134  ax-pre-ltadd 11135  ax-pre-mulgt0 11136  ax-addf 11138  ax-mulf 11139
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 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3352  df-reu 3353  df-rab 3407  df-v 3449  df-sbc 3744  df-csb 3860  df-dif 3917  df-un 3919  df-in 3921  df-ss 3931  df-pss 3933  df-nul 4287  df-if 4491  df-pw 4566  df-sn 4591  df-pr 4593  df-tp 4595  df-op 4597  df-ot 4599  df-uni 4870  df-int 4912  df-iun 4960  df-iin 4961  df-br 5110  df-opab 5172  df-mpt 5193  df-tr 5227  df-id 5535  df-eprel 5541  df-po 5549  df-so 5550  df-fr 5592  df-se 5593  df-we 5594  df-xp 5643  df-rel 5644  df-cnv 5645  df-co 5646  df-dm 5647  df-rn 5648  df-res 5649  df-ima 5650  df-pred 6257  df-ord 6324  df-on 6325  df-lim 6326  df-suc 6327  df-iota 6452  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-isom 6509  df-riota 7317  df-ov 7364  df-oprab 7365  df-mpo 7366  df-of 7621  df-om 7807  df-1st 7925  df-2nd 7926  df-supp 8097  df-tpos 8161  df-frecs 8216  df-wrecs 8247  df-recs 8321  df-rdg 8360  df-1o 8416  df-2o 8417  df-er 8654  df-map 8773  df-pm 8774  df-ixp 8842  df-en 8890  df-dom 8891  df-sdom 8892  df-fin 8893  df-fsupp 9312  df-sup 9386  df-oi 9454  df-card 9883  df-pnf 11199  df-mnf 11200  df-xr 11201  df-ltxr 11202  df-le 11203  df-sub 11395  df-neg 11396  df-div 11821  df-nn 12162  df-2 12224  df-3 12225  df-4 12226  df-5 12227  df-6 12228  df-7 12229  df-8 12230  df-9 12231  df-n0 12422  df-xnn0 12494  df-z 12508  df-dec 12627  df-uz 12772  df-rp 12924  df-fz 13434  df-fzo 13577  df-seq 13916  df-exp 13977  df-hash 14240  df-word 14412  df-lsw 14460  df-concat 14468  df-s1 14493  df-substr 14538  df-pfx 14568  df-splice 14647  df-reverse 14656  df-s2 14746  df-struct 17027  df-sets 17044  df-slot 17062  df-ndx 17074  df-base 17092  df-ress 17121  df-plusg 17154  df-mulr 17155  df-starv 17156  df-sca 17157  df-vsca 17158  df-ip 17159  df-tset 17160  df-ple 17161  df-ds 17163  df-unif 17164  df-hom 17165  df-cco 17166  df-0g 17331  df-gsum 17332  df-prds 17337  df-pws 17339  df-mre 17474  df-mrc 17475  df-acs 17477  df-mgm 18505  df-sgrp 18554  df-mnd 18565  df-mhm 18609  df-submnd 18610  df-efmnd 18687  df-grp 18759  df-minusg 18760  df-sbg 18761  df-mulg 18881  df-subg 18933  df-ghm 19014  df-gim 19057  df-cntz 19105  df-oppg 19132  df-symg 19157  df-pmtr 19232  df-psgn 19281  df-evpm 19282  df-cmn 19572  df-abl 19573  df-mgp 19905  df-ur 19922  df-srg 19926  df-ring 19974  df-cring 19975  df-oppr 20057  df-dvdsr 20078  df-unit 20079  df-invr 20109  df-dvr 20120  df-rnghom 20156  df-drng 20221  df-subrg 20262  df-lmod 20367  df-lss 20437  df-sra 20678  df-rgmod 20679  df-cnfld 20820  df-zring 20893  df-zrh 20927  df-dsmm 21161  df-frlm 21176  df-mamu 21756  df-mat 21778  df-mdet 21957
This theorem is referenced by:  mdetuni  21994  mdetmul  21995
  Copyright terms: Public domain W3C validator