Metamath Proof Explorer


Theorem sumrblem

Description: Lemma for sumrb . (Contributed by Mario Carneiro, 12-Aug-2013)

Ref Expression
Hypotheses summo.1 ⊢ F = k ∈ ℤ ⟼ if k ∈ A B 0
summo.2 ⊢ φ ∧ k ∈ A → B ∈ ℂ
sumrb.3 ⊢ φ → N ∈ ℤ ≥ M
Assertion sumrblem ⊢ φ ∧ A ⊆ ℤ ≥ N → seq M + F ↾ ℤ ≥ N = seq N + F

Proof

Step Hyp Ref Expression
1 summo.1 ⊢ F = k ∈ ℤ ⟼ if k ∈ A B 0
2 summo.2 ⊢ φ ∧ k ∈ A → B ∈ ℂ
3 sumrb.3 ⊢ φ → N ∈ ℤ ≥ M
4 addlid ⊢ n ∈ ℂ → 0 + n = n
5 4 adantl ⊢ φ ∧ A ⊆ ℤ ≥ N ∧ n ∈ ℂ → 0 + n = n
6 0cnd ⊢ φ ∧ A ⊆ ℤ ≥ N → 0 ∈ ℂ
7 3 adantr ⊢ φ ∧ A ⊆ ℤ ≥ N → N ∈ ℤ ≥ M
8 iftrue ⊢ k ∈ A → if k ∈ A B 0 = B
9 8 adantl ⊢ φ ∧ k ∈ A → if k ∈ A B 0 = B
10 9 2 eqeltrd ⊢ φ ∧ k ∈ A → if k ∈ A B 0 ∈ ℂ
11 10 ex ⊢ φ → k ∈ A → if k ∈ A B 0 ∈ ℂ
12 iffalse ⊢ ¬ k ∈ A → if k ∈ A B 0 = 0
13 0cn ⊢ 0 ∈ ℂ
14 12 13 eqeltrdi ⊢ ¬ k ∈ A → if k ∈ A B 0 ∈ ℂ
15 11 14 pm2.61d1 ⊢ φ → if k ∈ A B 0 ∈ ℂ
16 15 adantr ⊢ φ ∧ k ∈ ℤ → if k ∈ A B 0 ∈ ℂ
17 16 1 fmptd ⊢ φ → F : ℤ ⟶ ℂ
18 17 adantr ⊢ φ ∧ A ⊆ ℤ ≥ N → F : ℤ ⟶ ℂ
19 eluzelz ⊢ N ∈ ℤ ≥ M → N ∈ ℤ
20 3 19 syl ⊢ φ → N ∈ ℤ
21 20 adantr ⊢ φ ∧ A ⊆ ℤ ≥ N → N ∈ ℤ
22 18 21 ffvelcdmd ⊢ φ ∧ A ⊆ ℤ ≥ N → F ⁡ N ∈ ℂ
23 elfzelz ⊢ n ∈ M … N − 1 → n ∈ ℤ
24 23 adantl ⊢ φ ∧ A ⊆ ℤ ≥ N ∧ n ∈ M … N − 1 → n ∈ ℤ
25 simplr ⊢ φ ∧ A ⊆ ℤ ≥ N ∧ n ∈ M … N − 1 → A ⊆ ℤ ≥ N
26 20 zcnd ⊢ φ → N ∈ ℂ
27 26 ad2antrr ⊢ φ ∧ A ⊆ ℤ ≥ N ∧ n ∈ M … N − 1 → N ∈ ℂ
28 ax-1cn ⊢ 1 ∈ ℂ
29 npcan ⊢ N ∈ ℂ ∧ 1 ∈ ℂ → N - 1 + 1 = N
30 27 28 29 sylancl ⊢ φ ∧ A ⊆ ℤ ≥ N ∧ n ∈ M … N − 1 → N - 1 + 1 = N
31 30 fveq2d ⊢ φ ∧ A ⊆ ℤ ≥ N ∧ n ∈ M … N − 1 → ℤ ≥ N - 1 + 1 = ℤ ≥ N
32 25 31 sseqtrrd ⊢ φ ∧ A ⊆ ℤ ≥ N ∧ n ∈ M … N − 1 → A ⊆ ℤ ≥ N - 1 + 1
33 fznuz ⊢ n ∈ M … N − 1 → ¬ n ∈ ℤ ≥ N - 1 + 1
34 33 adantl ⊢ φ ∧ A ⊆ ℤ ≥ N ∧ n ∈ M … N − 1 → ¬ n ∈ ℤ ≥ N - 1 + 1
35 32 34 ssneldd ⊢ φ ∧ A ⊆ ℤ ≥ N ∧ n ∈ M … N − 1 → ¬ n ∈ A
36 24 35 eldifd ⊢ φ ∧ A ⊆ ℤ ≥ N ∧ n ∈ M … N − 1 → n ∈ ℤ ∖ A
37 fveqeq2 ⊢ k = n → F ⁡ k = 0 ↔ F ⁡ n = 0
38 eldifi ⊢ k ∈ ℤ ∖ A → k ∈ ℤ
39 eldifn ⊢ k ∈ ℤ ∖ A → ¬ k ∈ A
40 39 12 syl ⊢ k ∈ ℤ ∖ A → if k ∈ A B 0 = 0
41 40 13 eqeltrdi ⊢ k ∈ ℤ ∖ A → if k ∈ A B 0 ∈ ℂ
42 1 fvmpt2 ⊢ k ∈ ℤ ∧ if k ∈ A B 0 ∈ ℂ → F ⁡ k = if k ∈ A B 0
43 38 41 42 syl2anc ⊢ k ∈ ℤ ∖ A → F ⁡ k = if k ∈ A B 0
44 43 40 eqtrd ⊢ k ∈ ℤ ∖ A → F ⁡ k = 0
45 37 44 vtoclga ⊢ n ∈ ℤ ∖ A → F ⁡ n = 0
46 36 45 syl ⊢ φ ∧ A ⊆ ℤ ≥ N ∧ n ∈ M … N − 1 → F ⁡ n = 0
47 5 6 7 22 46 seqid ⊢ φ ∧ A ⊆ ℤ ≥ N → seq M + F ↾ ℤ ≥ N = seq N + F