Theorem fsumparts 12032

Description: Summation by parts. (Contributed by Mario Carneiro, 13-Apr-2016.)

Hypotheses

Ref	Expression
fsumparts.b	|- ( k = j -> ( A = B /\ V = W ) )
fsumparts.c	|- ( k = ( j + 1 ) -> ( A = C /\ V = X ) )
fsumparts.d	|- ( k = M -> ( A = D /\ V = Y ) )
fsumparts.e	|- ( k = N -> ( A = E /\ V = Z ) )
fsumparts.1	|- ( ph -> N e. ( ZZ>= ` M ) )
fsumparts.2	|- ( ( ph /\ k e. ( M ... N ) ) -> A e. CC )
fsumparts.3	|- ( ( ph /\ k e. ( M ... N ) ) -> V e. CC )

Assertion

Ref	Expression
fsumparts	|- ( ph -> sum_ j e. ( M..^ N ) ( B x. ( X - W ) ) = ( ( ( E x. Z ) - ( D x. Y ) ) - sum_ j e. ( M..^ N ) ( ( C - B ) x. X ) ) )

Distinct variable groups:   A, j   B, k   C, k   D, k   k, E   j, V   k, W   j, k, M   j, N, k   ph, j, k   k, X   k, Y   k, Z

Allowed substitution hints:   A( k)   B( j)   C( j)   D( j)   E( j)   V( k)   W( j)   X( j)   Y( j)   Z( j)

Proof of Theorem fsumparts

Step	Hyp	Ref	Expression
1		sum0 11950	. . . 4 |- sum_ j e. (/) ( B x. ( X - W ) ) = 0
2		0m0e0 9255	. . . 4 |- ( 0 - 0 ) = 0
3	1, 2	eqtr4i 2255	. . 3 |- sum_ j e. (/) ( B x. ( X - W ) ) = ( 0 - 0 )
4		simpr 110	. . . . . 6 |- ( ( ph /\ N = M ) -> N = M )
5	4	oveq2d 6034	. . . . 5 |- ( ( ph /\ N = M ) -> ( M..^ N ) = ( M..^ M ) )
6		fzo0 10405	. . . . 5 |- ( M..^ M ) = (/)
7	5, 6	eqtrdi 2280	. . . 4 |- ( ( ph /\ N = M ) -> ( M..^ N ) = (/) )
8	7	sumeq1d 11927	. . 3 |- ( ( ph /\ N = M ) -> sum_ j e. ( M..^ N ) ( B x. ( X - W ) ) = sum_ j e. (/) ( B x. ( X - W ) ) )
9		fsumparts.1	. . . . . . . 8 |- ( ph -> N e. ( ZZ>= ` M ) )
10		eluzfz1 10266	. . . . . . . 8 |- ( N e. ( ZZ>= ` M ) -> M e. ( M ... N ) )
11	9, 10	syl 14	. . . . . . 7 |- ( ph -> M e. ( M ... N ) )
12		eqtr3 2251	. . . . . . . . . . . 12 |- ( ( k = M /\ N = M ) -> k = N )
13		fsumparts.e	. . . . . . . . . . . 12 |- ( k = N -> ( A = E /\ V = Z ) )
14		oveq12 6027	. . . . . . . . . . . 12 |- ( ( A = E /\ V = Z ) -> ( A x. V ) = ( E x. Z ) )
15	12, 13, 14	3syl 17	. . . . . . . . . . 11 |- ( ( k = M /\ N = M ) -> ( A x. V ) = ( E x. Z ) )
16		fsumparts.d	. . . . . . . . . . . . 13 |- ( k = M -> ( A = D /\ V = Y ) )
17		oveq12 6027	. . . . . . . . . . . . 13 |- ( ( A = D /\ V = Y ) -> ( A x. V ) = ( D x. Y ) )
18	16, 17	syl 14	. . . . . . . . . . . 12 |- ( k = M -> ( A x. V ) = ( D x. Y ) )
19	18	adantr 276	. . . . . . . . . . 11 |- ( ( k = M /\ N = M ) -> ( A x. V ) = ( D x. Y ) )
20	15, 19	eqeq12d 2246	. . . . . . . . . 10 |- ( ( k = M /\ N = M ) -> ( ( A x. V ) = ( A x. V ) <-> ( E x. Z ) = ( D x. Y ) ) )
21	20	pm5.74da 443	. . . . . . . . 9 |- ( k = M -> ( ( N = M -> ( A x. V ) = ( A x. V ) ) <-> ( N = M -> ( E x. Z ) = ( D x. Y ) ) ) )
22		eqidd 2232	. . . . . . . . 9 |- ( N = M -> ( A x. V ) = ( A x. V ) )
23	21, 22	vtoclg 2864	. . . . . . . 8 |- ( M e. ( M ... N ) -> ( N = M -> ( E x. Z ) = ( D x. Y ) ) )
24	23	imp 124	. . . . . . 7 |- ( ( M e. ( M ... N ) /\ N = M ) -> ( E x. Z ) = ( D x. Y ) )
25	11, 24	sylan 283	. . . . . 6 |- ( ( ph /\ N = M ) -> ( E x. Z ) = ( D x. Y ) )
26	25	oveq1d 6033	. . . . 5 |- ( ( ph /\ N = M ) -> ( ( E x. Z ) - ( D x. Y ) ) = ( ( D x. Y ) - ( D x. Y ) ) )
27	16	simpld 112	. . . . . . . . . 10 |- ( k = M -> A = D )
28	27	eleq1d 2300	. . . . . . . . 9 |- ( k = M -> ( A e. CC <-> D e. CC ) )
29		fsumparts.2	. . . . . . . . . 10 |- ( ( ph /\ k e. ( M ... N ) ) -> A e. CC )
30	29	ralrimiva 2605	. . . . . . . . 9 |- ( ph -> A. k e. ( M ... N ) A e. CC )
31	28, 30, 11	rspcdva 2915	. . . . . . . 8 |- ( ph -> D e. CC )
32	16	simprd 114	. . . . . . . . . 10 |- ( k = M -> V = Y )
33	32	eleq1d 2300	. . . . . . . . 9 |- ( k = M -> ( V e. CC <-> Y e. CC ) )
34		fsumparts.3	. . . . . . . . . 10 |- ( ( ph /\ k e. ( M ... N ) ) -> V e. CC )
35	34	ralrimiva 2605	. . . . . . . . 9 |- ( ph -> A. k e. ( M ... N ) V e. CC )
36	33, 35, 11	rspcdva 2915	. . . . . . . 8 |- ( ph -> Y e. CC )
37	31, 36	mulcld 8200	. . . . . . 7 |- ( ph -> ( D x. Y ) e. CC )
38	37	subidd 8478	. . . . . 6 |- ( ph -> ( ( D x. Y ) - ( D x. Y ) ) = 0 )
39	38	adantr 276	. . . . 5 |- ( ( ph /\ N = M ) -> ( ( D x. Y ) - ( D x. Y ) ) = 0 )
40	26, 39	eqtrd 2264	. . . 4 |- ( ( ph /\ N = M ) -> ( ( E x. Z ) - ( D x. Y ) ) = 0 )
41	7	sumeq1d 11927	. . . . 5 |- ( ( ph /\ N = M ) -> sum_ j e. ( M..^ N ) ( ( C - B ) x. X ) = sum_ j e. (/) ( ( C - B ) x. X ) )
42		sum0 11950	. . . . 5 |- sum_ j e. (/) ( ( C - B ) x. X ) = 0
43	41, 42	eqtrdi 2280	. . . 4 |- ( ( ph /\ N = M ) -> sum_ j e. ( M..^ N ) ( ( C - B ) x. X ) = 0 )
44	40, 43	oveq12d 6036	. . 3 |- ( ( ph /\ N = M ) -> ( ( ( E x. Z ) - ( D x. Y ) ) - sum_ j e. ( M..^ N ) ( ( C - B ) x. X ) ) = ( 0 - 0 ) )
45	3, 8, 44	3eqtr4a 2290	. 2 |- ( ( ph /\ N = M ) -> sum_ j e. ( M..^ N ) ( B x. ( X - W ) ) = ( ( ( E x. Z ) - ( D x. Y ) ) - sum_ j e. ( M..^ N ) ( ( C - B ) x. X ) ) )
46		eluzel2 9760	. . . . . . . . . . . 12 |- ( N e. ( ZZ>= ` M ) -> M e. ZZ )
47	9, 46	syl 14	. . . . . . . . . . 11 |- ( ph -> M e. ZZ )
48	47	adantr 276	. . . . . . . . . 10 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> M e. ZZ )
49	48	peano2zd 9605	. . . . . . . . 9 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( M + 1 ) e. ZZ )
50		eluzelz 9765	. . . . . . . . . . 11 |- ( N e. ( ZZ>= ` M ) -> N e. ZZ )
51	9, 50	syl 14	. . . . . . . . . 10 |- ( ph -> N e. ZZ )
52	51	adantr 276	. . . . . . . . 9 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> N e. ZZ )
53		fzofig 10694	. . . . . . . . 9 |- ( ( ( M + 1 ) e. ZZ /\ N e. ZZ ) -> ( ( M + 1 )..^ N ) e. Fin )
54	49, 52, 53	syl2anc 411	. . . . . . . 8 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( ( M + 1 )..^ N ) e. Fin )
55		uzid 9770	. . . . . . . . . . 11 |- ( M e. ZZ -> M e. ( ZZ>= ` M ) )
56		peano2uz 9817	. . . . . . . . . . 11 |- ( M e. ( ZZ>= ` M ) -> ( M + 1 ) e. ( ZZ>= ` M ) )
57		fzoss1 10408	. . . . . . . . . . 11 |- ( ( M + 1 ) e. ( ZZ>= ` M ) -> ( ( M + 1 )..^ N ) C_ ( M..^ N ) )
58	48, 55, 56, 57	4syl 18	. . . . . . . . . 10 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( ( M + 1 )..^ N ) C_ ( M..^ N ) )
59	58	sselda 3227	. . . . . . . . 9 |- ( ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) /\ k e. ( ( M + 1 )..^ N ) ) -> k e. ( M..^ N ) )
60		elfzofz 10398	. . . . . . . . . . 11 |- ( k e. ( M..^ N ) -> k e. ( M ... N ) )
61	29, 34	mulcld 8200	. . . . . . . . . . 11 |- ( ( ph /\ k e. ( M ... N ) ) -> ( A x. V ) e. CC )
62	60, 61	sylan2 286	. . . . . . . . . 10 |- ( ( ph /\ k e. ( M..^ N ) ) -> ( A x. V ) e. CC )
63	62	adantlr 477	. . . . . . . . 9 |- ( ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) /\ k e. ( M..^ N ) ) -> ( A x. V ) e. CC )
64	59, 63	syldan 282	. . . . . . . 8 |- ( ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) /\ k e. ( ( M + 1 )..^ N ) ) -> ( A x. V ) e. CC )
65	54, 64	fsumcl 11962	. . . . . . 7 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) e. CC )
66	13	simpld 112	. . . . . . . . . . 11 |- ( k = N -> A = E )
67	66	eleq1d 2300	. . . . . . . . . 10 |- ( k = N -> ( A e. CC <-> E e. CC ) )
68		eluzfz2 10267	. . . . . . . . . . 11 |- ( N e. ( ZZ>= ` M ) -> N e. ( M ... N ) )
69	9, 68	syl 14	. . . . . . . . . 10 |- ( ph -> N e. ( M ... N ) )
70	67, 30, 69	rspcdva 2915	. . . . . . . . 9 |- ( ph -> E e. CC )
71	13	simprd 114	. . . . . . . . . . 11 |- ( k = N -> V = Z )
72	71	eleq1d 2300	. . . . . . . . . 10 |- ( k = N -> ( V e. CC <-> Z e. CC ) )
73	72, 35, 69	rspcdva 2915	. . . . . . . . 9 |- ( ph -> Z e. CC )
74	70, 73	mulcld 8200	. . . . . . . 8 |- ( ph -> ( E x. Z ) e. CC )
75	74	adantr 276	. . . . . . 7 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( E x. Z ) e. CC )
76		simpr 110	. . . . . . . . 9 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> N e. ( ZZ>= ` ( M + 1 ) ) )
77		fzp1ss 10308	. . . . . . . . . . . 12 |- ( M e. ZZ -> ( ( M + 1 ) ... N ) C_ ( M ... N ) )
78	48, 77	syl 14	. . . . . . . . . . 11 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( ( M + 1 ) ... N ) C_ ( M ... N ) )
79	78	sselda 3227	. . . . . . . . . 10 |- ( ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) /\ k e. ( ( M + 1 ) ... N ) ) -> k e. ( M ... N ) )
80	61	adantlr 477	. . . . . . . . . 10 |- ( ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) /\ k e. ( M ... N ) ) -> ( A x. V ) e. CC )
81	79, 80	syldan 282	. . . . . . . . 9 |- ( ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) /\ k e. ( ( M + 1 ) ... N ) ) -> ( A x. V ) e. CC )
82	13, 14	syl 14	. . . . . . . . 9 |- ( k = N -> ( A x. V ) = ( E x. Z ) )
83	76, 81, 82	fsumm1 11978	. . . . . . . 8 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ k e. ( ( M + 1 ) ... N ) ( A x. V ) = ( sum_ k e. ( ( M + 1 ) ... ( N - 1 ) ) ( A x. V ) + ( E x. Z ) ) )
84		fzoval 10383	. . . . . . . . . . . 12 |- ( N e. ZZ -> ( M..^ N ) = ( M ... ( N - 1 ) ) )
85	52, 84	syl 14	. . . . . . . . . . 11 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( M..^ N ) = ( M ... ( N - 1 ) ) )
86	48	zcnd 9603	. . . . . . . . . . . . 13 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> M e. CC )
87		ax-1cn 8125	. . . . . . . . . . . . 13 |- 1 e. CC
88		pncan 8385	. . . . . . . . . . . . 13 |- ( ( M e. CC /\ 1 e. CC ) -> ( ( M + 1 ) - 1 ) = M )
89	86, 87, 88	sylancl 413	. . . . . . . . . . . 12 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( ( M + 1 ) - 1 ) = M )
90	89	oveq1d 6033	. . . . . . . . . . 11 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( ( ( M + 1 ) - 1 ) ... ( N - 1 ) ) = ( M ... ( N - 1 ) ) )
91	85, 90	eqtr4d 2267	. . . . . . . . . 10 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( M..^ N ) = ( ( ( M + 1 ) - 1 ) ... ( N - 1 ) ) )
92	91	sumeq1d 11927	. . . . . . . . 9 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ j e. ( M..^ N ) ( C x. X ) = sum_ j e. ( ( ( M + 1 ) - 1 ) ... ( N - 1 ) ) ( C x. X ) )
93		1zzd 9506	. . . . . . . . . 10 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> 1 e. ZZ )
94		fsumparts.c	. . . . . . . . . . 11 |- ( k = ( j + 1 ) -> ( A = C /\ V = X ) )
95		oveq12 6027	. . . . . . . . . . 11 |- ( ( A = C /\ V = X ) -> ( A x. V ) = ( C x. X ) )
96	94, 95	syl 14	. . . . . . . . . 10 |- ( k = ( j + 1 ) -> ( A x. V ) = ( C x. X ) )
97	93, 49, 52, 81, 96	fsumshftm 12007	. . . . . . . . 9 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ k e. ( ( M + 1 ) ... N ) ( A x. V ) = sum_ j e. ( ( ( M + 1 ) - 1 ) ... ( N - 1 ) ) ( C x. X ) )
98	92, 97	eqtr4d 2267	. . . . . . . 8 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ j e. ( M..^ N ) ( C x. X ) = sum_ k e. ( ( M + 1 ) ... N ) ( A x. V ) )
99		fzoval 10383	. . . . . . . . . . 11 |- ( N e. ZZ -> ( ( M + 1 )..^ N ) = ( ( M + 1 ) ... ( N - 1 ) ) )
100	52, 99	syl 14	. . . . . . . . . 10 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( ( M + 1 )..^ N ) = ( ( M + 1 ) ... ( N - 1 ) ) )
101	100	sumeq1d 11927	. . . . . . . . 9 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) = sum_ k e. ( ( M + 1 ) ... ( N - 1 ) ) ( A x. V ) )
102	101	oveq1d 6033	. . . . . . . 8 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) + ( E x. Z ) ) = ( sum_ k e. ( ( M + 1 ) ... ( N - 1 ) ) ( A x. V ) + ( E x. Z ) ) )
103	83, 98, 102	3eqtr4d 2274	. . . . . . 7 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ j e. ( M..^ N ) ( C x. X ) = ( sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) + ( E x. Z ) ) )
104	65, 75, 103	comraddd 8336	. . . . . 6 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ j e. ( M..^ N ) ( C x. X ) = ( ( E x. Z ) + sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) ) )
105	104	oveq1d 6033	. . . . 5 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( sum_ j e. ( M..^ N ) ( C x. X ) - sum_ j e. ( M..^ N ) ( B x. X ) ) = ( ( ( E x. Z ) + sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) ) - sum_ j e. ( M..^ N ) ( B x. X ) ) )
106		fzofzp1 10472	. . . . . . . . . 10 |- ( j e. ( M..^ N ) -> ( j + 1 ) e. ( M ... N ) )
107	94	simpld 112	. . . . . . . . . . . 12 |- ( k = ( j + 1 ) -> A = C )
108	107	eleq1d 2300	. . . . . . . . . . 11 |- ( k = ( j + 1 ) -> ( A e. CC <-> C e. CC ) )
109	108	rspccva 2909	. . . . . . . . . 10 |- ( ( A. k e. ( M ... N ) A e. CC /\ ( j + 1 ) e. ( M ... N ) ) -> C e. CC )
110	30, 106, 109	syl2an 289	. . . . . . . . 9 |- ( ( ph /\ j e. ( M..^ N ) ) -> C e. CC )
111		elfzofz 10398	. . . . . . . . . 10 |- ( j e. ( M..^ N ) -> j e. ( M ... N ) )
112		fsumparts.b	. . . . . . . . . . . . 13 |- ( k = j -> ( A = B /\ V = W ) )
113	112	simpld 112	. . . . . . . . . . . 12 |- ( k = j -> A = B )
114	113	eleq1d 2300	. . . . . . . . . . 11 |- ( k = j -> ( A e. CC <-> B e. CC ) )
115	114	rspccva 2909	. . . . . . . . . 10 |- ( ( A. k e. ( M ... N ) A e. CC /\ j e. ( M ... N ) ) -> B e. CC )
116	30, 111, 115	syl2an 289	. . . . . . . . 9 |- ( ( ph /\ j e. ( M..^ N ) ) -> B e. CC )
117	94	simprd 114	. . . . . . . . . . . 12 |- ( k = ( j + 1 ) -> V = X )
118	117	eleq1d 2300	. . . . . . . . . . 11 |- ( k = ( j + 1 ) -> ( V e. CC <-> X e. CC ) )
119	118	rspccva 2909	. . . . . . . . . 10 |- ( ( A. k e. ( M ... N ) V e. CC /\ ( j + 1 ) e. ( M ... N ) ) -> X e. CC )
120	35, 106, 119	syl2an 289	. . . . . . . . 9 |- ( ( ph /\ j e. ( M..^ N ) ) -> X e. CC )
121	110, 116, 120	subdird 8594	. . . . . . . 8 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( ( C - B ) x. X ) = ( ( C x. X ) - ( B x. X ) ) )
122	121	sumeq2dv 11929	. . . . . . 7 |- ( ph -> sum_ j e. ( M..^ N ) ( ( C - B ) x. X ) = sum_ j e. ( M..^ N ) ( ( C x. X ) - ( B x. X ) ) )
123		fzofig 10694	. . . . . . . . 9 |- ( ( M e. ZZ /\ N e. ZZ ) -> ( M..^ N ) e. Fin )
124	47, 51, 123	syl2anc 411	. . . . . . . 8 |- ( ph -> ( M..^ N ) e. Fin )
125	110, 120	mulcld 8200	. . . . . . . 8 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( C x. X ) e. CC )
126	116, 120	mulcld 8200	. . . . . . . 8 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( B x. X ) e. CC )
127	124, 125, 126	fsumsub 12014	. . . . . . 7 |- ( ph -> sum_ j e. ( M..^ N ) ( ( C x. X ) - ( B x. X ) ) = ( sum_ j e. ( M..^ N ) ( C x. X ) - sum_ j e. ( M..^ N ) ( B x. X ) ) )
128	122, 127	eqtrd 2264	. . . . . 6 |- ( ph -> sum_ j e. ( M..^ N ) ( ( C - B ) x. X ) = ( sum_ j e. ( M..^ N ) ( C x. X ) - sum_ j e. ( M..^ N ) ( B x. X ) ) )
129	128	adantr 276	. . . . 5 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ j e. ( M..^ N ) ( ( C - B ) x. X ) = ( sum_ j e. ( M..^ N ) ( C x. X ) - sum_ j e. ( M..^ N ) ( B x. X ) ) )
130	124, 126	fsumcl 11962	. . . . . . 7 |- ( ph -> sum_ j e. ( M..^ N ) ( B x. X ) e. CC )
131	130	adantr 276	. . . . . 6 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ j e. ( M..^ N ) ( B x. X ) e. CC )
132	75, 131, 65	subsub3d 8520	. . . . 5 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( ( E x. Z ) - ( sum_ j e. ( M..^ N ) ( B x. X ) - sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) ) ) = ( ( ( E x. Z ) + sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) ) - sum_ j e. ( M..^ N ) ( B x. X ) ) )
133	105, 129, 132	3eqtr4d 2274	. . . 4 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ j e. ( M..^ N ) ( ( C - B ) x. X ) = ( ( E x. Z ) - ( sum_ j e. ( M..^ N ) ( B x. X ) - sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) ) ) )
134	133	oveq2d 6034	. . 3 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( ( ( E x. Z ) - ( D x. Y ) ) - sum_ j e. ( M..^ N ) ( ( C - B ) x. X ) ) = ( ( ( E x. Z ) - ( D x. Y ) ) - ( ( E x. Z ) - ( sum_ j e. ( M..^ N ) ( B x. X ) - sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) ) ) ) )
135	37	adantr 276	. . . 4 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( D x. Y ) e. CC )
136	131, 65	subcld 8490	. . . 4 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( sum_ j e. ( M..^ N ) ( B x. X ) - sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) ) e. CC )
137	75, 135, 136	nnncan1d 8524	. . 3 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( ( ( E x. Z ) - ( D x. Y ) ) - ( ( E x. Z ) - ( sum_ j e. ( M..^ N ) ( B x. X ) - sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) ) ) ) = ( ( sum_ j e. ( M..^ N ) ( B x. X ) - sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) ) - ( D x. Y ) ) )
138	65, 135	addcomd 8330	. . . . . . 7 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) + ( D x. Y ) ) = ( ( D x. Y ) + sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) ) )
139		eluzp1m1 9780	. . . . . . . . . 10 |- ( ( M e. ZZ /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( N - 1 ) e. ( ZZ>= ` M ) )
140	47, 139	sylan 283	. . . . . . . . 9 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( N - 1 ) e. ( ZZ>= ` M ) )
141	85	eleq2d 2301	. . . . . . . . . . 11 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( k e. ( M..^ N ) <-> k e. ( M ... ( N - 1 ) ) ) )
142	141	biimpar 297	. . . . . . . . . 10 |- ( ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) /\ k e. ( M ... ( N - 1 ) ) ) -> k e. ( M..^ N ) )
143	142, 63	syldan 282	. . . . . . . . 9 |- ( ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) /\ k e. ( M ... ( N - 1 ) ) ) -> ( A x. V ) e. CC )
144	140, 143, 18	fsum1p 11980	. . . . . . . 8 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ k e. ( M ... ( N - 1 ) ) ( A x. V ) = ( ( D x. Y ) + sum_ k e. ( ( M + 1 ) ... ( N - 1 ) ) ( A x. V ) ) )
145	85	sumeq1d 11927	. . . . . . . 8 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ k e. ( M..^ N ) ( A x. V ) = sum_ k e. ( M ... ( N - 1 ) ) ( A x. V ) )
146	101	oveq2d 6034	. . . . . . . 8 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( ( D x. Y ) + sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) ) = ( ( D x. Y ) + sum_ k e. ( ( M + 1 ) ... ( N - 1 ) ) ( A x. V ) ) )
147	144, 145, 146	3eqtr4d 2274	. . . . . . 7 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ k e. ( M..^ N ) ( A x. V ) = ( ( D x. Y ) + sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) ) )
148	138, 147	eqtr4d 2267	. . . . . 6 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) + ( D x. Y ) ) = sum_ k e. ( M..^ N ) ( A x. V ) )
149		oveq12 6027	. . . . . . . 8 |- ( ( A = B /\ V = W ) -> ( A x. V ) = ( B x. W ) )
150	112, 149	syl 14	. . . . . . 7 |- ( k = j -> ( A x. V ) = ( B x. W ) )
151	150	cbvsumv 11922	. . . . . 6 |- sum_ k e. ( M..^ N ) ( A x. V ) = sum_ j e. ( M..^ N ) ( B x. W )
152	148, 151	eqtrdi 2280	. . . . 5 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) + ( D x. Y ) ) = sum_ j e. ( M..^ N ) ( B x. W ) )
153	152	oveq2d 6034	. . . 4 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( sum_ j e. ( M..^ N ) ( B x. X ) - ( sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) + ( D x. Y ) ) ) = ( sum_ j e. ( M..^ N ) ( B x. X ) - sum_ j e. ( M..^ N ) ( B x. W ) ) )
154	131, 65, 135	subsub4d 8521	. . . 4 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( ( sum_ j e. ( M..^ N ) ( B x. X ) - sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) ) - ( D x. Y ) ) = ( sum_ j e. ( M..^ N ) ( B x. X ) - ( sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) + ( D x. Y ) ) ) )
155	112	simprd 114	. . . . . . . . . . 11 |- ( k = j -> V = W )
156	155	eleq1d 2300	. . . . . . . . . 10 |- ( k = j -> ( V e. CC <-> W e. CC ) )
157	156	rspccva 2909	. . . . . . . . 9 |- ( ( A. k e. ( M ... N ) V e. CC /\ j e. ( M ... N ) ) -> W e. CC )
158	35, 111, 157	syl2an 289	. . . . . . . 8 |- ( ( ph /\ j e. ( M..^ N ) ) -> W e. CC )
159	116, 120, 158	subdid 8593	. . . . . . 7 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( B x. ( X - W ) ) = ( ( B x. X ) - ( B x. W ) ) )
160	159	sumeq2dv 11929	. . . . . 6 |- ( ph -> sum_ j e. ( M..^ N ) ( B x. ( X - W ) ) = sum_ j e. ( M..^ N ) ( ( B x. X ) - ( B x. W ) ) )
161	116, 158	mulcld 8200	. . . . . . 7 |- ( ( ph /\ j e. ( M..^ N ) ) -> ( B x. W ) e. CC )
162	124, 126, 161	fsumsub 12014	. . . . . 6 |- ( ph -> sum_ j e. ( M..^ N ) ( ( B x. X ) - ( B x. W ) ) = ( sum_ j e. ( M..^ N ) ( B x. X ) - sum_ j e. ( M..^ N ) ( B x. W ) ) )
163	160, 162	eqtrd 2264	. . . . 5 |- ( ph -> sum_ j e. ( M..^ N ) ( B x. ( X - W ) ) = ( sum_ j e. ( M..^ N ) ( B x. X ) - sum_ j e. ( M..^ N ) ( B x. W ) ) )
164	163	adantr 276	. . . 4 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ j e. ( M..^ N ) ( B x. ( X - W ) ) = ( sum_ j e. ( M..^ N ) ( B x. X ) - sum_ j e. ( M..^ N ) ( B x. W ) ) )
165	153, 154, 164	3eqtr4d 2274	. . 3 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> ( ( sum_ j e. ( M..^ N ) ( B x. X ) - sum_ k e. ( ( M + 1 )..^ N ) ( A x. V ) ) - ( D x. Y ) ) = sum_ j e. ( M..^ N ) ( B x. ( X - W ) ) )
166	134, 137, 165	3eqtrrd 2269	. 2 |- ( ( ph /\ N e. ( ZZ>= ` ( M + 1 ) ) ) -> sum_ j e. ( M..^ N ) ( B x. ( X - W ) ) = ( ( ( E x. Z ) - ( D x. Y ) ) - sum_ j e. ( M..^ N ) ( ( C - B ) x. X ) ) )
167		uzp1 9790	. . 3 |- ( N e. ( ZZ>= ` M ) -> ( N = M \/ N e. ( ZZ>= ` ( M + 1 ) ) ) )
168	9, 167	syl 14	. 2 |- ( ph -> ( N = M \/ N e. ( ZZ>= ` ( M + 1 ) ) ) )
169	45, 166, 168	mpjaodan 805	1 |- ( ph -> sum_ j e. ( M..^ N ) ( B x. ( X - W ) ) = ( ( ( E x. Z ) - ( D x. Y ) ) - sum_ j e. ( M..^ N ) ( ( C - B ) x. X ) ) )

Syntax hints:   -> wi 4   /\ wa 104   \/ wo 715   = wceq 1397   e. wcel 2202   A.wral 2510   C_ wss 3200   (/)c0 3494   ` cfv 5326  (class class class)co 6018   Fincfn 6909   CCcc 8030   0cc0 8032   1c1 8033   + caddc 8035   x. cmul 8037   - cmin 8350   ZZcz 9479   ZZ>=cuz 9755   ...cfz 10243  ..^cfzo 10377   sum_csu 11914

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 619  ax-in2 620  ax-io 716  ax-5 1495  ax-7 1496  ax-gen 1497  ax-ie1 1541  ax-ie2 1542  ax-8 1552  ax-10 1553  ax-11 1554  ax-i12 1555  ax-bndl 1557  ax-4 1558  ax-17 1574  ax-i9 1578  ax-ial 1582  ax-i5r 1583  ax-13 2204  ax-14 2205  ax-ext 2213  ax-coll 4204  ax-sep 4207  ax-nul 4215  ax-pow 4264  ax-pr 4299  ax-un 4530  ax-setind 4635  ax-iinf 4686  ax-cnex 8123  ax-resscn 8124  ax-1cn 8125  ax-1re 8126  ax-icn 8127  ax-addcl 8128  ax-addrcl 8129  ax-mulcl 8130  ax-mulrcl 8131  ax-addcom 8132  ax-mulcom 8133  ax-addass 8134  ax-mulass 8135  ax-distr 8136  ax-i2m1 8137  ax-0lt1 8138  ax-1rid 8139  ax-0id 8140  ax-rnegex 8141  ax-precex 8142  ax-cnre 8143  ax-pre-ltirr 8144  ax-pre-ltwlin 8145  ax-pre-lttrn 8146  ax-pre-apti 8147  ax-pre-ltadd 8148  ax-pre-mulgt0 8149  ax-pre-mulext 8150  ax-arch 8151  ax-caucvg 8152

This theorem depends on definitions:  df-bi 117  df-dc 842  df-3or 1005  df-3an 1006  df-tru 1400  df-fal 1403  df-nf 1509  df-sb 1811  df-eu 2082  df-mo 2083  df-clab 2218  df-cleq 2224  df-clel 2227  df-nfc 2363  df-ne 2403  df-nel 2498  df-ral 2515  df-rex 2516  df-reu 2517  df-rmo 2518  df-rab 2519  df-v 2804  df-sbc 3032  df-csb 3128  df-dif 3202  df-un 3204  df-in 3206  df-ss 3213  df-nul 3495  df-if 3606  df-pw 3654  df-sn 3675  df-pr 3676  df-op 3678  df-uni 3894  df-int 3929  df-iun 3972  df-br 4089  df-opab 4151  df-mpt 4152  df-tr 4188  df-id 4390  df-po 4393  df-iso 4394  df-iord 4463  df-on 4465  df-ilim 4466  df-suc 4468  df-iom 4689  df-xp 4731  df-rel 4732  df-cnv 4733  df-co 4734  df-dm 4735  df-rn 4736  df-res 4737  df-ima 4738  df-iota 5286  df-fun 5328  df-fn 5329  df-f 5330  df-f1 5331  df-fo 5332  df-f1o 5333  df-fv 5334  df-isom 5335  df-riota 5971  df-ov 6021  df-oprab 6022  df-mpo 6023  df-1st 6303  df-2nd 6304  df-recs 6471  df-irdg 6536  df-frec 6557  df-1o 6582  df-oadd 6586  df-er 6702  df-en 6910  df-dom 6911  df-fin 6912  df-pnf 8216  df-mnf 8217  df-xr 8218  df-ltxr 8219  df-le 8220  df-sub 8352  df-neg 8353  df-reap 8755  df-ap 8762  df-div 8853  df-inn 9144  df-2 9202  df-3 9203  df-4 9204  df-n0 9403  df-z 9480  df-uz 9756  df-q 9854  df-rp 9889  df-fz 10244  df-fzo 10378  df-seqfrec 10710  df-exp 10801  df-ihash 11038  df-cj 11403  df-re 11404  df-im 11405  df-rsqrt 11559  df-abs 11560  df-clim 11840  df-sumdc 11915

This theorem is referenced by: (None)