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

Theorem isercoll2 15722
Description: Generalize isercoll 15721 so that both sequences have arbitrary starting point. (Contributed by Mario Carneiro, 6-Apr-2015.)
Hypotheses
Ref Expression
isercoll2.z 𝑍 = (ℤ𝑀)
isercoll2.w 𝑊 = (ℤ𝑁)
isercoll2.m (𝜑𝑀 ∈ ℤ)
isercoll2.n (𝜑𝑁 ∈ ℤ)
isercoll2.g (𝜑𝐺:𝑍𝑊)
isercoll2.i ((𝜑𝑘𝑍) → (𝐺𝑘) < (𝐺‘(𝑘 + 1)))
isercoll2.0 ((𝜑𝑛 ∈ (𝑊 ∖ ran 𝐺)) → (𝐹𝑛) = 0)
isercoll2.f ((𝜑𝑛𝑊) → (𝐹𝑛) ∈ ℂ)
isercoll2.h ((𝜑𝑘𝑍) → (𝐻𝑘) = (𝐹‘(𝐺𝑘)))
Assertion
Ref Expression
isercoll2 (𝜑 → (seq𝑀( + , 𝐻) ⇝ 𝐴 ↔ seq𝑁( + , 𝐹) ⇝ 𝐴))
Distinct variable groups:   𝑘,𝑛,𝐴   𝑘,𝐹,𝑛   𝑘,𝐺,𝑛   𝑘,𝐻,𝑛   𝑛,𝑁   𝑘,𝑀,𝑛   𝜑,𝑘,𝑛   𝑛,𝑊   𝑘,𝑍
Allowed substitution hints:   𝑁(𝑘)   𝑊(𝑘)   𝑍(𝑛)

