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

Theorem mhpmulcl 21683
Description: A product of homogeneous polynomials is a homogeneous polynomial whose degree is the sum of the degrees of the factors. Compare mdegmulle2 25588 (which shows less-than-or-equal instead of equal). (Contributed by SN, 22-Jul-2024.)
Hypotheses
Ref Expression
mhpmulcl.h ๐ป = (๐ผ mHomP ๐‘…)
mhpmulcl.y ๐‘Œ = (๐ผ mPoly ๐‘…)
mhpmulcl.t ยท = (.rโ€˜๐‘Œ)
mhpmulcl.i (๐œ‘ โ†’ ๐ผ โˆˆ ๐‘‰)
mhpmulcl.r (๐œ‘ โ†’ ๐‘… โˆˆ Ring)
mhpmulcl.m (๐œ‘ โ†’ ๐‘€ โˆˆ โ„•0)
mhpmulcl.n (๐œ‘ โ†’ ๐‘ โˆˆ โ„•0)
mhpmulcl.p (๐œ‘ โ†’ ๐‘ƒ โˆˆ (๐ปโ€˜๐‘€))
mhpmulcl.q (๐œ‘ โ†’ ๐‘„ โˆˆ (๐ปโ€˜๐‘))
Assertion
Ref Expression
mhpmulcl (๐œ‘ โ†’ (๐‘ƒ ยท ๐‘„) โˆˆ (๐ปโ€˜(๐‘€ + ๐‘)))

