Users' Mathboxes Mathbox for Alexander van der Vekens < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  ply1mulgsum Structured version   Visualization version   GIF version

Theorem ply1mulgsum 47371
Description: The product of two polynomials expressed as group sum of scaled monomials. (Contributed by AV, 20-Oct-2019.)
Hypotheses
Ref Expression
ply1mulgsum.p 𝑃 = (Poly1β€˜π‘…)
ply1mulgsum.b 𝐡 = (Baseβ€˜π‘ƒ)
ply1mulgsum.a 𝐴 = (coe1β€˜πΎ)
ply1mulgsum.c 𝐢 = (coe1β€˜πΏ)
ply1mulgsum.x 𝑋 = (var1β€˜π‘…)
ply1mulgsum.pm Γ— = (.rβ€˜π‘ƒ)
ply1mulgsum.sm Β· = ( ·𝑠 β€˜π‘ƒ)
ply1mulgsum.rm βˆ— = (.rβ€˜π‘…)
ply1mulgsum.m 𝑀 = (mulGrpβ€˜π‘ƒ)
ply1mulgsum.e ↑ = (.gβ€˜π‘€)
Assertion
Ref Expression
ply1mulgsum ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ (𝐾 Γ— 𝐿) = (𝑃 Ξ£g (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋)))))
Distinct variable groups:   𝐴,𝑙   𝐡,𝑙   𝐢,𝑙   𝐾,𝑙   𝐿,𝑙   𝑅,𝑙   𝐴,π‘˜   𝐡,π‘˜   𝐢,π‘˜   π‘˜,𝐾   π‘˜,𝐿   𝑅,π‘˜   βˆ— ,π‘˜,𝑙   π‘˜,𝑋   ↑ ,π‘˜   Β· ,π‘˜   𝑃,π‘˜   βˆ— ,𝑙
Allowed substitution hints:   𝑃(𝑙)   Β· (𝑙)   Γ— (π‘˜,𝑙)   ↑ (𝑙)   𝑀(π‘˜,𝑙)   𝑋(𝑙)