Proof of Theorem isercoll2
Dummy variables 𝑗 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 isercoll2.z . . 3 𝑍 = (ℤ𝑀)
2 isercoll2.m . . 3 (𝜑𝑀 ∈ ℤ)
3 1z 12625 . . . 4 1 ∈ ℤ
4 zsubcl 12637 . . . 4 ((1 ∈ ℤ ∧ 𝑀 ∈ ℤ) → (1 − 𝑀) ∈ ℤ)
53, 2, 4sylancr 598 . . 3 (𝜑 → (1 − 𝑀) ∈ ℤ)
6 seqex 14041 . . . 4 seq𝑀( + , 𝐻) ∈ V
76a1i 11 . . 3 (𝜑 → seq𝑀( + , 𝐻) ∈ V)
8 seqex 14041 . . . 4 seq1( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))) ∈ V
98a1i 11 . . 3 (𝜑 → seq1( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))) ∈ V)
10 simpr 489 . . . . . 6 ((𝜑𝑘𝑍) → 𝑘𝑍)
1110, 1eleqtrdi 2873 . . . . 5 ((𝜑𝑘𝑍) → 𝑘 ∈ (ℤ𝑀))
125adantr 485 . . . . 5 ((𝜑𝑘𝑍) → (1 − 𝑀) ∈ ℤ)
13 simpl 487 . . . . . 6 ((𝜑𝑘𝑍) → 𝜑)
14 elfzuz 13549 . . . . . . 7 (𝑗 ∈ (𝑀...𝑘) → 𝑗 ∈ (ℤ𝑀))
1514, 1eleqtrrdi 2874 . . . . . 6 (𝑗 ∈ (𝑀...𝑘) → 𝑗𝑍)
16 simpr 489 . . . . . . . . . . . . 13 ((𝜑𝑗𝑍) → 𝑗𝑍)
1716, 1eleqtrdi 2873 . . . . . . . . . . . 12 ((𝜑𝑗𝑍) → 𝑗 ∈ (ℤ𝑀))
18 eluzelz 12873 . . . . . . . . . . . 12 (𝑗 ∈ (ℤ𝑀) → 𝑗 ∈ ℤ)
1917, 18syl 18 . . . . . . . . . . 11 ((𝜑𝑗𝑍) → 𝑗 ∈ ℤ)
2019zcnd 12702 . . . . . . . . . 10 ((𝜑𝑗𝑍) → 𝑗 ∈ ℂ)
212zcnd 12702 . . . . . . . . . . 11 (𝜑𝑀 ∈ ℂ)
2221adantr 485 . . . . . . . . . 10 ((𝜑𝑗𝑍) → 𝑀 ∈ ℂ)
23 1cnd 11203 . . . . . . . . . 10 ((𝜑𝑗𝑍) → 1 ∈ ℂ)
2420, 22, 23subadd23d 11592 . . . . . . . . 9 ((𝜑𝑗𝑍) → ((𝑗𝑀) + 1) = (𝑗 + (1 − 𝑀)))
25 uznn0sub 12898 . . . . . . . . . . 11 (𝑗 ∈ (ℤ𝑀) → (𝑗𝑀) ∈ ℕ0)
2617, 25syl 18 . . . . . . . . . 10 ((𝜑𝑗𝑍) → (𝑗𝑀) ∈ ℕ0)
27 nn0p1nn 12544 . . . . . . . . . 10 ((𝑗𝑀) ∈ ℕ0 → ((𝑗𝑀) + 1) ∈ ℕ)
2826, 27syl 18 . . . . . . . . 9 ((𝜑𝑗𝑍) → ((𝑗𝑀) + 1) ∈ ℕ)
2924, 28eqeltrrd 2864 . . . . . . . 8 ((𝜑𝑗𝑍) → (𝑗 + (1 − 𝑀)) ∈ ℕ)
30 oveq1 7419 . . . . . . . . . . 11 (𝑥 = (𝑗 + (1 − 𝑀)) → (𝑥 − 1) = ((𝑗 + (1 − 𝑀)) − 1))
3130oveq2d 7428 . . . . . . . . . 10 (𝑥 = (𝑗 + (1 − 𝑀)) → (𝑀 + (𝑥 − 1)) = (𝑀 + ((𝑗 + (1 − 𝑀)) − 1)))
3231fveq2d 6887 . . . . . . . . 9 (𝑥 = (𝑗 + (1 − 𝑀)) → (𝐻‘(𝑀 + (𝑥 − 1))) = (𝐻‘(𝑀 + ((𝑗 + (1 − 𝑀)) − 1))))
33 eqid 2763 . . . . . . . . 9 (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1)))) = (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))
34 fvex 6896 . . . . . . . . 9 (𝐻‘(𝑀 + ((𝑗 + (1 − 𝑀)) − 1))) ∈ V
3532, 33, 34fvmpt 6991 . . . . . . . 8 ((𝑗 + (1 − 𝑀)) ∈ ℕ → ((𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))‘(𝑗 + (1 − 𝑀))) = (𝐻‘(𝑀 + ((𝑗 + (1 − 𝑀)) − 1))))
3629, 35syl 18 . . . . . . 7 ((𝜑𝑗𝑍) → ((𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))‘(𝑗 + (1 − 𝑀))) = (𝐻‘(𝑀 + ((𝑗 + (1 − 𝑀)) − 1))))
3724oveq1d 7427 . . . . . . . . . . 11 ((𝜑𝑗𝑍) → (((𝑗𝑀) + 1) − 1) = ((𝑗 + (1 − 𝑀)) − 1))
3826nn0cnd 12568 . . . . . . . . . . . 12 ((𝜑𝑗𝑍) → (𝑗𝑀) ∈ ℂ)
39 ax-1cn 11159 . . . . . . . . . . . 12 1 ∈ ℂ
40 pncan 11464 . . . . . . . . . . . 12 (((𝑗𝑀) ∈ ℂ ∧ 1 ∈ ℂ) → (((𝑗𝑀) + 1) − 1) = (𝑗𝑀))
4138, 39, 40sylancl 597 . . . . . . . . . . 11 ((𝜑𝑗𝑍) → (((𝑗𝑀) + 1) − 1) = (𝑗𝑀))
4237, 41eqtr3d 2800 . . . . . . . . . 10 ((𝜑𝑗𝑍) → ((𝑗 + (1 − 𝑀)) − 1) = (𝑗𝑀))
4342oveq2d 7428 . . . . . . . . 9 ((𝜑𝑗𝑍) → (𝑀 + ((𝑗 + (1 − 𝑀)) − 1)) = (𝑀 + (𝑗𝑀)))
4422, 20pncan3d 11573 . . . . . . . . 9 ((𝜑𝑗𝑍) → (𝑀 + (𝑗𝑀)) = 𝑗)
4543, 44eqtrd 2798 . . . . . . . 8 ((𝜑𝑗𝑍) → (𝑀 + ((𝑗 + (1 − 𝑀)) − 1)) = 𝑗)
4645fveq2d 6887 . . . . . . 7 ((𝜑𝑗𝑍) → (𝐻‘(𝑀 + ((𝑗 + (1 − 𝑀)) − 1))) = (𝐻𝑗))
4736, 46eqtr2d 2799 . . . . . 6 ((𝜑𝑗𝑍) → (𝐻𝑗) = ((𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))‘(𝑗 + (1 − 𝑀))))
4813, 15, 47syl2an 607 . . . . 5 (((𝜑𝑘𝑍) ∧ 𝑗 ∈ (𝑀...𝑘)) → (𝐻𝑗) = ((𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))‘(𝑗 + (1 − 𝑀))))
4911, 12, 48seqshft2 14066 . . . 4 ((𝜑𝑘𝑍) → (seq𝑀( + , 𝐻)‘𝑘) = (seq(𝑀 + (1 − 𝑀))( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1)))))‘(𝑘 + (1 − 𝑀))))
5021adantr 485 . . . . . . 7 ((𝜑𝑘𝑍) → 𝑀 ∈ ℂ)
51 pncan3 11466 . . . . . . 7 ((𝑀 ∈ ℂ ∧ 1 ∈ ℂ) → (𝑀 + (1 − 𝑀)) = 1)
5250, 39, 51sylancl 597 . . . . . 6 ((𝜑𝑘𝑍) → (𝑀 + (1 − 𝑀)) = 1)
5352seqeq1d 14045 . . . . 5 ((𝜑𝑘𝑍) → seq(𝑀 + (1 − 𝑀))( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))) = seq1( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))))
5453fveq1d 6885 . . . 4 ((𝜑𝑘𝑍) → (seq(𝑀 + (1 − 𝑀))( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1)))))‘(𝑘 + (1 − 𝑀))) = (seq1( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1)))))‘(𝑘 + (1 − 𝑀))))
5549, 54eqtr2d 2799 . . 3 ((𝜑𝑘𝑍) → (seq1( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1)))))‘(𝑘 + (1 − 𝑀))) = (seq𝑀( + , 𝐻)‘𝑘))
561, 2, 5, 7, 9, 55climshft2 15635 . 2 (𝜑 → (seq𝑀( + , 𝐻) ⇝ 𝐴 ↔ seq1( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))) ⇝ 𝐴))
57 isercoll2.w . . 3 𝑊 = (ℤ𝑁)
58 isercoll2.n . . 3 (𝜑𝑁 ∈ ℤ)
59 isercoll2.g . . . . . 6 (𝜑𝐺:𝑍𝑊)
6059adantr 485 . . . . 5 ((𝜑𝑥 ∈ ℕ) → 𝐺:𝑍𝑊)
61 uzid 12878 . . . . . . . 8 (𝑀 ∈ ℤ → 𝑀 ∈ (ℤ𝑀))
622, 61syl 18 . . . . . . 7 (𝜑𝑀 ∈ (ℤ𝑀))
63 nnm1nn0 12546 . . . . . . 7 (𝑥 ∈ ℕ → (𝑥 − 1) ∈ ℕ0)
64 uzaddcl 12929 . . . . . . 7 ((𝑀 ∈ (ℤ𝑀) ∧ (𝑥 − 1) ∈ ℕ0) → (𝑀 + (𝑥 − 1)) ∈ (ℤ𝑀))
6562, 63, 64syl2an 607 . . . . . 6 ((𝜑𝑥 ∈ ℕ) → (𝑀 + (𝑥 − 1)) ∈ (ℤ𝑀))
6665, 1eleqtrrdi 2874 . . . . 5 ((𝜑𝑥 ∈ ℕ) → (𝑀 + (𝑥 − 1)) ∈ 𝑍)
6760, 66ffvelcdmd 7082 . . . 4 ((𝜑𝑥 ∈ ℕ) → (𝐺‘(𝑀 + (𝑥 − 1))) ∈ 𝑊)
6867fmpttd 7112 . . 3 (𝜑 → (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))):ℕ⟶𝑊)
69 fveq2 6883 . . . . . . 7 (𝑘 = (𝑀 + (𝑗 − 1)) → (𝐺𝑘) = (𝐺‘(𝑀 + (𝑗 − 1))))
70 fvoveq1 7435 . . . . . . 7 (𝑘 = (𝑀 + (𝑗 − 1)) → (𝐺‘(𝑘 + 1)) = (𝐺‘((𝑀 + (𝑗 − 1)) + 1)))
7169, 70breq12d 5123 . . . . . 6 (𝑘 = (𝑀 + (𝑗 − 1)) → ((𝐺𝑘) < (𝐺‘(𝑘 + 1)) ↔ (𝐺‘(𝑀 + (𝑗 − 1))) < (𝐺‘((𝑀 + (𝑗 − 1)) + 1))))
72 isercoll2.i . . . . . . . 8 ((𝜑𝑘𝑍) → (𝐺𝑘) < (𝐺‘(𝑘 + 1)))
7372ralrimiva 3157 . . . . . . 7 (𝜑 → ∀𝑘𝑍 (𝐺𝑘) < (𝐺‘(𝑘 + 1)))
7473adantr 485 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → ∀𝑘𝑍 (𝐺𝑘) < (𝐺‘(𝑘 + 1)))
75 nnm1nn0 12546 . . . . . . . 8 (𝑗 ∈ ℕ → (𝑗 − 1) ∈ ℕ0)
76 uzaddcl 12929 . . . . . . . 8 ((𝑀 ∈ (ℤ𝑀) ∧ (𝑗 − 1) ∈ ℕ0) → (𝑀 + (𝑗 − 1)) ∈ (ℤ𝑀))
7762, 75, 76syl2an 607 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (𝑀 + (𝑗 − 1)) ∈ (ℤ𝑀))
7877, 1eleqtrrdi 2874 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → (𝑀 + (𝑗 − 1)) ∈ 𝑍)
7971, 74, 78rspcdva 3583 . . . . 5 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑀 + (𝑗 − 1))) < (𝐺‘((𝑀 + (𝑗 − 1)) + 1)))
80 nncn 12242 . . . . . . . . . 10 (𝑗 ∈ ℕ → 𝑗 ∈ ℂ)
8180adantl 486 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℂ)
82 1cnd 11203 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → 1 ∈ ℂ)
8381, 82, 82addsubd 11591 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → ((𝑗 + 1) − 1) = ((𝑗 − 1) + 1))
8483oveq2d 7428 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (𝑀 + ((𝑗 + 1) − 1)) = (𝑀 + ((𝑗 − 1) + 1)))
8521adantr 485 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → 𝑀 ∈ ℂ)
8675adantl 486 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (𝑗 − 1) ∈ ℕ0)
8786nn0cnd 12568 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (𝑗 − 1) ∈ ℂ)
8885, 87, 82addassd 11232 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → ((𝑀 + (𝑗 − 1)) + 1) = (𝑀 + ((𝑗 − 1) + 1)))
8984, 88eqtr4d 2801 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → (𝑀 + ((𝑗 + 1) − 1)) = ((𝑀 + (𝑗 − 1)) + 1))
9089fveq2d 6887 . . . . 5 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑀 + ((𝑗 + 1) − 1))) = (𝐺‘((𝑀 + (𝑗 − 1)) + 1)))
9179, 90breqtrrd 5140 . . . 4 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑀 + (𝑗 − 1))) < (𝐺‘(𝑀 + ((𝑗 + 1) − 1))))
92 oveq1 7419 . . . . . . . 8 (𝑥 = 𝑗 → (𝑥 − 1) = (𝑗 − 1))
9392oveq2d 7428 . . . . . . 7 (𝑥 = 𝑗 → (𝑀 + (𝑥 − 1)) = (𝑀 + (𝑗 − 1)))
9493fveq2d 6887 . . . . . 6 (𝑥 = 𝑗 → (𝐺‘(𝑀 + (𝑥 − 1))) = (𝐺‘(𝑀 + (𝑗 − 1))))
95 eqid 2763 . . . . . 6 (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))) = (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))
96 fvex 6896 . . . . . 6 (𝐺‘(𝑀 + (𝑗 − 1))) ∈ V
9794, 95, 96fvmpt 6991 . . . . 5 (𝑗 ∈ ℕ → ((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘𝑗) = (𝐺‘(𝑀 + (𝑗 − 1))))
9897adantl 486 . . . 4 ((𝜑𝑗 ∈ ℕ) → ((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘𝑗) = (𝐺‘(𝑀 + (𝑗 − 1))))
99 peano2nn 12246 . . . . . 6 (𝑗 ∈ ℕ → (𝑗 + 1) ∈ ℕ)
10099adantl 486 . . . . 5 ((𝜑𝑗 ∈ ℕ) → (𝑗 + 1) ∈ ℕ)
101 oveq1 7419 . . . . . . . 8 (𝑥 = (𝑗 + 1) → (𝑥 − 1) = ((𝑗 + 1) − 1))
102101oveq2d 7428 . . . . . . 7 (𝑥 = (𝑗 + 1) → (𝑀 + (𝑥 − 1)) = (𝑀 + ((𝑗 + 1) − 1)))
103102fveq2d 6887 . . . . . 6 (𝑥 = (𝑗 + 1) → (𝐺‘(𝑀 + (𝑥 − 1))) = (𝐺‘(𝑀 + ((𝑗 + 1) − 1))))
104 fvex 6896 . . . . . 6 (𝐺‘(𝑀 + ((𝑗 + 1) − 1))) ∈ V
105103, 95, 104fvmpt 6991 . . . . 5 ((𝑗 + 1) ∈ ℕ → ((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘(𝑗 + 1)) = (𝐺‘(𝑀 + ((𝑗 + 1) − 1))))
106100, 105syl 18 . . . 4 ((𝜑𝑗 ∈ ℕ) → ((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘(𝑗 + 1)) = (𝐺‘(𝑀 + ((𝑗 + 1) − 1))))
10791, 98, 1063brtr4d 5144 . . 3 ((𝜑𝑗 ∈ ℕ) → ((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘𝑗) < ((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘(𝑗 + 1)))
10859ffnd 6708 . . . . . . . 8 (𝜑𝐺 Fn 𝑍)
109 uznn0sub 12898 . . . . . . . . . . . . 13 (𝑘 ∈ (ℤ𝑀) → (𝑘𝑀) ∈ ℕ0)
11011, 109syl 18 . . . . . . . . . . . 12 ((𝜑𝑘𝑍) → (𝑘𝑀) ∈ ℕ0)
111 nn0p1nn 12544 . . . . . . . . . . . 12 ((𝑘𝑀) ∈ ℕ0 → ((𝑘𝑀) + 1) ∈ ℕ)
112110, 111syl 18 . . . . . . . . . . 11 ((𝜑𝑘𝑍) → ((𝑘𝑀) + 1) ∈ ℕ)
113110nn0cnd 12568 . . . . . . . . . . . . . . 15 ((𝜑𝑘𝑍) → (𝑘𝑀) ∈ ℂ)
114 pncan 11464 . . . . . . . . . . . . . . 15 (((𝑘𝑀) ∈ ℂ ∧ 1 ∈ ℂ) → (((𝑘𝑀) + 1) − 1) = (𝑘𝑀))
115113, 39, 114sylancl 597 . . . . . . . . . . . . . 14 ((𝜑𝑘𝑍) → (((𝑘𝑀) + 1) − 1) = (𝑘𝑀))
116115oveq2d 7428 . . . . . . . . . . . . 13 ((𝜑𝑘𝑍) → (𝑀 + (((𝑘𝑀) + 1) − 1)) = (𝑀 + (𝑘𝑀)))
117 eluzelz 12873 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (ℤ𝑀) → 𝑘 ∈ ℤ)
118117, 1eleq2s 2881 . . . . . . . . . . . . . . 15 (𝑘𝑍𝑘 ∈ ℤ)
119118zcnd 12702 . . . . . . . . . . . . . 14 (𝑘𝑍𝑘 ∈ ℂ)
120 pncan3 11466 . . . . . . . . . . . . . 14 ((𝑀 ∈ ℂ ∧ 𝑘 ∈ ℂ) → (𝑀 + (𝑘𝑀)) = 𝑘)
12121, 119, 120syl2an 607 . . . . . . . . . . . . 13 ((𝜑𝑘𝑍) → (𝑀 + (𝑘𝑀)) = 𝑘)
122116, 121eqtr2d 2799 . . . . . . . . . . . 12 ((𝜑𝑘𝑍) → 𝑘 = (𝑀 + (((𝑘𝑀) + 1) − 1)))
123122fveq2d 6887 . . . . . . . . . . 11 ((𝜑𝑘𝑍) → (𝐺𝑘) = (𝐺‘(𝑀 + (((𝑘𝑀) + 1) − 1))))
124 oveq1 7419 . . . . . . . . . . . . . 14 (𝑥 = ((𝑘𝑀) + 1) → (𝑥 − 1) = (((𝑘𝑀) + 1) − 1))
125124oveq2d 7428 . . . . . . . . . . . . 13 (𝑥 = ((𝑘𝑀) + 1) → (𝑀 + (𝑥 − 1)) = (𝑀 + (((𝑘𝑀) + 1) − 1)))
126125fveq2d 6887 . . . . . . . . . . . 12 (𝑥 = ((𝑘𝑀) + 1) → (𝐺‘(𝑀 + (𝑥 − 1))) = (𝐺‘(𝑀 + (((𝑘𝑀) + 1) − 1))))
127126rspceeqv 3605 . . . . . . . . . . 11 ((((𝑘𝑀) + 1) ∈ ℕ ∧ (𝐺𝑘) = (𝐺‘(𝑀 + (((𝑘𝑀) + 1) − 1)))) → ∃𝑥 ∈ ℕ (𝐺𝑘) = (𝐺‘(𝑀 + (𝑥 − 1))))
128112, 123, 127syl2anc 595 . . . . . . . . . 10 ((𝜑𝑘𝑍) → ∃𝑥 ∈ ℕ (𝐺𝑘) = (𝐺‘(𝑀 + (𝑥 − 1))))
129 fvex 6896 . . . . . . . . . . 11 (𝐺𝑘) ∈ V
13095elrnmpt 5950 . . . . . . . . . . 11 ((𝐺𝑘) ∈ V → ((𝐺𝑘) ∈ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))) ↔ ∃𝑥 ∈ ℕ (𝐺𝑘) = (𝐺‘(𝑀 + (𝑥 − 1)))))
131129, 130ax-mp 5 . . . . . . . . . 10 ((𝐺𝑘) ∈ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))) ↔ ∃𝑥 ∈ ℕ (𝐺𝑘) = (𝐺‘(𝑀 + (𝑥 − 1))))
132128, 131sylibr 237 . . . . . . . . 9 ((𝜑𝑘𝑍) → (𝐺𝑘) ∈ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))))
133132ralrimiva 3157 . . . . . . . 8 (𝜑 → ∀𝑘𝑍 (𝐺𝑘) ∈ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))))
134 ffnfv 7116 . . . . . . . 8 (𝐺:𝑍⟶ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))) ↔ (𝐺 Fn 𝑍 ∧ ∀𝑘𝑍 (𝐺𝑘) ∈ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))))
135108, 133, 134sylanbrc 594 . . . . . . 7 (𝜑𝐺:𝑍⟶ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))))
136135frnd 6716 . . . . . 6 (𝜑 → ran 𝐺 ⊆ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))))
137136sscond 4101 . . . . 5 (𝜑 → (𝑊 ∖ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))) ⊆ (𝑊 ∖ ran 𝐺))
138137sselda 3938 . . . 4 ((𝜑𝑛 ∈ (𝑊 ∖ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))))) → 𝑛 ∈ (𝑊 ∖ ran 𝐺))
139 isercoll2.0 . . . 4 ((𝜑𝑛 ∈ (𝑊 ∖ ran 𝐺)) → (𝐹𝑛) = 0)
140138, 139syldan 602 . . 3 ((𝜑𝑛 ∈ (𝑊 ∖ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))))) → (𝐹𝑛) = 0)
141 isercoll2.f . . 3 ((𝜑𝑛𝑊) → (𝐹𝑛) ∈ ℂ)
142 fveq2 6883 . . . . . 6 (𝑘 = (𝑀 + (𝑗 − 1)) → (𝐻𝑘) = (𝐻‘(𝑀 + (𝑗 − 1))))
14369fveq2d 6887 . . . . . 6 (𝑘 = (𝑀 + (𝑗 − 1)) → (𝐹‘(𝐺𝑘)) = (𝐹‘(𝐺‘(𝑀 + (𝑗 − 1)))))
144142, 143eqeq12d 2779 . . . . 5 (𝑘 = (𝑀 + (𝑗 − 1)) → ((𝐻𝑘) = (𝐹‘(𝐺𝑘)) ↔ (𝐻‘(𝑀 + (𝑗 − 1))) = (𝐹‘(𝐺‘(𝑀 + (𝑗 − 1))))))
145 isercoll2.h . . . . . . 7 ((𝜑𝑘𝑍) → (𝐻𝑘) = (𝐹‘(𝐺𝑘)))
146145ralrimiva 3157 . . . . . 6 (𝜑 → ∀𝑘𝑍 (𝐻𝑘) = (𝐹‘(𝐺𝑘)))
147146adantr 485 . . . . 5 ((𝜑𝑗 ∈ ℕ) → ∀𝑘𝑍 (𝐻𝑘) = (𝐹‘(𝐺𝑘)))
148144, 147, 78rspcdva 3583 . . . 4 ((𝜑𝑗 ∈ ℕ) → (𝐻‘(𝑀 + (𝑗 − 1))) = (𝐹‘(𝐺‘(𝑀 + (𝑗 − 1)))))
14993fveq2d 6887 . . . . . 6 (𝑥 = 𝑗 → (𝐻‘(𝑀 + (𝑥 − 1))) = (𝐻‘(𝑀 + (𝑗 − 1))))
150 fvex 6896 . . . . . 6 (𝐻‘(𝑀 + (𝑗 − 1))) ∈ V
151149, 33, 150fvmpt 6991 . . . . 5 (𝑗 ∈ ℕ → ((𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))‘𝑗) = (𝐻‘(𝑀 + (𝑗 − 1))))
152151adantl 486 . . . 4 ((𝜑𝑗 ∈ ℕ) → ((𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))‘𝑗) = (𝐻‘(𝑀 + (𝑗 − 1))))
15398fveq2d 6887 . . . 4 ((𝜑𝑗 ∈ ℕ) → (𝐹‘((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘𝑗)) = (𝐹‘(𝐺‘(𝑀 + (𝑗 − 1)))))
154148, 152, 1533eqtr4d 2808 . . 3 ((𝜑𝑗 ∈ ℕ) → ((𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))‘𝑗) = (𝐹‘((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘𝑗)))
15557, 58, 68, 107, 140, 141, 154isercoll 15721 . 2 (𝜑 → (seq1( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))) ⇝ 𝐴 ↔ seq𝑁( + , 𝐹) ⇝ 𝐴))
15656, 155bitrd 282 1 (𝜑 → (seq𝑀( + , 𝐻) ⇝ 𝐴 ↔ seq𝑁( + , 𝐹) ⇝ 𝐴))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 400   = wceq 1570  wcel 2143  wral 3079  wrex 3089  Vcvv 3455  cdif 3903   class class class wbr 5110  cmpt 5193  ran crn 5664   Fn wfn 6533  wf 6534  cfv 6538  (class class class)co 7412  cc 11099  0cc0 11101  1c1 11102   + caddc 11104   < clt 11244  cmin 11442  cn 12234  0cn0 12505  cz 12592  cuz 12863  ...cfz 13536  seqcseq 14039  cli 15537
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5239  ax-sep 5258  ax-nul 5270  ax-pow 5338  ax-pr 5406  ax-un 7734  ax-inf2 9611  ax-cnex 11157  ax-resscn 11158  ax-1cn 11159  ax-icn 11160  ax-addcl 11161  ax-addrcl 11162  ax-mulcl 11163  ax-mulrcl 11164  ax-mulcom 11165  ax-addass 11166  ax-mulass 11167  ax-distr 11168  ax-i2m1 11169  ax-1ne0 11170  ax-1rid 11171  ax-rnegex 11172  ax-rrecex 11173  ax-cnre 11174  ax-pre-lttri 11175  ax-pre-lttrn 11176  ax-pre-ltadd 11177  ax-pre-mulgt0 11178  ax-pre-sup 11179
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3746  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4288  df-if 4489  df-pw 4565  df-sn 4591  df-pr 4593  df-op 4597  df-uni 4874  df-int 4914  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7864  df-1st 7987  df-2nd 7988  df-frecs 8279  df-wrecs 8310  df-recs 8359  df-rdg 8398  df-1o 8454  df-oadd 8458  df-er 8695  df-en 8945  df-dom 8946  df-sdom 8947  df-fin 8948  df-sup 9403  df-card 9926  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11444  df-neg 11445  df-nn 12235  df-n0 12506  df-xnn0 12579  df-z 12593  df-uz 12864  df-fz 13537  df-seq 14040  df-hash 14369  df-shft 15106  df-clim 15541
This theorem is referenced by:  iserodd  16896  stirlinglem5  46772
  Copyright terms: Public domain W3C validator