Proof of Theorem mhpmulcl
Dummy variables ๐‘ ๐‘‘ ๐‘’ ๐‘– ๐‘ฅ ๐‘ โ„Ž are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 mhpmulcl.y . . . . . . . 8 ๐‘Œ = (๐ผ mPoly ๐‘…)
2 eqid 2732 . . . . . . . 8 (Baseโ€˜๐‘Œ) = (Baseโ€˜๐‘Œ)
3 eqid 2732 . . . . . . . 8 (.rโ€˜๐‘…) = (.rโ€˜๐‘…)
4 mhpmulcl.t . . . . . . . 8 ยท = (.rโ€˜๐‘Œ)
5 eqid 2732 . . . . . . . 8 {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} = {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}
6 mhpmulcl.h . . . . . . . . 9 ๐ป = (๐ผ mHomP ๐‘…)
7 mhpmulcl.i . . . . . . . . 9 (๐œ‘ โ†’ ๐ผ โˆˆ ๐‘‰)
8 mhpmulcl.r . . . . . . . . 9 (๐œ‘ โ†’ ๐‘… โˆˆ Ring)
9 mhpmulcl.m . . . . . . . . 9 (๐œ‘ โ†’ ๐‘€ โˆˆ โ„•0)
10 mhpmulcl.p . . . . . . . . 9 (๐œ‘ โ†’ ๐‘ƒ โˆˆ (๐ปโ€˜๐‘€))
116, 1, 2, 7, 8, 9, 10mhpmpl 21678 . . . . . . . 8 (๐œ‘ โ†’ ๐‘ƒ โˆˆ (Baseโ€˜๐‘Œ))
12 mhpmulcl.n . . . . . . . . 9 (๐œ‘ โ†’ ๐‘ โˆˆ โ„•0)
13 mhpmulcl.q . . . . . . . . 9 (๐œ‘ โ†’ ๐‘„ โˆˆ (๐ปโ€˜๐‘))
146, 1, 2, 7, 8, 12, 13mhpmpl 21678 . . . . . . . 8 (๐œ‘ โ†’ ๐‘„ โˆˆ (Baseโ€˜๐‘Œ))
151, 2, 3, 4, 5, 11, 14mplmul 21561 . . . . . . 7 (๐œ‘ โ†’ (๐‘ƒ ยท ๐‘„) = (๐‘‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โ†ฆ (๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘‘} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘‘ โˆ˜f โˆ’ ๐‘’)))))))
1615adantr 481 . . . . . 6 ((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โ†’ (๐‘ƒ ยท ๐‘„) = (๐‘‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โ†ฆ (๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘‘} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘‘ โˆ˜f โˆ’ ๐‘’)))))))
17 breq2 5151 . . . . . . . . . 10 (๐‘‘ = ๐‘ฅ โ†’ (๐‘ โˆ˜r โ‰ค ๐‘‘ โ†” ๐‘ โˆ˜r โ‰ค ๐‘ฅ))
1817rabbidv 3440 . . . . . . . . 9 (๐‘‘ = ๐‘ฅ โ†’ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘‘} = {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ})
19 fvoveq1 7428 . . . . . . . . . 10 (๐‘‘ = ๐‘ฅ โ†’ (๐‘„โ€˜(๐‘‘ โˆ˜f โˆ’ ๐‘’)) = (๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’)))
2019oveq2d 7421 . . . . . . . . 9 (๐‘‘ = ๐‘ฅ โ†’ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘‘ โˆ˜f โˆ’ ๐‘’))) = ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))))
2118, 20mpteq12dv 5238 . . . . . . . 8 (๐‘‘ = ๐‘ฅ โ†’ (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘‘} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘‘ โˆ˜f โˆ’ ๐‘’)))) = (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’)))))
2221oveq2d 7421 . . . . . . 7 (๐‘‘ = ๐‘ฅ โ†’ (๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘‘} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘‘ โˆ˜f โˆ’ ๐‘’))))) = (๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))))))
2322adantl 482 . . . . . 6 (((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ๐‘‘ = ๐‘ฅ) โ†’ (๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘‘} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘‘ โˆ˜f โˆ’ ๐‘’))))) = (๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))))))
24 simpr 485 . . . . . 6 ((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โ†’ ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin})
25 ovexd 7440 . . . . . 6 ((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โ†’ (๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))))) โˆˆ V)
2616, 23, 24, 25fvmptd 7002 . . . . 5 ((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โ†’ ((๐‘ƒ ยท ๐‘„)โ€˜๐‘ฅ) = (๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))))))
2726neeq1d 3000 . . . 4 ((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โ†’ (((๐‘ƒ ยท ๐‘„)โ€˜๐‘ฅ) โ‰  (0gโ€˜๐‘…) โ†” (๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))))) โ‰  (0gโ€˜๐‘…)))
28 simp-4l 781 . . . . . . . . . . . . 13 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ ๐œ‘)
29 oveq2 7413 . . . . . . . . . . . . . . . . 17 (๐‘ = ๐‘’ โ†’ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’))
3029eqeq1d 2734 . . . . . . . . . . . . . . . 16 (๐‘ = ๐‘’ โ†’ (((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘€ โ†” ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) = ๐‘€))
3130necon3bbid 2978 . . . . . . . . . . . . . . 15 (๐‘ = ๐‘’ โ†’ (ยฌ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘€ โ†” ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€))
32 simplr 767 . . . . . . . . . . . . . . . 16 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ})
33 elrabi 3676 . . . . . . . . . . . . . . . 16 (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†’ ๐‘’ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin})
3432, 33syl 17 . . . . . . . . . . . . . . 15 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ ๐‘’ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin})
35 simpr 485 . . . . . . . . . . . . . . 15 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€)
3631, 34, 35elrabd 3684 . . . . . . . . . . . . . 14 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ยฌ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘€})
37 notrab 4310 . . . . . . . . . . . . . 14 ({โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆ– {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘€}) = {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ยฌ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘€}
3836, 37eleqtrrdi 2844 . . . . . . . . . . . . 13 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ ๐‘’ โˆˆ ({โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆ– {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘€}))
39 eqid 2732 . . . . . . . . . . . . . . 15 (Baseโ€˜๐‘…) = (Baseโ€˜๐‘…)
401, 39, 2, 5, 11mplelf 21548 . . . . . . . . . . . . . 14 (๐œ‘ โ†’ ๐‘ƒ:{โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}โŸถ(Baseโ€˜๐‘…))
41 eqid 2732 . . . . . . . . . . . . . . 15 (0gโ€˜๐‘…) = (0gโ€˜๐‘…)
426, 41, 5, 7, 8, 9, 10mhpdeg 21679 . . . . . . . . . . . . . 14 (๐œ‘ โ†’ (๐‘ƒ supp (0gโ€˜๐‘…)) โŠ† {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘€})
43 ovex 7438 . . . . . . . . . . . . . . . 16 (โ„•0 โ†‘m ๐ผ) โˆˆ V
4443rabex 5331 . . . . . . . . . . . . . . 15 {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆˆ V
4544a1i 11 . . . . . . . . . . . . . 14 (๐œ‘ โ†’ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆˆ V)
46 fvexd 6903 . . . . . . . . . . . . . 14 (๐œ‘ โ†’ (0gโ€˜๐‘…) โˆˆ V)
4740, 42, 45, 46suppssr 8177 . . . . . . . . . . . . 13 ((๐œ‘ โˆง ๐‘’ โˆˆ ({โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆ– {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘€})) โ†’ (๐‘ƒโ€˜๐‘’) = (0gโ€˜๐‘…))
4828, 38, 47syl2anc 584 . . . . . . . . . . . 12 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ (๐‘ƒโ€˜๐‘’) = (0gโ€˜๐‘…))
4948oveq1d 7420 . . . . . . . . . . 11 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))) = ((0gโ€˜๐‘…)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))))
508ad4antr 730 . . . . . . . . . . . 12 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ ๐‘… โˆˆ Ring)
5114ad4antr 730 . . . . . . . . . . . . . 14 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ ๐‘„ โˆˆ (Baseโ€˜๐‘Œ))
521, 39, 2, 5, 51mplelf 21548 . . . . . . . . . . . . 13 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ ๐‘„:{โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}โŸถ(Baseโ€˜๐‘…))
53 simp-4r 782 . . . . . . . . . . . . . . 15 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin})
54 eqid 2732 . . . . . . . . . . . . . . . 16 {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} = {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}
555, 54psrbagconcl 21478 . . . . . . . . . . . . . . 15 ((๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐‘ฅ โˆ˜f โˆ’ ๐‘’) โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ})
5653, 32, 55syl2anc 584 . . . . . . . . . . . . . 14 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ (๐‘ฅ โˆ˜f โˆ’ ๐‘’) โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ})
57 elrabi 3676 . . . . . . . . . . . . . 14 ((๐‘ฅ โˆ˜f โˆ’ ๐‘’) โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†’ (๐‘ฅ โˆ˜f โˆ’ ๐‘’) โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin})
5856, 57syl 17 . . . . . . . . . . . . 13 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ (๐‘ฅ โˆ˜f โˆ’ ๐‘’) โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin})
5952, 58ffvelcdmd 7084 . . . . . . . . . . . 12 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ (๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โˆˆ (Baseโ€˜๐‘…))
6039, 3, 41ringlz 20100 . . . . . . . . . . . 12 ((๐‘… โˆˆ Ring โˆง (๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โˆˆ (Baseโ€˜๐‘…)) โ†’ ((0gโ€˜๐‘…)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))) = (0gโ€˜๐‘…))
6150, 59, 60syl2anc 584 . . . . . . . . . . 11 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ ((0gโ€˜๐‘…)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))) = (0gโ€˜๐‘…))
6249, 61eqtrd 2772 . . . . . . . . . 10 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€) โ†’ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))) = (0gโ€˜๐‘…))
63 simp-4l 781 . . . . . . . . . . . . 13 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ ๐œ‘)
64 oveq2 7413 . . . . . . . . . . . . . . . . 17 (๐‘ = (๐‘ฅ โˆ˜f โˆ’ ๐‘’) โ†’ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)))
6564eqeq1d 2734 . . . . . . . . . . . . . . . 16 (๐‘ = (๐‘ฅ โˆ˜f โˆ’ ๐‘’) โ†’ (((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘ โ†” ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) = ๐‘))
6665necon3bbid 2978 . . . . . . . . . . . . . . 15 (๐‘ = (๐‘ฅ โˆ˜f โˆ’ ๐‘’) โ†’ (ยฌ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘ โ†” ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘))
67 simp-4r 782 . . . . . . . . . . . . . . . . 17 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin})
68 simplr 767 . . . . . . . . . . . . . . . . 17 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ})
6967, 68, 55syl2anc 584 . . . . . . . . . . . . . . . 16 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ (๐‘ฅ โˆ˜f โˆ’ ๐‘’) โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ})
7069, 57syl 17 . . . . . . . . . . . . . . 15 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ (๐‘ฅ โˆ˜f โˆ’ ๐‘’) โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin})
71 simpr 485 . . . . . . . . . . . . . . 15 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘)
7266, 70, 71elrabd 3684 . . . . . . . . . . . . . 14 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ (๐‘ฅ โˆ˜f โˆ’ ๐‘’) โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ยฌ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘})
73 notrab 4310 . . . . . . . . . . . . . 14 ({โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆ– {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘}) = {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ยฌ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘}
7472, 73eleqtrrdi 2844 . . . . . . . . . . . . 13 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ (๐‘ฅ โˆ˜f โˆ’ ๐‘’) โˆˆ ({โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆ– {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘}))
751, 39, 2, 5, 14mplelf 21548 . . . . . . . . . . . . . 14 (๐œ‘ โ†’ ๐‘„:{โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}โŸถ(Baseโ€˜๐‘…))
766, 41, 5, 7, 8, 12, 13mhpdeg 21679 . . . . . . . . . . . . . 14 (๐œ‘ โ†’ (๐‘„ supp (0gโ€˜๐‘…)) โŠ† {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘})
7775, 76, 45, 46suppssr 8177 . . . . . . . . . . . . 13 ((๐œ‘ โˆง (๐‘ฅ โˆ˜f โˆ’ ๐‘’) โˆˆ ({โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆ– {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘) = ๐‘})) โ†’ (๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’)) = (0gโ€˜๐‘…))
7863, 74, 77syl2anc 584 . . . . . . . . . . . 12 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ (๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’)) = (0gโ€˜๐‘…))
7978oveq2d 7421 . . . . . . . . . . 11 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))) = ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(0gโ€˜๐‘…)))
808ad4antr 730 . . . . . . . . . . . 12 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ ๐‘… โˆˆ Ring)
8111ad4antr 730 . . . . . . . . . . . . . 14 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ ๐‘ƒ โˆˆ (Baseโ€˜๐‘Œ))
821, 39, 2, 5, 81mplelf 21548 . . . . . . . . . . . . 13 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ ๐‘ƒ:{โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}โŸถ(Baseโ€˜๐‘…))
8333adantl 482 . . . . . . . . . . . . . 14 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ๐‘’ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin})
8483adantr 481 . . . . . . . . . . . . 13 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ ๐‘’ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin})
8582, 84ffvelcdmd 7084 . . . . . . . . . . . 12 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ (๐‘ƒโ€˜๐‘’) โˆˆ (Baseโ€˜๐‘…))
8639, 3, 41ringrz 20101 . . . . . . . . . . . 12 ((๐‘… โˆˆ Ring โˆง (๐‘ƒโ€˜๐‘’) โˆˆ (Baseโ€˜๐‘…)) โ†’ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(0gโ€˜๐‘…)) = (0gโ€˜๐‘…))
8780, 85, 86syl2anc 584 . . . . . . . . . . 11 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(0gโ€˜๐‘…)) = (0gโ€˜๐‘…))
8879, 87eqtrd 2772 . . . . . . . . . 10 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†’ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))) = (0gโ€˜๐‘…))
89 nn0subm 20992 . . . . . . . . . . . . . . . 16 โ„•0 โˆˆ (SubMndโ€˜โ„‚fld)
90 eqid 2732 . . . . . . . . . . . . . . . . 17 (โ„‚fld โ†พs โ„•0) = (โ„‚fld โ†พs โ„•0)
9190submbas 18691 . . . . . . . . . . . . . . . 16 (โ„•0 โˆˆ (SubMndโ€˜โ„‚fld) โ†’ โ„•0 = (Baseโ€˜(โ„‚fld โ†พs โ„•0)))
9289, 91ax-mp 5 . . . . . . . . . . . . . . 15 โ„•0 = (Baseโ€˜(โ„‚fld โ†พs โ„•0))
93 cnfld0 20961 . . . . . . . . . . . . . . . . 17 0 = (0gโ€˜โ„‚fld)
9490, 93subm0 18692 . . . . . . . . . . . . . . . 16 (โ„•0 โˆˆ (SubMndโ€˜โ„‚fld) โ†’ 0 = (0gโ€˜(โ„‚fld โ†พs โ„•0)))
9589, 94ax-mp 5 . . . . . . . . . . . . . . 15 0 = (0gโ€˜(โ„‚fld โ†พs โ„•0))
96 nn0ex 12474 . . . . . . . . . . . . . . . 16 โ„•0 โˆˆ V
97 cnfldadd 20941 . . . . . . . . . . . . . . . . 17 + = (+gโ€˜โ„‚fld)
9890, 97ressplusg 17231 . . . . . . . . . . . . . . . 16 (โ„•0 โˆˆ V โ†’ + = (+gโ€˜(โ„‚fld โ†พs โ„•0)))
9996, 98ax-mp 5 . . . . . . . . . . . . . . 15 + = (+gโ€˜(โ„‚fld โ†พs โ„•0))
100 cnring 20959 . . . . . . . . . . . . . . . . . 18 โ„‚fld โˆˆ Ring
101 ringcmn 20092 . . . . . . . . . . . . . . . . . 18 (โ„‚fld โˆˆ Ring โ†’ โ„‚fld โˆˆ CMnd)
102100, 101ax-mp 5 . . . . . . . . . . . . . . . . 17 โ„‚fld โˆˆ CMnd
10390submcmn 19700 . . . . . . . . . . . . . . . . 17 ((โ„‚fld โˆˆ CMnd โˆง โ„•0 โˆˆ (SubMndโ€˜โ„‚fld)) โ†’ (โ„‚fld โ†พs โ„•0) โˆˆ CMnd)
104102, 89, 103mp2an 690 . . . . . . . . . . . . . . . 16 (โ„‚fld โ†พs โ„•0) โˆˆ CMnd
105104a1i 11 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (โ„‚fld โ†พs โ„•0) โˆˆ CMnd)
1067ad3antrrr 728 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ๐ผ โˆˆ ๐‘‰)
1075psrbagf 21462 . . . . . . . . . . . . . . . 16 (๐‘’ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โ†’ ๐‘’:๐ผโŸถโ„•0)
10883, 107syl 17 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ๐‘’:๐ผโŸถโ„•0)
109 simpllr 774 . . . . . . . . . . . . . . . . . . 19 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin})
1105psrbagf 21462 . . . . . . . . . . . . . . . . . . 19 (๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โ†’ ๐‘ฅ:๐ผโŸถโ„•0)
111109, 110syl 17 . . . . . . . . . . . . . . . . . 18 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ๐‘ฅ:๐ผโŸถโ„•0)
112111ffnd 6715 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ๐‘ฅ Fn ๐ผ)
113108ffnd 6715 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ๐‘’ Fn ๐ผ)
114 inidm 4217 . . . . . . . . . . . . . . . . 17 (๐ผ โˆฉ ๐ผ) = ๐ผ
115 eqidd 2733 . . . . . . . . . . . . . . . . 17 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘– โˆˆ ๐ผ) โ†’ (๐‘ฅโ€˜๐‘–) = (๐‘ฅโ€˜๐‘–))
116 eqidd 2733 . . . . . . . . . . . . . . . . 17 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘– โˆˆ ๐ผ) โ†’ (๐‘’โ€˜๐‘–) = (๐‘’โ€˜๐‘–))
117112, 113, 106, 106, 114, 115, 116offval 7675 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐‘ฅ โˆ˜f โˆ’ ๐‘’) = (๐‘– โˆˆ ๐ผ โ†ฆ ((๐‘ฅโ€˜๐‘–) โˆ’ (๐‘’โ€˜๐‘–))))
118 simpl 483 . . . . . . . . . . . . . . . . . 18 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘– โˆˆ ๐ผ) โ†’ (((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}))
119 simplr 767 . . . . . . . . . . . . . . . . . . 19 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘– โˆˆ ๐ผ) โ†’ ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ})
120 breq1 5150 . . . . . . . . . . . . . . . . . . . . 21 (๐‘ = ๐‘’ โ†’ (๐‘ โˆ˜r โ‰ค ๐‘ฅ โ†” ๐‘’ โˆ˜r โ‰ค ๐‘ฅ))
121120elrab 3682 . . . . . . . . . . . . . . . . . . . 20 (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†” (๐‘’ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆง ๐‘’ โˆ˜r โ‰ค ๐‘ฅ))
122121simprbi 497 . . . . . . . . . . . . . . . . . . 19 (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†’ ๐‘’ โˆ˜r โ‰ค ๐‘ฅ)
123119, 122syl 17 . . . . . . . . . . . . . . . . . 18 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘– โˆˆ ๐ผ) โ†’ ๐‘’ โˆ˜r โ‰ค ๐‘ฅ)
124 simpr 485 . . . . . . . . . . . . . . . . . 18 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘– โˆˆ ๐ผ) โ†’ ๐‘– โˆˆ ๐ผ)
125113, 112, 106, 106, 114, 116, 115ofrval 7678 . . . . . . . . . . . . . . . . . 18 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘’ โˆ˜r โ‰ค ๐‘ฅ โˆง ๐‘– โˆˆ ๐ผ) โ†’ (๐‘’โ€˜๐‘–) โ‰ค (๐‘ฅโ€˜๐‘–))
126118, 123, 124, 125syl3anc 1371 . . . . . . . . . . . . . . . . 17 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘– โˆˆ ๐ผ) โ†’ (๐‘’โ€˜๐‘–) โ‰ค (๐‘ฅโ€˜๐‘–))
127108ffvelcdmda 7083 . . . . . . . . . . . . . . . . . 18 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘– โˆˆ ๐ผ) โ†’ (๐‘’โ€˜๐‘–) โˆˆ โ„•0)
128111ffvelcdmda 7083 . . . . . . . . . . . . . . . . . 18 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘– โˆˆ ๐ผ) โ†’ (๐‘ฅโ€˜๐‘–) โˆˆ โ„•0)
129 nn0sub 12518 . . . . . . . . . . . . . . . . . 18 (((๐‘’โ€˜๐‘–) โˆˆ โ„•0 โˆง (๐‘ฅโ€˜๐‘–) โˆˆ โ„•0) โ†’ ((๐‘’โ€˜๐‘–) โ‰ค (๐‘ฅโ€˜๐‘–) โ†” ((๐‘ฅโ€˜๐‘–) โˆ’ (๐‘’โ€˜๐‘–)) โˆˆ โ„•0))
130127, 128, 129syl2anc 584 . . . . . . . . . . . . . . . . 17 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘– โˆˆ ๐ผ) โ†’ ((๐‘’โ€˜๐‘–) โ‰ค (๐‘ฅโ€˜๐‘–) โ†” ((๐‘ฅโ€˜๐‘–) โˆ’ (๐‘’โ€˜๐‘–)) โˆˆ โ„•0))
131126, 130mpbid 231 . . . . . . . . . . . . . . . 16 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘– โˆˆ ๐ผ) โ†’ ((๐‘ฅโ€˜๐‘–) โˆ’ (๐‘’โ€˜๐‘–)) โˆˆ โ„•0)
132117, 131fmpt3d 7112 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐‘ฅ โˆ˜f โˆ’ ๐‘’):๐ผโŸถโ„•0)
133108ffund 6718 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ Fun ๐‘’)
134 c0ex 11204 . . . . . . . . . . . . . . . . . . . 20 0 โˆˆ V
135106, 134jctir 521 . . . . . . . . . . . . . . . . . . 19 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐ผ โˆˆ ๐‘‰ โˆง 0 โˆˆ V))
136 fsuppeq 8156 . . . . . . . . . . . . . . . . . . 19 ((๐ผ โˆˆ ๐‘‰ โˆง 0 โˆˆ V) โ†’ (๐‘’:๐ผโŸถโ„•0 โ†’ (๐‘’ supp 0) = (โ—ก๐‘’ โ€œ (โ„•0 โˆ– {0}))))
137135, 108, 136sylc 65 . . . . . . . . . . . . . . . . . 18 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐‘’ supp 0) = (โ—ก๐‘’ โ€œ (โ„•0 โˆ– {0})))
138 dfn2 12481 . . . . . . . . . . . . . . . . . . 19 โ„• = (โ„•0 โˆ– {0})
139138imaeq2i 6055 . . . . . . . . . . . . . . . . . 18 (โ—ก๐‘’ โ€œ โ„•) = (โ—ก๐‘’ โ€œ (โ„•0 โˆ– {0}))
140137, 139eqtr4di 2790 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐‘’ supp 0) = (โ—ก๐‘’ โ€œ โ„•))
1415psrbag 21461 . . . . . . . . . . . . . . . . . . . 20 (๐ผ โˆˆ ๐‘‰ โ†’ (๐‘’ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โ†” (๐‘’:๐ผโŸถโ„•0 โˆง (โ—ก๐‘’ โ€œ โ„•) โˆˆ Fin)))
142106, 141syl 17 . . . . . . . . . . . . . . . . . . 19 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐‘’ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โ†” (๐‘’:๐ผโŸถโ„•0 โˆง (โ—ก๐‘’ โ€œ โ„•) โˆˆ Fin)))
14383, 142mpbid 231 . . . . . . . . . . . . . . . . . 18 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐‘’:๐ผโŸถโ„•0 โˆง (โ—ก๐‘’ โ€œ โ„•) โˆˆ Fin))
144143simprd 496 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (โ—ก๐‘’ โ€œ โ„•) โˆˆ Fin)
145140, 144eqeltrd 2833 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐‘’ supp 0) โˆˆ Fin)
14683elexd 3494 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ๐‘’ โˆˆ V)
147 isfsupp 9361 . . . . . . . . . . . . . . . . 17 ((๐‘’ โˆˆ V โˆง 0 โˆˆ V) โ†’ (๐‘’ finSupp 0 โ†” (Fun ๐‘’ โˆง (๐‘’ supp 0) โˆˆ Fin)))
148146, 134, 147sylancl 586 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐‘’ finSupp 0 โ†” (Fun ๐‘’ โˆง (๐‘’ supp 0) โˆˆ Fin)))
149133, 145, 148mpbir2and 711 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ๐‘’ finSupp 0)
150112, 113, 106, 106offun 7680 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ Fun (๐‘ฅ โˆ˜f โˆ’ ๐‘’))
1515psrbagfsupp 21464 . . . . . . . . . . . . . . . . . . 19 (๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โ†’ ๐‘ฅ finSupp 0)
152109, 151syl 17 . . . . . . . . . . . . . . . . . 18 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ๐‘ฅ finSupp 0)
153152, 149fsuppunfi 9379 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ((๐‘ฅ supp 0) โˆช (๐‘’ supp 0)) โˆˆ Fin)
154 0nn0 12483 . . . . . . . . . . . . . . . . . . 19 0 โˆˆ โ„•0
155154a1i 11 . . . . . . . . . . . . . . . . . 18 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ 0 โˆˆ โ„•0)
156 0m0e0 12328 . . . . . . . . . . . . . . . . . . 19 (0 โˆ’ 0) = 0
157156a1i 11 . . . . . . . . . . . . . . . . . 18 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (0 โˆ’ 0) = 0)
158106, 155, 111, 108, 157suppofssd 8184 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ((๐‘ฅ โˆ˜f โˆ’ ๐‘’) supp 0) โŠ† ((๐‘ฅ supp 0) โˆช (๐‘’ supp 0)))
159153, 158ssfid 9263 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ((๐‘ฅ โˆ˜f โˆ’ ๐‘’) supp 0) โˆˆ Fin)
160 ovexd 7440 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐‘ฅ โˆ˜f โˆ’ ๐‘’) โˆˆ V)
161 isfsupp 9361 . . . . . . . . . . . . . . . . 17 (((๐‘ฅ โˆ˜f โˆ’ ๐‘’) โˆˆ V โˆง 0 โˆˆ V) โ†’ ((๐‘ฅ โˆ˜f โˆ’ ๐‘’) finSupp 0 โ†” (Fun (๐‘ฅ โˆ˜f โˆ’ ๐‘’) โˆง ((๐‘ฅ โˆ˜f โˆ’ ๐‘’) supp 0) โˆˆ Fin)))
162160, 134, 161sylancl 586 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ((๐‘ฅ โˆ˜f โˆ’ ๐‘’) finSupp 0 โ†” (Fun (๐‘ฅ โˆ˜f โˆ’ ๐‘’) โˆง ((๐‘ฅ โˆ˜f โˆ’ ๐‘’) supp 0) โˆˆ Fin)))
163150, 159, 162mpbir2and 711 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐‘ฅ โˆ˜f โˆ’ ๐‘’) finSupp 0)
16492, 95, 99, 105, 106, 108, 132, 149, 163gsumadd 19785 . . . . . . . . . . . . . 14 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘’ โˆ˜f + (๐‘ฅ โˆ˜f โˆ’ ๐‘’))) = (((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) + ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’))))
165108ffvelcdmda 7083 . . . . . . . . . . . . . . . . . . 19 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘ โˆˆ ๐ผ) โ†’ (๐‘’โ€˜๐‘) โˆˆ โ„•0)
166165nn0cnd 12530 . . . . . . . . . . . . . . . . . 18 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘ โˆˆ ๐ผ) โ†’ (๐‘’โ€˜๐‘) โˆˆ โ„‚)
167111ffvelcdmda 7083 . . . . . . . . . . . . . . . . . . 19 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘ โˆˆ ๐ผ) โ†’ (๐‘ฅโ€˜๐‘) โˆˆ โ„•0)
168167nn0cnd 12530 . . . . . . . . . . . . . . . . . 18 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘ โˆˆ ๐ผ) โ†’ (๐‘ฅโ€˜๐‘) โˆˆ โ„‚)
169166, 168pncan3d 11570 . . . . . . . . . . . . . . . . 17 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘ โˆˆ ๐ผ) โ†’ ((๐‘’โ€˜๐‘) + ((๐‘ฅโ€˜๐‘) โˆ’ (๐‘’โ€˜๐‘))) = (๐‘ฅโ€˜๐‘))
170169mpteq2dva 5247 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐‘ โˆˆ ๐ผ โ†ฆ ((๐‘’โ€˜๐‘) + ((๐‘ฅโ€˜๐‘) โˆ’ (๐‘’โ€˜๐‘)))) = (๐‘ โˆˆ ๐ผ โ†ฆ (๐‘ฅโ€˜๐‘)))
171 fvexd 6903 . . . . . . . . . . . . . . . . 17 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘ โˆˆ ๐ผ) โ†’ (๐‘’โ€˜๐‘) โˆˆ V)
172 ovexd 7440 . . . . . . . . . . . . . . . . 17 (((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โˆง ๐‘ โˆˆ ๐ผ) โ†’ ((๐‘ฅโ€˜๐‘) โˆ’ (๐‘’โ€˜๐‘)) โˆˆ V)
173108feqmptd 6957 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ๐‘’ = (๐‘ โˆˆ ๐ผ โ†ฆ (๐‘’โ€˜๐‘)))
174111feqmptd 6957 . . . . . . . . . . . . . . . . . 18 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ๐‘ฅ = (๐‘ โˆˆ ๐ผ โ†ฆ (๐‘ฅโ€˜๐‘)))
175106, 167, 165, 174, 173offval2 7686 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐‘ฅ โˆ˜f โˆ’ ๐‘’) = (๐‘ โˆˆ ๐ผ โ†ฆ ((๐‘ฅโ€˜๐‘) โˆ’ (๐‘’โ€˜๐‘))))
176106, 171, 172, 173, 175offval2 7686 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐‘’ โˆ˜f + (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) = (๐‘ โˆˆ ๐ผ โ†ฆ ((๐‘’โ€˜๐‘) + ((๐‘ฅโ€˜๐‘) โˆ’ (๐‘’โ€˜๐‘)))))
177170, 176, 1743eqtr4d 2782 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (๐‘’ โˆ˜f + (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) = ๐‘ฅ)
178177oveq2d 7421 . . . . . . . . . . . . . 14 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘’ โˆ˜f + (๐‘ฅ โˆ˜f โˆ’ ๐‘’))) = ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ))
179164, 178eqtr3d 2774 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) + ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’))) = ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ))
180 simplr 767 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘))
181179, 180eqnetrd 3008 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) + ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’))) โ‰  (๐‘€ + ๐‘))
182 oveq12 7414 . . . . . . . . . . . . . 14 ((((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) = ๐‘€ โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) = ๐‘) โ†’ (((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) + ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’))) = (๐‘€ + ๐‘))
183182a1i 11 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ((((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) = ๐‘€ โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) = ๐‘) โ†’ (((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) + ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’))) = (๐‘€ + ๐‘)))
184183necon3ad 2953 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ((((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) + ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’))) โ‰  (๐‘€ + ๐‘) โ†’ ยฌ (((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) = ๐‘€ โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) = ๐‘)))
185181, 184mpd 15 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ยฌ (((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) = ๐‘€ โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) = ๐‘))
186 neorian 3037 . . . . . . . . . . 11 ((((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€ โˆจ ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘) โ†” ยฌ (((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) = ๐‘€ โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) = ๐‘))
187185, 186sylibr 233 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ (((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘’) โ‰  ๐‘€ โˆจ ((โ„‚fld โ†พs โ„•0) ฮฃg (๐‘ฅ โˆ˜f โˆ’ ๐‘’)) โ‰  ๐‘))
18862, 88, 187mpjaodan 957 . . . . . . . . 9 ((((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โˆง ๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ}) โ†’ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))) = (0gโ€˜๐‘…))
189188mpteq2dva 5247 . . . . . . . 8 (((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โ†’ (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’)))) = (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†ฆ (0gโ€˜๐‘…)))
190189oveq2d 7421 . . . . . . 7 (((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โ†’ (๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))))) = (๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†ฆ (0gโ€˜๐‘…))))
191 ringmnd 20059 . . . . . . . . . 10 (๐‘… โˆˆ Ring โ†’ ๐‘… โˆˆ Mnd)
1928, 191syl 17 . . . . . . . . 9 (๐œ‘ โ†’ ๐‘… โˆˆ Mnd)
193192ad2antrr 724 . . . . . . . 8 (((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โ†’ ๐‘… โˆˆ Mnd)
19444rabex 5331 . . . . . . . 8 {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โˆˆ V
19541gsumz 18713 . . . . . . . 8 ((๐‘… โˆˆ Mnd โˆง {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โˆˆ V) โ†’ (๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†ฆ (0gโ€˜๐‘…))) = (0gโ€˜๐‘…))
196193, 194, 195sylancl 586 . . . . . . 7 (((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โ†’ (๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†ฆ (0gโ€˜๐‘…))) = (0gโ€˜๐‘…))
197190, 196eqtrd 2772 . . . . . 6 (((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โˆง ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘)) โ†’ (๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))))) = (0gโ€˜๐‘…))
198197ex 413 . . . . 5 ((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โ†’ (((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) โ‰  (๐‘€ + ๐‘) โ†’ (๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))))) = (0gโ€˜๐‘…)))
199198necon1d 2962 . . . 4 ((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โ†’ ((๐‘… ฮฃg (๐‘’ โˆˆ {๐‘ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} โˆฃ ๐‘ โˆ˜r โ‰ค ๐‘ฅ} โ†ฆ ((๐‘ƒโ€˜๐‘’)(.rโ€˜๐‘…)(๐‘„โ€˜(๐‘ฅ โˆ˜f โˆ’ ๐‘’))))) โ‰  (0gโ€˜๐‘…) โ†’ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) = (๐‘€ + ๐‘)))
20027, 199sylbid 239 . . 3 ((๐œ‘ โˆง ๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin}) โ†’ (((๐‘ƒ ยท ๐‘„)โ€˜๐‘ฅ) โ‰  (0gโ€˜๐‘…) โ†’ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) = (๐‘€ + ๐‘)))
201200ralrimiva 3146 . 2 (๐œ‘ โ†’ โˆ€๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} (((๐‘ƒ ยท ๐‘„)โ€˜๐‘ฅ) โ‰  (0gโ€˜๐‘…) โ†’ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) = (๐‘€ + ๐‘)))
2029, 12nn0addcld 12532 . . 3 (๐œ‘ โ†’ (๐‘€ + ๐‘) โˆˆ โ„•0)
2031mplring 21569 . . . . 5 ((๐ผ โˆˆ ๐‘‰ โˆง ๐‘… โˆˆ Ring) โ†’ ๐‘Œ โˆˆ Ring)
2047, 8, 203syl2anc 584 . . . 4 (๐œ‘ โ†’ ๐‘Œ โˆˆ Ring)
2052, 4ringcl 20066 . . . 4 ((๐‘Œ โˆˆ Ring โˆง ๐‘ƒ โˆˆ (Baseโ€˜๐‘Œ) โˆง ๐‘„ โˆˆ (Baseโ€˜๐‘Œ)) โ†’ (๐‘ƒ ยท ๐‘„) โˆˆ (Baseโ€˜๐‘Œ))
206204, 11, 14, 205syl3anc 1371 . . 3 (๐œ‘ โ†’ (๐‘ƒ ยท ๐‘„) โˆˆ (Baseโ€˜๐‘Œ))
2076, 1, 2, 41, 5, 7, 8, 202, 206ismhp3 21677 . 2 (๐œ‘ โ†’ ((๐‘ƒ ยท ๐‘„) โˆˆ (๐ปโ€˜(๐‘€ + ๐‘)) โ†” โˆ€๐‘ฅ โˆˆ {โ„Ž โˆˆ (โ„•0 โ†‘m ๐ผ) โˆฃ (โ—กโ„Ž โ€œ โ„•) โˆˆ Fin} (((๐‘ƒ ยท ๐‘„)โ€˜๐‘ฅ) โ‰  (0gโ€˜๐‘…) โ†’ ((โ„‚fld โ†พs โ„•0) ฮฃg ๐‘ฅ) = (๐‘€ + ๐‘))))
208201, 207mpbird 256 1 (๐œ‘ โ†’ (๐‘ƒ ยท ๐‘„) โˆˆ (๐ปโ€˜(๐‘€ + ๐‘)))
Colors of variables: wff setvar class
Syntax hints:  ยฌ wn 3   โ†’ wi 4   โ†” wb 205   โˆง wa 396   โˆจ wo 845   = wceq 1541   โˆˆ wcel 2106   โ‰  wne 2940  โˆ€wral 3061  {crab 3432  Vcvv 3474   โˆ– cdif 3944   โˆช cun 3945  {csn 4627   class class class wbr 5147   โ†ฆ cmpt 5230  โ—กccnv 5674   โ€œ cima 5678  Fun wfun 6534  โŸถwf 6536  โ€˜cfv 6540  (class class class)co 7405   โˆ˜f cof 7664   โˆ˜r cofr 7665   supp csupp 8142   โ†‘m cmap 8816  Fincfn 8935   finSupp cfsupp 9357  0cc0 11106   + caddc 11109   โ‰ค cle 11245   โˆ’ cmin 11440  โ„•cn 12208  โ„•0cn0 12468  Basecbs 17140   โ†พs cress 17169  +gcplusg 17193  .rcmulr 17194  0gc0g 17381   ฮฃg cgsu 17382  Mndcmnd 18621  SubMndcsubmnd 18666  CMndccmn 19642  Ringcrg 20049  โ„‚fldccnfld 20936   mPoly cmpl 21450   mHomP cmhp 21663
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2703  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7721  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 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3376  df-reu 3377  df-rab 3433  df-v 3476  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-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 7361  df-ov 7408  df-oprab 7409  df-mpo 7410  df-of 7666  df-ofr 7667  df-om 7852  df-1st 7971  df-2nd 7972  df-supp 8143  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-1o 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-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-z 12555  df-dec 12674  df-uz 12819  df-fz 13481  df-fzo 13624  df-seq 13963  df-hash 14287  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-grp 18818  df-minusg 18819  df-mulg 18945  df-subg 18997  df-ghm 19084  df-cntz 19175  df-cmn 19644  df-abl 19645  df-mgp 19982  df-ur 19999  df-ring 20051  df-cring 20052  df-subrg 20353  df-cnfld 20937  df-psr 21453  df-mpl 21455  df-mhp 21667
This theorem is referenced by:  mhppwdeg  21684
  Copyright terms: Public domain W3C validator