Proof of Theorem ply1mulgsum
Dummy variables 𝑛 𝑖 π‘š are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 ply1mulgsum.p . . . . . . 7 𝑃 = (Poly1β€˜π‘…)
2 ply1mulgsum.pm . . . . . . 7 Γ— = (.rβ€˜π‘ƒ)
3 ply1mulgsum.rm . . . . . . 7 βˆ— = (.rβ€˜π‘…)
4 ply1mulgsum.b . . . . . . 7 𝐡 = (Baseβ€˜π‘ƒ)
51, 2, 3, 4coe1mul 22163 . . . . . 6 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ (coe1β€˜(𝐾 Γ— 𝐿)) = (π‘š ∈ β„•0 ↦ (𝑅 Ξ£g (𝑖 ∈ (0...π‘š) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(π‘š βˆ’ 𝑖)))))))
65adantr 480 . . . . 5 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) β†’ (coe1β€˜(𝐾 Γ— 𝐿)) = (π‘š ∈ β„•0 ↦ (𝑅 Ξ£g (𝑖 ∈ (0...π‘š) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(π‘š βˆ’ 𝑖)))))))
76fveq1d 6893 . . . 4 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) β†’ ((coe1β€˜(𝐾 Γ— 𝐿))β€˜π‘›) = ((π‘š ∈ β„•0 ↦ (𝑅 Ξ£g (𝑖 ∈ (0...π‘š) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(π‘š βˆ’ 𝑖))))))β€˜π‘›))
8 eqidd 2728 . . . . 5 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) β†’ (π‘š ∈ β„•0 ↦ (𝑅 Ξ£g (𝑖 ∈ (0...π‘š) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(π‘š βˆ’ 𝑖)))))) = (π‘š ∈ β„•0 ↦ (𝑅 Ξ£g (𝑖 ∈ (0...π‘š) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(π‘š βˆ’ 𝑖)))))))
9 oveq2 7422 . . . . . . . 8 (π‘š = 𝑛 β†’ (0...π‘š) = (0...𝑛))
10 fvoveq1 7437 . . . . . . . . 9 (π‘š = 𝑛 β†’ ((coe1β€˜πΏ)β€˜(π‘š βˆ’ 𝑖)) = ((coe1β€˜πΏ)β€˜(𝑛 βˆ’ 𝑖)))
1110oveq2d 7430 . . . . . . . 8 (π‘š = 𝑛 β†’ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(π‘š βˆ’ 𝑖))) = (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(𝑛 βˆ’ 𝑖))))
129, 11mpteq12dv 5233 . . . . . . 7 (π‘š = 𝑛 β†’ (𝑖 ∈ (0...π‘š) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(π‘š βˆ’ 𝑖)))) = (𝑖 ∈ (0...𝑛) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(𝑛 βˆ’ 𝑖)))))
1312oveq2d 7430 . . . . . 6 (π‘š = 𝑛 β†’ (𝑅 Ξ£g (𝑖 ∈ (0...π‘š) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(π‘š βˆ’ 𝑖))))) = (𝑅 Ξ£g (𝑖 ∈ (0...𝑛) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(𝑛 βˆ’ 𝑖))))))
1413adantl 481 . . . . 5 ((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) ∧ π‘š = 𝑛) β†’ (𝑅 Ξ£g (𝑖 ∈ (0...π‘š) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(π‘š βˆ’ 𝑖))))) = (𝑅 Ξ£g (𝑖 ∈ (0...𝑛) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(𝑛 βˆ’ 𝑖))))))
15 simpr 484 . . . . 5 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) β†’ 𝑛 ∈ β„•0)
16 ovexd 7449 . . . . 5 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) β†’ (𝑅 Ξ£g (𝑖 ∈ (0...𝑛) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(𝑛 βˆ’ 𝑖))))) ∈ V)
178, 14, 15, 16fvmptd 7006 . . . 4 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) β†’ ((π‘š ∈ β„•0 ↦ (𝑅 Ξ£g (𝑖 ∈ (0...π‘š) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(π‘š βˆ’ 𝑖))))))β€˜π‘›) = (𝑅 Ξ£g (𝑖 ∈ (0...𝑛) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(𝑛 βˆ’ 𝑖))))))
18 ply1mulgsum.x . . . . . 6 𝑋 = (var1β€˜π‘…)
19 ply1mulgsum.e . . . . . . 7 ↑ = (.gβ€˜π‘€)
20 ply1mulgsum.m . . . . . . . 8 𝑀 = (mulGrpβ€˜π‘ƒ)
2120fveq2i 6894 . . . . . . 7 (.gβ€˜π‘€) = (.gβ€˜(mulGrpβ€˜π‘ƒ))
2219, 21eqtri 2755 . . . . . 6 ↑ = (.gβ€˜(mulGrpβ€˜π‘ƒ))
23 simp1 1134 . . . . . . 7 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ 𝑅 ∈ Ring)
2423adantr 480 . . . . . 6 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) β†’ 𝑅 ∈ Ring)
25 eqid 2727 . . . . . 6 (Baseβ€˜π‘…) = (Baseβ€˜π‘…)
26 ply1mulgsum.sm . . . . . 6 Β· = ( ·𝑠 β€˜π‘ƒ)
27 eqid 2727 . . . . . 6 (0gβ€˜π‘…) = (0gβ€˜π‘…)
28 ringcmn 20200 . . . . . . . . . 10 (𝑅 ∈ Ring β†’ 𝑅 ∈ CMnd)
29283ad2ant1 1131 . . . . . . . . 9 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ 𝑅 ∈ CMnd)
3029ad2antrr 725 . . . . . . . 8 ((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) ∧ π‘˜ ∈ β„•0) β†’ 𝑅 ∈ CMnd)
31 fzfid 13956 . . . . . . . 8 ((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) ∧ π‘˜ ∈ β„•0) β†’ (0...π‘˜) ∈ Fin)
32 simpll1 1210 . . . . . . . . . . 11 ((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) ∧ π‘˜ ∈ β„•0) β†’ 𝑅 ∈ Ring)
3332adantr 480 . . . . . . . . . 10 (((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) ∧ π‘˜ ∈ β„•0) ∧ 𝑙 ∈ (0...π‘˜)) β†’ 𝑅 ∈ Ring)
34 simp2 1135 . . . . . . . . . . . 12 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ 𝐾 ∈ 𝐡)
3534ad2antrr 725 . . . . . . . . . . 11 ((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) ∧ π‘˜ ∈ β„•0) β†’ 𝐾 ∈ 𝐡)
36 elfznn0 13612 . . . . . . . . . . 11 (𝑙 ∈ (0...π‘˜) β†’ 𝑙 ∈ β„•0)
37 ply1mulgsum.a . . . . . . . . . . . 12 𝐴 = (coe1β€˜πΎ)
3837, 4, 1, 25coe1fvalcl 22105 . . . . . . . . . . 11 ((𝐾 ∈ 𝐡 ∧ 𝑙 ∈ β„•0) β†’ (π΄β€˜π‘™) ∈ (Baseβ€˜π‘…))
3935, 36, 38syl2an 595 . . . . . . . . . 10 (((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) ∧ π‘˜ ∈ β„•0) ∧ 𝑙 ∈ (0...π‘˜)) β†’ (π΄β€˜π‘™) ∈ (Baseβ€˜π‘…))
40 simp3 1136 . . . . . . . . . . . 12 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ 𝐿 ∈ 𝐡)
4140ad2antrr 725 . . . . . . . . . . 11 ((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) ∧ π‘˜ ∈ β„•0) β†’ 𝐿 ∈ 𝐡)
42 fznn0sub 13551 . . . . . . . . . . 11 (𝑙 ∈ (0...π‘˜) β†’ (π‘˜ βˆ’ 𝑙) ∈ β„•0)
43 ply1mulgsum.c . . . . . . . . . . . 12 𝐢 = (coe1β€˜πΏ)
4443, 4, 1, 25coe1fvalcl 22105 . . . . . . . . . . 11 ((𝐿 ∈ 𝐡 ∧ (π‘˜ βˆ’ 𝑙) ∈ β„•0) β†’ (πΆβ€˜(π‘˜ βˆ’ 𝑙)) ∈ (Baseβ€˜π‘…))
4541, 42, 44syl2an 595 . . . . . . . . . 10 (((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) ∧ π‘˜ ∈ β„•0) ∧ 𝑙 ∈ (0...π‘˜)) β†’ (πΆβ€˜(π‘˜ βˆ’ 𝑙)) ∈ (Baseβ€˜π‘…))
4625, 3ringcl 20174 . . . . . . . . . 10 ((𝑅 ∈ Ring ∧ (π΄β€˜π‘™) ∈ (Baseβ€˜π‘…) ∧ (πΆβ€˜(π‘˜ βˆ’ 𝑙)) ∈ (Baseβ€˜π‘…)) β†’ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))) ∈ (Baseβ€˜π‘…))
4733, 39, 45, 46syl3anc 1369 . . . . . . . . 9 (((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) ∧ π‘˜ ∈ β„•0) ∧ 𝑙 ∈ (0...π‘˜)) β†’ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))) ∈ (Baseβ€˜π‘…))
4847ralrimiva 3141 . . . . . . . 8 ((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) ∧ π‘˜ ∈ β„•0) β†’ βˆ€π‘™ ∈ (0...π‘˜)((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))) ∈ (Baseβ€˜π‘…))
4925, 30, 31, 48gsummptcl 19906 . . . . . . 7 ((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) ∧ π‘˜ ∈ β„•0) β†’ (𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) ∈ (Baseβ€˜π‘…))
5049ralrimiva 3141 . . . . . 6 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) β†’ βˆ€π‘˜ ∈ β„•0 (𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) ∈ (Baseβ€˜π‘…))
511, 4, 37, 43, 18, 2, 26, 3, 20, 19ply1mulgsumlem3 47369 . . . . . . 7 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ (π‘˜ ∈ β„•0 ↦ (𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙)))))) finSupp (0gβ€˜π‘…))
5251adantr 480 . . . . . 6 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) β†’ (π‘˜ ∈ β„•0 ↦ (𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙)))))) finSupp (0gβ€˜π‘…))
531, 4, 18, 22, 24, 25, 26, 27, 50, 52, 15gsummoncoe1 22201 . . . . 5 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) β†’ ((coe1β€˜(𝑃 Ξ£g (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋)))))β€˜π‘›) = ⦋𝑛 / π‘˜β¦Œ(𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))))
54 vex 3473 . . . . . 6 𝑛 ∈ V
55 csbov2g 7460 . . . . . . 7 (𝑛 ∈ V β†’ ⦋𝑛 / π‘˜β¦Œ(𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) = (𝑅 Ξ£g ⦋𝑛 / π‘˜β¦Œ(𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))))
56 id 22 . . . . . . . . 9 (𝑛 ∈ V β†’ 𝑛 ∈ V)
57 oveq2 7422 . . . . . . . . . . 11 (π‘˜ = 𝑛 β†’ (0...π‘˜) = (0...𝑛))
58 fvoveq1 7437 . . . . . . . . . . . 12 (π‘˜ = 𝑛 β†’ (πΆβ€˜(π‘˜ βˆ’ 𝑙)) = (πΆβ€˜(𝑛 βˆ’ 𝑙)))
5958oveq2d 7430 . . . . . . . . . . 11 (π‘˜ = 𝑛 β†’ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))) = ((π΄β€˜π‘™) βˆ— (πΆβ€˜(𝑛 βˆ’ 𝑙))))
6057, 59mpteq12dv 5233 . . . . . . . . . 10 (π‘˜ = 𝑛 β†’ (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙)))) = (𝑙 ∈ (0...𝑛) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(𝑛 βˆ’ 𝑙)))))
6160adantl 481 . . . . . . . . 9 ((𝑛 ∈ V ∧ π‘˜ = 𝑛) β†’ (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙)))) = (𝑙 ∈ (0...𝑛) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(𝑛 βˆ’ 𝑙)))))
6256, 61csbied 3927 . . . . . . . 8 (𝑛 ∈ V β†’ ⦋𝑛 / π‘˜β¦Œ(𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙)))) = (𝑙 ∈ (0...𝑛) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(𝑛 βˆ’ 𝑙)))))
6362oveq2d 7430 . . . . . . 7 (𝑛 ∈ V β†’ (𝑅 Ξ£g ⦋𝑛 / π‘˜β¦Œ(𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) = (𝑅 Ξ£g (𝑙 ∈ (0...𝑛) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(𝑛 βˆ’ 𝑙))))))
6455, 63eqtrd 2767 . . . . . 6 (𝑛 ∈ V β†’ ⦋𝑛 / π‘˜β¦Œ(𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) = (𝑅 Ξ£g (𝑙 ∈ (0...𝑛) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(𝑛 βˆ’ 𝑙))))))
6554, 64mp1i 13 . . . . 5 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) β†’ ⦋𝑛 / π‘˜β¦Œ(𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) = (𝑅 Ξ£g (𝑙 ∈ (0...𝑛) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(𝑛 βˆ’ 𝑙))))))
66 fveq2 6891 . . . . . . . . . 10 (𝑙 = 𝑖 β†’ (π΄β€˜π‘™) = (π΄β€˜π‘–))
6737fveq1i 6892 . . . . . . . . . 10 (π΄β€˜π‘–) = ((coe1β€˜πΎ)β€˜π‘–)
6866, 67eqtrdi 2783 . . . . . . . . 9 (𝑙 = 𝑖 β†’ (π΄β€˜π‘™) = ((coe1β€˜πΎ)β€˜π‘–))
69 oveq2 7422 . . . . . . . . . . 11 (𝑙 = 𝑖 β†’ (𝑛 βˆ’ 𝑙) = (𝑛 βˆ’ 𝑖))
7069fveq2d 6895 . . . . . . . . . 10 (𝑙 = 𝑖 β†’ (πΆβ€˜(𝑛 βˆ’ 𝑙)) = (πΆβ€˜(𝑛 βˆ’ 𝑖)))
7143fveq1i 6892 . . . . . . . . . 10 (πΆβ€˜(𝑛 βˆ’ 𝑖)) = ((coe1β€˜πΏ)β€˜(𝑛 βˆ’ 𝑖))
7270, 71eqtrdi 2783 . . . . . . . . 9 (𝑙 = 𝑖 β†’ (πΆβ€˜(𝑛 βˆ’ 𝑙)) = ((coe1β€˜πΏ)β€˜(𝑛 βˆ’ 𝑖)))
7368, 72oveq12d 7432 . . . . . . . 8 (𝑙 = 𝑖 β†’ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(𝑛 βˆ’ 𝑙))) = (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(𝑛 βˆ’ 𝑖))))
7473cbvmptv 5255 . . . . . . 7 (𝑙 ∈ (0...𝑛) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(𝑛 βˆ’ 𝑙)))) = (𝑖 ∈ (0...𝑛) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(𝑛 βˆ’ 𝑖))))
7574a1i 11 . . . . . 6 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) β†’ (𝑙 ∈ (0...𝑛) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(𝑛 βˆ’ 𝑙)))) = (𝑖 ∈ (0...𝑛) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(𝑛 βˆ’ 𝑖)))))
7675oveq2d 7430 . . . . 5 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) β†’ (𝑅 Ξ£g (𝑙 ∈ (0...𝑛) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(𝑛 βˆ’ 𝑙))))) = (𝑅 Ξ£g (𝑖 ∈ (0...𝑛) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(𝑛 βˆ’ 𝑖))))))
7753, 65, 763eqtrrd 2772 . . . 4 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) β†’ (𝑅 Ξ£g (𝑖 ∈ (0...𝑛) ↦ (((coe1β€˜πΎ)β€˜π‘–) βˆ— ((coe1β€˜πΏ)β€˜(𝑛 βˆ’ 𝑖))))) = ((coe1β€˜(𝑃 Ξ£g (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋)))))β€˜π‘›))
787, 17, 773eqtrd 2771 . . 3 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ 𝑛 ∈ β„•0) β†’ ((coe1β€˜(𝐾 Γ— 𝐿))β€˜π‘›) = ((coe1β€˜(𝑃 Ξ£g (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋)))))β€˜π‘›))
7978ralrimiva 3141 . 2 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ βˆ€π‘› ∈ β„•0 ((coe1β€˜(𝐾 Γ— 𝐿))β€˜π‘›) = ((coe1β€˜(𝑃 Ξ£g (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋)))))β€˜π‘›))
801ply1ring 22140 . . . 4 (𝑅 ∈ Ring β†’ 𝑃 ∈ Ring)
814, 2ringcl 20174 . . . 4 ((𝑃 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ (𝐾 Γ— 𝐿) ∈ 𝐡)
8280, 81syl3an1 1161 . . 3 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ (𝐾 Γ— 𝐿) ∈ 𝐡)
83 eqid 2727 . . . 4 (0gβ€˜π‘ƒ) = (0gβ€˜π‘ƒ)
84 ringcmn 20200 . . . . . 6 (𝑃 ∈ Ring β†’ 𝑃 ∈ CMnd)
8580, 84syl 17 . . . . 5 (𝑅 ∈ Ring β†’ 𝑃 ∈ CMnd)
86853ad2ant1 1131 . . . 4 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ 𝑃 ∈ CMnd)
87 nn0ex 12494 . . . . 5 β„•0 ∈ V
8887a1i 11 . . . 4 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ β„•0 ∈ V)
891ply1lmod 22144 . . . . . . . 8 (𝑅 ∈ Ring β†’ 𝑃 ∈ LMod)
90893ad2ant1 1131 . . . . . . 7 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ 𝑃 ∈ LMod)
9190adantr 480 . . . . . 6 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ 𝑃 ∈ LMod)
9229adantr 480 . . . . . . . 8 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ 𝑅 ∈ CMnd)
93 fzfid 13956 . . . . . . . 8 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ (0...π‘˜) ∈ Fin)
94 simpll1 1210 . . . . . . . . . 10 ((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) ∧ 𝑙 ∈ (0...π‘˜)) β†’ 𝑅 ∈ Ring)
9534adantr 480 . . . . . . . . . . 11 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ 𝐾 ∈ 𝐡)
9695, 36, 38syl2an 595 . . . . . . . . . 10 ((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) ∧ 𝑙 ∈ (0...π‘˜)) β†’ (π΄β€˜π‘™) ∈ (Baseβ€˜π‘…))
9740adantr 480 . . . . . . . . . . 11 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ 𝐿 ∈ 𝐡)
9897, 42, 44syl2an 595 . . . . . . . . . 10 ((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) ∧ 𝑙 ∈ (0...π‘˜)) β†’ (πΆβ€˜(π‘˜ βˆ’ 𝑙)) ∈ (Baseβ€˜π‘…))
9994, 96, 98, 46syl3anc 1369 . . . . . . . . 9 ((((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) ∧ 𝑙 ∈ (0...π‘˜)) β†’ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))) ∈ (Baseβ€˜π‘…))
10099ralrimiva 3141 . . . . . . . 8 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ βˆ€π‘™ ∈ (0...π‘˜)((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))) ∈ (Baseβ€˜π‘…))
10125, 92, 93, 100gsummptcl 19906 . . . . . . 7 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ (𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) ∈ (Baseβ€˜π‘…))
10223adantr 480 . . . . . . . . 9 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ 𝑅 ∈ Ring)
1031ply1sca 22145 . . . . . . . . 9 (𝑅 ∈ Ring β†’ 𝑅 = (Scalarβ€˜π‘ƒ))
104102, 103syl 17 . . . . . . . 8 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ 𝑅 = (Scalarβ€˜π‘ƒ))
105104fveq2d 6895 . . . . . . 7 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ (Baseβ€˜π‘…) = (Baseβ€˜(Scalarβ€˜π‘ƒ)))
106101, 105eleqtrd 2830 . . . . . 6 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ (𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) ∈ (Baseβ€˜(Scalarβ€˜π‘ƒ)))
10720, 4mgpbas 20064 . . . . . . 7 𝐡 = (Baseβ€˜π‘€)
10820ringmgp 20163 . . . . . . . . . 10 (𝑃 ∈ Ring β†’ 𝑀 ∈ Mnd)
10980, 108syl 17 . . . . . . . . 9 (𝑅 ∈ Ring β†’ 𝑀 ∈ Mnd)
1101093ad2ant1 1131 . . . . . . . 8 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ 𝑀 ∈ Mnd)
111110adantr 480 . . . . . . 7 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ 𝑀 ∈ Mnd)
112 simpr 484 . . . . . . 7 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ π‘˜ ∈ β„•0)
11318, 1, 4vr1cl 22110 . . . . . . . . 9 (𝑅 ∈ Ring β†’ 𝑋 ∈ 𝐡)
1141133ad2ant1 1131 . . . . . . . 8 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ 𝑋 ∈ 𝐡)
115114adantr 480 . . . . . . 7 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ 𝑋 ∈ 𝐡)
116107, 19, 111, 112, 115mulgnn0cld 19034 . . . . . 6 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ (π‘˜ ↑ 𝑋) ∈ 𝐡)
117 eqid 2727 . . . . . . 7 (Scalarβ€˜π‘ƒ) = (Scalarβ€˜π‘ƒ)
118 eqid 2727 . . . . . . 7 (Baseβ€˜(Scalarβ€˜π‘ƒ)) = (Baseβ€˜(Scalarβ€˜π‘ƒ))
1194, 117, 26, 118lmodvscl 20743 . . . . . 6 ((𝑃 ∈ LMod ∧ (𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) ∈ (Baseβ€˜(Scalarβ€˜π‘ƒ)) ∧ (π‘˜ ↑ 𝑋) ∈ 𝐡) β†’ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋)) ∈ 𝐡)
12091, 106, 116, 119syl3anc 1369 . . . . 5 (((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) ∧ π‘˜ ∈ β„•0) β†’ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋)) ∈ 𝐡)
121120fmpttd 7119 . . . 4 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋))):β„•0⟢𝐡)
1221, 4, 37, 43, 18, 2, 26, 3, 20, 19ply1mulgsumlem4 47370 . . . 4 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋))) finSupp (0gβ€˜π‘ƒ))
1234, 83, 86, 88, 121, 122gsumcl 19854 . . 3 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ (𝑃 Ξ£g (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋)))) ∈ 𝐡)
124 eqid 2727 . . . 4 (coe1β€˜(𝐾 Γ— 𝐿)) = (coe1β€˜(𝐾 Γ— 𝐿))
125 eqid 2727 . . . 4 (coe1β€˜(𝑃 Ξ£g (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋))))) = (coe1β€˜(𝑃 Ξ£g (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋)))))
1261, 4, 124, 125ply1coe1eq 22193 . . 3 ((𝑅 ∈ Ring ∧ (𝐾 Γ— 𝐿) ∈ 𝐡 ∧ (𝑃 Ξ£g (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋)))) ∈ 𝐡) β†’ (βˆ€π‘› ∈ β„•0 ((coe1β€˜(𝐾 Γ— 𝐿))β€˜π‘›) = ((coe1β€˜(𝑃 Ξ£g (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋)))))β€˜π‘›) ↔ (𝐾 Γ— 𝐿) = (𝑃 Ξ£g (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋))))))
12723, 82, 123, 126syl3anc 1369 . 2 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ (βˆ€π‘› ∈ β„•0 ((coe1β€˜(𝐾 Γ— 𝐿))β€˜π‘›) = ((coe1β€˜(𝑃 Ξ£g (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋)))))β€˜π‘›) ↔ (𝐾 Γ— 𝐿) = (𝑃 Ξ£g (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋))))))
12879, 127mpbid 231 1 ((𝑅 ∈ Ring ∧ 𝐾 ∈ 𝐡 ∧ 𝐿 ∈ 𝐡) β†’ (𝐾 Γ— 𝐿) = (𝑃 Ξ£g (π‘˜ ∈ β„•0 ↦ ((𝑅 Ξ£g (𝑙 ∈ (0...π‘˜) ↦ ((π΄β€˜π‘™) βˆ— (πΆβ€˜(π‘˜ βˆ’ 𝑙))))) Β· (π‘˜ ↑ 𝑋)))))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 395   ∧ w3a 1085   = wceq 1534   ∈ wcel 2099  βˆ€wral 3056  Vcvv 3469  β¦‹csb 3889   class class class wbr 5142   ↦ cmpt 5225  β€˜cfv 6542  (class class class)co 7414   finSupp cfsupp 9375  0cc0 11124   βˆ’ cmin 11460  β„•0cn0 12488  ...cfz 13502  Basecbs 17165  .rcmulr 17219  Scalarcsca 17221   ·𝑠 cvsca 17222  0gc0g 17406   Ξ£g cgsu 17407  Mndcmnd 18679  .gcmg 19007  CMndccmn 19719  mulGrpcmgp 20058  Ringcrg 20157  LModclmod 20725  var1cv1 22069  Poly1cpl1 22070  coe1cco1 22071
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-10 2130  ax-11 2147  ax-12 2164  ax-ext 2698  ax-rep 5279  ax-sep 5293  ax-nul 5300  ax-pow 5359  ax-pr 5423  ax-un 7732  ax-cnex 11180  ax-resscn 11181  ax-1cn 11182  ax-icn 11183  ax-addcl 11184  ax-addrcl 11185  ax-mulcl 11186  ax-mulrcl 11187  ax-mulcom 11188  ax-addass 11189  ax-mulass 11190  ax-distr 11191  ax-i2m1 11192  ax-1ne0 11193  ax-1rid 11194  ax-rnegex 11195  ax-rrecex 11196  ax-cnre 11197  ax-pre-lttri 11198  ax-pre-lttrn 11199  ax-pre-ltadd 11200  ax-pre-mulgt0 11201
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 847  df-3or 1086  df-3an 1087  df-tru 1537  df-fal 1547  df-ex 1775  df-nf 1779  df-sb 2061  df-mo 2529  df-eu 2558  df-clab 2705  df-cleq 2719  df-clel 2805  df-nfc 2880  df-ne 2936  df-nel 3042  df-ral 3057  df-rex 3066  df-rmo 3371  df-reu 3372  df-rab 3428  df-v 3471  df-sbc 3775  df-csb 3890  df-dif 3947  df-un 3949  df-in 3951  df-ss 3961  df-pss 3963  df-nul 4319  df-if 4525  df-pw 4600  df-sn 4625  df-pr 4627  df-tp 4629  df-op 4631  df-uni 4904  df-int 4945  df-iun 4993  df-iin 4994  df-br 5143  df-opab 5205  df-mpt 5226  df-tr 5260  df-id 5570  df-eprel 5576  df-po 5584  df-so 5585  df-fr 5627  df-se 5628  df-we 5629  df-xp 5678  df-rel 5679  df-cnv 5680  df-co 5681  df-dm 5682  df-rn 5683  df-res 5684  df-ima 5685  df-pred 6299  df-ord 6366  df-on 6367  df-lim 6368  df-suc 6369  df-iota 6494  df-fun 6544  df-fn 6545  df-f 6546  df-f1 6547  df-fo 6548  df-f1o 6549  df-fv 6550  df-isom 6551  df-riota 7370  df-ov 7417  df-oprab 7418  df-mpo 7419  df-of 7677  df-ofr 7678  df-om 7863  df-1st 7985  df-2nd 7986  df-supp 8158  df-frecs 8278  df-wrecs 8309  df-recs 8383  df-rdg 8422  df-1o 8478  df-er 8716  df-map 8836  df-pm 8837  df-ixp 8906  df-en 8954  df-dom 8955  df-sdom 8956  df-fin 8957  df-fsupp 9376  df-sup 9451  df-oi 9519  df-card 9948  df-pnf 11266  df-mnf 11267  df-xr 11268  df-ltxr 11269  df-le 11270  df-sub 11462  df-neg 11463  df-nn 12229  df-2 12291  df-3 12292  df-4 12293  df-5 12294  df-6 12295  df-7 12296  df-8 12297  df-9 12298  df-n0 12489  df-z 12575  df-dec 12694  df-uz 12839  df-fz 13503  df-fzo 13646  df-seq 13985  df-hash 14308  df-struct 17101  df-sets 17118  df-slot 17136  df-ndx 17148  df-base 17166  df-ress 17195  df-plusg 17231  df-mulr 17232  df-sca 17234  df-vsca 17235  df-ip 17236  df-tset 17237  df-ple 17238  df-ds 17240  df-hom 17242  df-cco 17243  df-0g 17408  df-gsum 17409  df-prds 17414  df-pws 17416  df-mre 17551  df-mrc 17552  df-acs 17554  df-mgm 18585  df-sgrp 18664  df-mnd 18680  df-mhm 18725  df-submnd 18726  df-grp 18878  df-minusg 18879  df-sbg 18880  df-mulg 19008  df-subg 19062  df-ghm 19152  df-cntz 19252  df-cmn 19721  df-abl 19722  df-mgp 20059  df-rng 20077  df-ur 20106  df-srg 20111  df-ring 20159  df-subrng 20465  df-subrg 20490  df-lmod 20727  df-lss 20798  df-psr 21822  df-mvr 21823  df-mpl 21824  df-opsr 21826  df-psr1 22073  df-vr1 22074  df-ply1 22075  df-coe1 22076
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator