Step | Hyp | Ref
| Expression |
1 | | srgbinom.s |
. . . 4
โข ๐ = (Baseโ๐
) |
2 | | srgbinom.m |
. . . 4
โข ร =
(.rโ๐
) |
3 | | srgbinom.t |
. . . 4
โข ยท =
(.gโ๐
) |
4 | | srgbinom.a |
. . . 4
โข + =
(+gโ๐
) |
5 | | srgbinom.g |
. . . 4
โข ๐บ = (mulGrpโ๐
) |
6 | | srgbinom.e |
. . . 4
โข โ =
(.gโ๐บ) |
7 | | srgbinomlem.r |
. . . 4
โข (๐ โ ๐
โ SRing) |
8 | | srgbinomlem.a |
. . . 4
โข (๐ โ ๐ด โ ๐) |
9 | | srgbinomlem.b |
. . . 4
โข (๐ โ ๐ต โ ๐) |
10 | | srgbinomlem.c |
. . . 4
โข (๐ โ (๐ด ร ๐ต) = (๐ต ร ๐ด)) |
11 | | srgbinomlem.n |
. . . 4
โข (๐ โ ๐ โ
โ0) |
12 | | srgbinomlem.i |
. . . 4
โข (๐ โ (๐ โ (๐ด + ๐ต)) = (๐
ฮฃg (๐ โ (0...๐) โฆ ((๐C๐) ยท (((๐ โ ๐) โ ๐ด) ร (๐ โ ๐ต)))))) |
13 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10,
11, 12 | srgbinomlem3 20044 |
. . 3
โข ((๐ โง ๐) โ ((๐ โ (๐ด + ๐ต)) ร ๐ด) = (๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ ((๐C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต)))))) |
14 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10,
11, 12 | srgbinomlem4 20045 |
. . 3
โข ((๐ โง ๐) โ ((๐ โ (๐ด + ๐ต)) ร ๐ต) = (๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ ((๐C(๐ โ 1)) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต)))))) |
15 | 13, 14 | oveq12d 7423 |
. 2
โข ((๐ โง ๐) โ (((๐ โ (๐ด + ๐ต)) ร ๐ด) + ((๐ โ (๐ด + ๐ต)) ร ๐ต)) = ((๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ ((๐C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))))) + (๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ ((๐C(๐ โ 1)) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))))))) |
16 | 5 | srgmgp 20007 |
. . . . . . 7
โข (๐
โ SRing โ ๐บ โ Mnd) |
17 | 7, 16 | syl 17 |
. . . . . 6
โข (๐ โ ๐บ โ Mnd) |
18 | | srgmnd 20006 |
. . . . . . . 8
โข (๐
โ SRing โ ๐
โ Mnd) |
19 | 7, 18 | syl 17 |
. . . . . . 7
โข (๐ โ ๐
โ Mnd) |
20 | 1, 4 | mndcl 18629 |
. . . . . . 7
โข ((๐
โ Mnd โง ๐ด โ ๐ โง ๐ต โ ๐) โ (๐ด + ๐ต) โ ๐) |
21 | 19, 8, 9, 20 | syl3anc 1371 |
. . . . . 6
โข (๐ โ (๐ด + ๐ต) โ ๐) |
22 | 17, 11, 21 | 3jca 1128 |
. . . . 5
โข (๐ โ (๐บ โ Mnd โง ๐ โ โ0 โง (๐ด + ๐ต) โ ๐)) |
23 | 22 | adantr 481 |
. . . 4
โข ((๐ โง ๐) โ (๐บ โ Mnd โง ๐ โ โ0 โง (๐ด + ๐ต) โ ๐)) |
24 | 5, 1 | mgpbas 19987 |
. . . . 5
โข ๐ = (Baseโ๐บ) |
25 | 5, 2 | mgpplusg 19985 |
. . . . 5
โข ร =
(+gโ๐บ) |
26 | 24, 6, 25 | mulgnn0p1 18959 |
. . . 4
โข ((๐บ โ Mnd โง ๐ โ โ0
โง (๐ด + ๐ต) โ ๐) โ ((๐ + 1) โ (๐ด + ๐ต)) = ((๐ โ (๐ด + ๐ต)) ร (๐ด + ๐ต))) |
27 | 23, 26 | syl 17 |
. . 3
โข ((๐ โง ๐) โ ((๐ + 1) โ (๐ด + ๐ต)) = ((๐ โ (๐ด + ๐ต)) ร (๐ด + ๐ต))) |
28 | 24, 6, 17, 11, 21 | mulgnn0cld 18969 |
. . . . . . 7
โข (๐ โ (๐ โ (๐ด + ๐ต)) โ ๐) |
29 | 28, 8, 9 | 3jca 1128 |
. . . . . 6
โข (๐ โ ((๐ โ (๐ด + ๐ต)) โ ๐ โง ๐ด โ ๐ โง ๐ต โ ๐)) |
30 | 7, 29 | jca 512 |
. . . . 5
โข (๐ โ (๐
โ SRing โง ((๐ โ (๐ด + ๐ต)) โ ๐ โง ๐ด โ ๐ โง ๐ต โ ๐))) |
31 | 30 | adantr 481 |
. . . 4
โข ((๐ โง ๐) โ (๐
โ SRing โง ((๐ โ (๐ด + ๐ต)) โ ๐ โง ๐ด โ ๐ โง ๐ต โ ๐))) |
32 | 1, 4, 2 | srgdi 20013 |
. . . 4
โข ((๐
โ SRing โง ((๐ โ (๐ด + ๐ต)) โ ๐ โง ๐ด โ ๐ โง ๐ต โ ๐)) โ ((๐ โ (๐ด + ๐ต)) ร (๐ด + ๐ต)) = (((๐ โ (๐ด + ๐ต)) ร ๐ด) + ((๐ โ (๐ด + ๐ต)) ร ๐ต))) |
33 | 31, 32 | syl 17 |
. . 3
โข ((๐ โง ๐) โ ((๐ โ (๐ด + ๐ต)) ร (๐ด + ๐ต)) = (((๐ โ (๐ด + ๐ต)) ร ๐ด) + ((๐ โ (๐ด + ๐ต)) ร ๐ต))) |
34 | 27, 33 | eqtrd 2772 |
. 2
โข ((๐ โง ๐) โ ((๐ + 1) โ (๐ด + ๐ต)) = (((๐ โ (๐ด + ๐ต)) ร ๐ด) + ((๐ โ (๐ด + ๐ต)) ร ๐ต))) |
35 | | elfzelz 13497 |
. . . . . . . . 9
โข (๐ โ (0...(๐ + 1)) โ ๐ โ โค) |
36 | | bcpasc 14277 |
. . . . . . . . 9
โข ((๐ โ โ0
โง ๐ โ โค)
โ ((๐C๐) + (๐C(๐ โ 1))) = ((๐ + 1)C๐)) |
37 | 11, 35, 36 | syl2an 596 |
. . . . . . . 8
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ ((๐C๐) + (๐C(๐ โ 1))) = ((๐ + 1)C๐)) |
38 | 37 | oveq1d 7420 |
. . . . . . 7
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ (((๐C๐) + (๐C(๐ โ 1))) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))) = (((๐ + 1)C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต)))) |
39 | 19 | adantr 481 |
. . . . . . . 8
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ ๐
โ Mnd) |
40 | | bccl 14278 |
. . . . . . . . 9
โข ((๐ โ โ0
โง ๐ โ โค)
โ (๐C๐) โ
โ0) |
41 | 11, 35, 40 | syl2an 596 |
. . . . . . . 8
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ (๐C๐) โ
โ0) |
42 | 35 | adantl 482 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ ๐ โ โค) |
43 | | peano2zm 12601 |
. . . . . . . . . 10
โข (๐ โ โค โ (๐ โ 1) โ
โค) |
44 | 42, 43 | syl 17 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ (๐ โ 1) โ โค) |
45 | | bccl 14278 |
. . . . . . . . 9
โข ((๐ โ โ0
โง (๐ โ 1) โ
โค) โ (๐C(๐ โ 1)) โ
โ0) |
46 | 11, 44, 45 | syl2an2r 683 |
. . . . . . . 8
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ (๐C(๐ โ 1)) โ
โ0) |
47 | 7 | adantr 481 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ ๐
โ SRing) |
48 | 17 | adantr 481 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ ๐บ โ Mnd) |
49 | | fznn0sub 13529 |
. . . . . . . . . . 11
โข (๐ โ (0...(๐ + 1)) โ ((๐ + 1) โ ๐) โ
โ0) |
50 | 49 | adantl 482 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ ((๐ + 1) โ ๐) โ
โ0) |
51 | 8 | adantr 481 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ ๐ด โ ๐) |
52 | 24, 6, 48, 50, 51 | mulgnn0cld 18969 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ (((๐ + 1) โ ๐) โ ๐ด) โ ๐) |
53 | | elfznn0 13590 |
. . . . . . . . . . 11
โข (๐ โ (0...(๐ + 1)) โ ๐ โ โ0) |
54 | 53 | adantl 482 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ ๐ โ โ0) |
55 | 9 | adantr 481 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ ๐ต โ ๐) |
56 | 24, 6, 48, 54, 55 | mulgnn0cld 18969 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ (๐ โ ๐ต) โ ๐) |
57 | 1, 2 | srgcl 20009 |
. . . . . . . . 9
โข ((๐
โ SRing โง (((๐ + 1) โ ๐) โ ๐ด) โ ๐ โง (๐ โ ๐ต) โ ๐) โ ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต)) โ ๐) |
58 | 47, 52, 56, 57 | syl3anc 1371 |
. . . . . . . 8
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต)) โ ๐) |
59 | 1, 3, 4 | mulgnn0dir 18978 |
. . . . . . . 8
โข ((๐
โ Mnd โง ((๐C๐) โ โ0 โง (๐C(๐ โ 1)) โ โ0 โง
((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต)) โ ๐)) โ (((๐C๐) + (๐C(๐ โ 1))) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))) = (((๐C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))) + ((๐C(๐ โ 1)) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))))) |
60 | 39, 41, 46, 58, 59 | syl13anc 1372 |
. . . . . . 7
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ (((๐C๐) + (๐C(๐ โ 1))) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))) = (((๐C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))) + ((๐C(๐ โ 1)) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))))) |
61 | 38, 60 | eqtr3d 2774 |
. . . . . 6
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ (((๐ + 1)C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))) = (((๐C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))) + ((๐C(๐ โ 1)) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))))) |
62 | 61 | mpteq2dva 5247 |
. . . . 5
โข (๐ โ (๐ โ (0...(๐ + 1)) โฆ (((๐ + 1)C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต)))) = (๐ โ (0...(๐ + 1)) โฆ (((๐C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))) + ((๐C(๐ โ 1)) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต)))))) |
63 | 62 | oveq2d 7421 |
. . . 4
โข (๐ โ (๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ (((๐ + 1)C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))))) = (๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ (((๐C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))) + ((๐C(๐ โ 1)) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))))))) |
64 | | srgcmn 20005 |
. . . . . 6
โข (๐
โ SRing โ ๐
โ CMnd) |
65 | 7, 64 | syl 17 |
. . . . 5
โข (๐ โ ๐
โ CMnd) |
66 | | fzfid 13934 |
. . . . 5
โข (๐ โ (0...(๐ + 1)) โ Fin) |
67 | 1, 3, 39, 41, 58 | mulgnn0cld 18969 |
. . . . 5
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ ((๐C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))) โ ๐) |
68 | 35, 43 | syl 17 |
. . . . . . 7
โข (๐ โ (0...(๐ + 1)) โ (๐ โ 1) โ โค) |
69 | 11, 68, 45 | syl2an 596 |
. . . . . 6
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ (๐C(๐ โ 1)) โ
โ0) |
70 | 1, 3, 39, 69, 58 | mulgnn0cld 18969 |
. . . . 5
โข ((๐ โง ๐ โ (0...(๐ + 1))) โ ((๐C(๐ โ 1)) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))) โ ๐) |
71 | | eqid 2732 |
. . . . 5
โข (๐ โ (0...(๐ + 1)) โฆ ((๐C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต)))) = (๐ โ (0...(๐ + 1)) โฆ ((๐C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต)))) |
72 | | eqid 2732 |
. . . . 5
โข (๐ โ (0...(๐ + 1)) โฆ ((๐C(๐ โ 1)) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต)))) = (๐ โ (0...(๐ + 1)) โฆ ((๐C(๐ โ 1)) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต)))) |
73 | 1, 4, 65, 66, 67, 70, 71, 72 | gsummptfidmadd 19787 |
. . . 4
โข (๐ โ (๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ (((๐C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))) + ((๐C(๐ โ 1)) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต)))))) = ((๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ ((๐C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))))) + (๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ ((๐C(๐ โ 1)) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))))))) |
74 | 63, 73 | eqtrd 2772 |
. . 3
โข (๐ โ (๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ (((๐ + 1)C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))))) = ((๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ ((๐C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))))) + (๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ ((๐C(๐ โ 1)) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))))))) |
75 | 74 | adantr 481 |
. 2
โข ((๐ โง ๐) โ (๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ (((๐ + 1)C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))))) = ((๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ ((๐C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))))) + (๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ ((๐C(๐ โ 1)) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต))))))) |
76 | 15, 34, 75 | 3eqtr4d 2782 |
1
โข ((๐ โง ๐) โ ((๐ + 1) โ (๐ด + ๐ต)) = (๐
ฮฃg (๐ โ (0...(๐ + 1)) โฆ (((๐ + 1)C๐) ยท ((((๐ + 1) โ ๐) โ ๐ด) ร (๐ โ ๐ต)))))) |