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

Theorem isercoll2 15690
Description: Generalize isercoll 15689 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 12627 . . . 4 1 ∈ ℤ
4 zsubcl 12639 . . . 4 ((1 ∈ ℤ ∧ 𝑀 ∈ ℤ) → (1 − 𝑀) ∈ ℤ)
53, 2, 4sylancr 587 . . 3 (𝜑 → (1 − 𝑀) ∈ ℤ)
6 seqex 14026 . . . 4 seq𝑀( + , 𝐻) ∈ V
76a1i 11 . . 3 (𝜑 → seq𝑀( + , 𝐻) ∈ V)
8 seqex 14026 . . . 4 seq1( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))) ∈ V
98a1i 11 . . 3 (𝜑 → seq1( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))) ∈ V)
10 simpr 484 . . . . . 6 ((𝜑𝑘𝑍) → 𝑘𝑍)
1110, 1eleqtrdi 2845 . . . . 5 ((𝜑𝑘𝑍) → 𝑘 ∈ (ℤ𝑀))
125adantr 480 . . . . 5 ((𝜑𝑘𝑍) → (1 − 𝑀) ∈ ℤ)
13 simpl 482 . . . . . 6 ((𝜑𝑘𝑍) → 𝜑)
14 elfzuz 13542 . . . . . . 7 (𝑗 ∈ (𝑀...𝑘) → 𝑗 ∈ (ℤ𝑀))
1514, 1eleqtrrdi 2846 . . . . . 6 (𝑗 ∈ (𝑀...𝑘) → 𝑗𝑍)
16 simpr 484 . . . . . . . . . . . . 13 ((𝜑𝑗𝑍) → 𝑗𝑍)
1716, 1eleqtrdi 2845 . . . . . . . . . . . 12 ((𝜑𝑗𝑍) → 𝑗 ∈ (ℤ𝑀))
18 eluzelz 12867 . . . . . . . . . . . 12 (𝑗 ∈ (ℤ𝑀) → 𝑗 ∈ ℤ)
1917, 18syl 17 . . . . . . . . . . 11 ((𝜑𝑗𝑍) → 𝑗 ∈ ℤ)
2019zcnd 12703 . . . . . . . . . 10 ((𝜑𝑗𝑍) → 𝑗 ∈ ℂ)
212zcnd 12703 . . . . . . . . . . 11 (𝜑𝑀 ∈ ℂ)
2221adantr 480 . . . . . . . . . 10 ((𝜑𝑗𝑍) → 𝑀 ∈ ℂ)
23 1cnd 11235 . . . . . . . . . 10 ((𝜑𝑗𝑍) → 1 ∈ ℂ)
2420, 22, 23subadd23d 11621 . . . . . . . . 9 ((𝜑𝑗𝑍) → ((𝑗𝑀) + 1) = (𝑗 + (1 − 𝑀)))
25 uznn0sub 12896 . . . . . . . . . . 11 (𝑗 ∈ (ℤ𝑀) → (𝑗𝑀) ∈ ℕ0)
2617, 25syl 17 . . . . . . . . . 10 ((𝜑𝑗𝑍) → (𝑗𝑀) ∈ ℕ0)
27 nn0p1nn 12545 . . . . . . . . . 10 ((𝑗𝑀) ∈ ℕ0 → ((𝑗𝑀) + 1) ∈ ℕ)
2826, 27syl 17 . . . . . . . . 9 ((𝜑𝑗𝑍) → ((𝑗𝑀) + 1) ∈ ℕ)
2924, 28eqeltrrd 2836 . . . . . . . 8 ((𝜑𝑗𝑍) → (𝑗 + (1 − 𝑀)) ∈ ℕ)
30 oveq1 7417 . . . . . . . . . . 11 (𝑥 = (𝑗 + (1 − 𝑀)) → (𝑥 − 1) = ((𝑗 + (1 − 𝑀)) − 1))
3130oveq2d 7426 . . . . . . . . . 10 (𝑥 = (𝑗 + (1 − 𝑀)) → (𝑀 + (𝑥 − 1)) = (𝑀 + ((𝑗 + (1 − 𝑀)) − 1)))
3231fveq2d 6885 . . . . . . . . 9 (𝑥 = (𝑗 + (1 − 𝑀)) → (𝐻‘(𝑀 + (𝑥 − 1))) = (𝐻‘(𝑀 + ((𝑗 + (1 − 𝑀)) − 1))))
33 eqid 2736 . . . . . . . . 9 (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1)))) = (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))
34 fvex 6894 . . . . . . . . 9 (𝐻‘(𝑀 + ((𝑗 + (1 − 𝑀)) − 1))) ∈ V
3532, 33, 34fvmpt 6991 . . . . . . . 8 ((𝑗 + (1 − 𝑀)) ∈ ℕ → ((𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))‘(𝑗 + (1 − 𝑀))) = (𝐻‘(𝑀 + ((𝑗 + (1 − 𝑀)) − 1))))
3629, 35syl 17 . . . . . . 7 ((𝜑𝑗𝑍) → ((𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))‘(𝑗 + (1 − 𝑀))) = (𝐻‘(𝑀 + ((𝑗 + (1 − 𝑀)) − 1))))
3724oveq1d 7425 . . . . . . . . . . 11 ((𝜑𝑗𝑍) → (((𝑗𝑀) + 1) − 1) = ((𝑗 + (1 − 𝑀)) − 1))
3826nn0cnd 12569 . . . . . . . . . . . 12 ((𝜑𝑗𝑍) → (𝑗𝑀) ∈ ℂ)
39 ax-1cn 11192 . . . . . . . . . . . 12 1 ∈ ℂ
40 pncan 11493 . . . . . . . . . . . 12 (((𝑗𝑀) ∈ ℂ ∧ 1 ∈ ℂ) → (((𝑗𝑀) + 1) − 1) = (𝑗𝑀))
4138, 39, 40sylancl 586 . . . . . . . . . . 11 ((𝜑𝑗𝑍) → (((𝑗𝑀) + 1) − 1) = (𝑗𝑀))
4237, 41eqtr3d 2773 . . . . . . . . . 10 ((𝜑𝑗𝑍) → ((𝑗 + (1 − 𝑀)) − 1) = (𝑗𝑀))
4342oveq2d 7426 . . . . . . . . 9 ((𝜑𝑗𝑍) → (𝑀 + ((𝑗 + (1 − 𝑀)) − 1)) = (𝑀 + (𝑗𝑀)))
4422, 20pncan3d 11602 . . . . . . . . 9 ((𝜑𝑗𝑍) → (𝑀 + (𝑗𝑀)) = 𝑗)
4543, 44eqtrd 2771 . . . . . . . 8 ((𝜑𝑗𝑍) → (𝑀 + ((𝑗 + (1 − 𝑀)) − 1)) = 𝑗)
4645fveq2d 6885 . . . . . . 7 ((𝜑𝑗𝑍) → (𝐻‘(𝑀 + ((𝑗 + (1 − 𝑀)) − 1))) = (𝐻𝑗))
4736, 46eqtr2d 2772 . . . . . 6 ((𝜑𝑗𝑍) → (𝐻𝑗) = ((𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))‘(𝑗 + (1 − 𝑀))))
4813, 15, 47syl2an 596 . . . . 5 (((𝜑𝑘𝑍) ∧ 𝑗 ∈ (𝑀...𝑘)) → (𝐻𝑗) = ((𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))‘(𝑗 + (1 − 𝑀))))
4911, 12, 48seqshft2 14051 . . . 4 ((𝜑𝑘𝑍) → (seq𝑀( + , 𝐻)‘𝑘) = (seq(𝑀 + (1 − 𝑀))( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1)))))‘(𝑘 + (1 − 𝑀))))
5021adantr 480 . . . . . . 7 ((𝜑𝑘𝑍) → 𝑀 ∈ ℂ)
51 pncan3 11495 . . . . . . 7 ((𝑀 ∈ ℂ ∧ 1 ∈ ℂ) → (𝑀 + (1 − 𝑀)) = 1)
5250, 39, 51sylancl 586 . . . . . 6 ((𝜑𝑘𝑍) → (𝑀 + (1 − 𝑀)) = 1)
5352seqeq1d 14030 . . . . 5 ((𝜑𝑘𝑍) → seq(𝑀 + (1 − 𝑀))( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))) = seq1( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))))
5453fveq1d 6883 . . . 4 ((𝜑𝑘𝑍) → (seq(𝑀 + (1 − 𝑀))( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1)))))‘(𝑘 + (1 − 𝑀))) = (seq1( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1)))))‘(𝑘 + (1 − 𝑀))))
5549, 54eqtr2d 2772 . . 3 ((𝜑𝑘𝑍) → (seq1( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1)))))‘(𝑘 + (1 − 𝑀))) = (seq𝑀( + , 𝐻)‘𝑘))
561, 2, 5, 7, 9, 55climshft2 15603 . 2 (𝜑 → (seq𝑀( + , 𝐻) ⇝ 𝐴 ↔ seq1( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))) ⇝ 𝐴))
57 isercoll2.w . . 3 𝑊 = (ℤ𝑁)
58 isercoll2.n . . 3 (𝜑𝑁 ∈ ℤ)
59 isercoll2.g . . . . . 6 (𝜑𝐺:𝑍𝑊)
6059adantr 480 . . . . 5 ((𝜑𝑥 ∈ ℕ) → 𝐺:𝑍𝑊)
61 uzid 12872 . . . . . . . 8 (𝑀 ∈ ℤ → 𝑀 ∈ (ℤ𝑀))
622, 61syl 17 . . . . . . 7 (𝜑𝑀 ∈ (ℤ𝑀))
63 nnm1nn0 12547 . . . . . . 7 (𝑥 ∈ ℕ → (𝑥 − 1) ∈ ℕ0)
64 uzaddcl 12925 . . . . . . 7 ((𝑀 ∈ (ℤ𝑀) ∧ (𝑥 − 1) ∈ ℕ0) → (𝑀 + (𝑥 − 1)) ∈ (ℤ𝑀))
6562, 63, 64syl2an 596 . . . . . 6 ((𝜑𝑥 ∈ ℕ) → (𝑀 + (𝑥 − 1)) ∈ (ℤ𝑀))
6665, 1eleqtrrdi 2846 . . . . 5 ((𝜑𝑥 ∈ ℕ) → (𝑀 + (𝑥 − 1)) ∈ 𝑍)
6760, 66ffvelcdmd 7080 . . . 4 ((𝜑𝑥 ∈ ℕ) → (𝐺‘(𝑀 + (𝑥 − 1))) ∈ 𝑊)
6867fmpttd 7110 . . 3 (𝜑 → (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))):ℕ⟶𝑊)
69 fveq2 6881 . . . . . . 7 (𝑘 = (𝑀 + (𝑗 − 1)) → (𝐺𝑘) = (𝐺‘(𝑀 + (𝑗 − 1))))
70 fvoveq1 7433 . . . . . . 7 (𝑘 = (𝑀 + (𝑗 − 1)) → (𝐺‘(𝑘 + 1)) = (𝐺‘((𝑀 + (𝑗 − 1)) + 1)))
7169, 70breq12d 5137 . . . . . 6 (𝑘 = (𝑀 + (𝑗 − 1)) → ((𝐺𝑘) < (𝐺‘(𝑘 + 1)) ↔ (𝐺‘(𝑀 + (𝑗 − 1))) < (𝐺‘((𝑀 + (𝑗 − 1)) + 1))))
72 isercoll2.i . . . . . . . 8 ((𝜑𝑘𝑍) → (𝐺𝑘) < (𝐺‘(𝑘 + 1)))
7372ralrimiva 3133 . . . . . . 7 (𝜑 → ∀𝑘𝑍 (𝐺𝑘) < (𝐺‘(𝑘 + 1)))
7473adantr 480 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → ∀𝑘𝑍 (𝐺𝑘) < (𝐺‘(𝑘 + 1)))
75 nnm1nn0 12547 . . . . . . . 8 (𝑗 ∈ ℕ → (𝑗 − 1) ∈ ℕ0)
76 uzaddcl 12925 . . . . . . . 8 ((𝑀 ∈ (ℤ𝑀) ∧ (𝑗 − 1) ∈ ℕ0) → (𝑀 + (𝑗 − 1)) ∈ (ℤ𝑀))
7762, 75, 76syl2an 596 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (𝑀 + (𝑗 − 1)) ∈ (ℤ𝑀))
7877, 1eleqtrrdi 2846 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → (𝑀 + (𝑗 − 1)) ∈ 𝑍)
7971, 74, 78rspcdva 3607 . . . . 5 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑀 + (𝑗 − 1))) < (𝐺‘((𝑀 + (𝑗 − 1)) + 1)))
80 nncn 12253 . . . . . . . . . 10 (𝑗 ∈ ℕ → 𝑗 ∈ ℂ)
8180adantl 481 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℂ)
82 1cnd 11235 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → 1 ∈ ℂ)
8381, 82, 82addsubd 11620 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → ((𝑗 + 1) − 1) = ((𝑗 − 1) + 1))
8483oveq2d 7426 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → (𝑀 + ((𝑗 + 1) − 1)) = (𝑀 + ((𝑗 − 1) + 1)))
8521adantr 480 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → 𝑀 ∈ ℂ)
8675adantl 481 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → (𝑗 − 1) ∈ ℕ0)
8786nn0cnd 12569 . . . . . . . 8 ((𝜑𝑗 ∈ ℕ) → (𝑗 − 1) ∈ ℂ)
8885, 87, 82addassd 11262 . . . . . . 7 ((𝜑𝑗 ∈ ℕ) → ((𝑀 + (𝑗 − 1)) + 1) = (𝑀 + ((𝑗 − 1) + 1)))
8984, 88eqtr4d 2774 . . . . . 6 ((𝜑𝑗 ∈ ℕ) → (𝑀 + ((𝑗 + 1) − 1)) = ((𝑀 + (𝑗 − 1)) + 1))
9089fveq2d 6885 . . . . 5 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑀 + ((𝑗 + 1) − 1))) = (𝐺‘((𝑀 + (𝑗 − 1)) + 1)))
9179, 90breqtrrd 5152 . . . 4 ((𝜑𝑗 ∈ ℕ) → (𝐺‘(𝑀 + (𝑗 − 1))) < (𝐺‘(𝑀 + ((𝑗 + 1) − 1))))
92 oveq1 7417 . . . . . . . 8 (𝑥 = 𝑗 → (𝑥 − 1) = (𝑗 − 1))
9392oveq2d 7426 . . . . . . 7 (𝑥 = 𝑗 → (𝑀 + (𝑥 − 1)) = (𝑀 + (𝑗 − 1)))
9493fveq2d 6885 . . . . . 6 (𝑥 = 𝑗 → (𝐺‘(𝑀 + (𝑥 − 1))) = (𝐺‘(𝑀 + (𝑗 − 1))))
95 eqid 2736 . . . . . 6 (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))) = (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))
96 fvex 6894 . . . . . 6 (𝐺‘(𝑀 + (𝑗 − 1))) ∈ V
9794, 95, 96fvmpt 6991 . . . . 5 (𝑗 ∈ ℕ → ((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘𝑗) = (𝐺‘(𝑀 + (𝑗 − 1))))
9897adantl 481 . . . 4 ((𝜑𝑗 ∈ ℕ) → ((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘𝑗) = (𝐺‘(𝑀 + (𝑗 − 1))))
99 peano2nn 12257 . . . . . 6 (𝑗 ∈ ℕ → (𝑗 + 1) ∈ ℕ)
10099adantl 481 . . . . 5 ((𝜑𝑗 ∈ ℕ) → (𝑗 + 1) ∈ ℕ)
101 oveq1 7417 . . . . . . . 8 (𝑥 = (𝑗 + 1) → (𝑥 − 1) = ((𝑗 + 1) − 1))
102101oveq2d 7426 . . . . . . 7 (𝑥 = (𝑗 + 1) → (𝑀 + (𝑥 − 1)) = (𝑀 + ((𝑗 + 1) − 1)))
103102fveq2d 6885 . . . . . 6 (𝑥 = (𝑗 + 1) → (𝐺‘(𝑀 + (𝑥 − 1))) = (𝐺‘(𝑀 + ((𝑗 + 1) − 1))))
104 fvex 6894 . . . . . 6 (𝐺‘(𝑀 + ((𝑗 + 1) − 1))) ∈ V
105103, 95, 104fvmpt 6991 . . . . 5 ((𝑗 + 1) ∈ ℕ → ((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘(𝑗 + 1)) = (𝐺‘(𝑀 + ((𝑗 + 1) − 1))))
106100, 105syl 17 . . . 4 ((𝜑𝑗 ∈ ℕ) → ((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘(𝑗 + 1)) = (𝐺‘(𝑀 + ((𝑗 + 1) − 1))))
10791, 98, 1063brtr4d 5156 . . 3 ((𝜑𝑗 ∈ ℕ) → ((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘𝑗) < ((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘(𝑗 + 1)))
10859ffnd 6712 . . . . . . . 8 (𝜑𝐺 Fn 𝑍)
109 uznn0sub 12896 . . . . . . . . . . . . 13 (𝑘 ∈ (ℤ𝑀) → (𝑘𝑀) ∈ ℕ0)
11011, 109syl 17 . . . . . . . . . . . 12 ((𝜑𝑘𝑍) → (𝑘𝑀) ∈ ℕ0)
111 nn0p1nn 12545 . . . . . . . . . . . 12 ((𝑘𝑀) ∈ ℕ0 → ((𝑘𝑀) + 1) ∈ ℕ)
112110, 111syl 17 . . . . . . . . . . 11 ((𝜑𝑘𝑍) → ((𝑘𝑀) + 1) ∈ ℕ)
113110nn0cnd 12569 . . . . . . . . . . . . . . 15 ((𝜑𝑘𝑍) → (𝑘𝑀) ∈ ℂ)
114 pncan 11493 . . . . . . . . . . . . . . 15 (((𝑘𝑀) ∈ ℂ ∧ 1 ∈ ℂ) → (((𝑘𝑀) + 1) − 1) = (𝑘𝑀))
115113, 39, 114sylancl 586 . . . . . . . . . . . . . 14 ((𝜑𝑘𝑍) → (((𝑘𝑀) + 1) − 1) = (𝑘𝑀))
116115oveq2d 7426 . . . . . . . . . . . . 13 ((𝜑𝑘𝑍) → (𝑀 + (((𝑘𝑀) + 1) − 1)) = (𝑀 + (𝑘𝑀)))
117 eluzelz 12867 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (ℤ𝑀) → 𝑘 ∈ ℤ)
118117, 1eleq2s 2853 . . . . . . . . . . . . . . 15 (𝑘𝑍𝑘 ∈ ℤ)
119118zcnd 12703 . . . . . . . . . . . . . 14 (𝑘𝑍𝑘 ∈ ℂ)
120 pncan3 11495 . . . . . . . . . . . . . 14 ((𝑀 ∈ ℂ ∧ 𝑘 ∈ ℂ) → (𝑀 + (𝑘𝑀)) = 𝑘)
12121, 119, 120syl2an 596 . . . . . . . . . . . . 13 ((𝜑𝑘𝑍) → (𝑀 + (𝑘𝑀)) = 𝑘)
122116, 121eqtr2d 2772 . . . . . . . . . . . 12 ((𝜑𝑘𝑍) → 𝑘 = (𝑀 + (((𝑘𝑀) + 1) − 1)))
123122fveq2d 6885 . . . . . . . . . . 11 ((𝜑𝑘𝑍) → (𝐺𝑘) = (𝐺‘(𝑀 + (((𝑘𝑀) + 1) − 1))))
124 oveq1 7417 . . . . . . . . . . . . . 14 (𝑥 = ((𝑘𝑀) + 1) → (𝑥 − 1) = (((𝑘𝑀) + 1) − 1))
125124oveq2d 7426 . . . . . . . . . . . . 13 (𝑥 = ((𝑘𝑀) + 1) → (𝑀 + (𝑥 − 1)) = (𝑀 + (((𝑘𝑀) + 1) − 1)))
126125fveq2d 6885 . . . . . . . . . . . 12 (𝑥 = ((𝑘𝑀) + 1) → (𝐺‘(𝑀 + (𝑥 − 1))) = (𝐺‘(𝑀 + (((𝑘𝑀) + 1) − 1))))
127126rspceeqv 3629 . . . . . . . . . . 11 ((((𝑘𝑀) + 1) ∈ ℕ ∧ (𝐺𝑘) = (𝐺‘(𝑀 + (((𝑘𝑀) + 1) − 1)))) → ∃𝑥 ∈ ℕ (𝐺𝑘) = (𝐺‘(𝑀 + (𝑥 − 1))))
128112, 123, 127syl2anc 584 . . . . . . . . . 10 ((𝜑𝑘𝑍) → ∃𝑥 ∈ ℕ (𝐺𝑘) = (𝐺‘(𝑀 + (𝑥 − 1))))
129 fvex 6894 . . . . . . . . . . 11 (𝐺𝑘) ∈ V
13095elrnmpt 5943 . . . . . . . . . . 11 ((𝐺𝑘) ∈ V → ((𝐺𝑘) ∈ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))) ↔ ∃𝑥 ∈ ℕ (𝐺𝑘) = (𝐺‘(𝑀 + (𝑥 − 1)))))
131129, 130ax-mp 5 . . . . . . . . . 10 ((𝐺𝑘) ∈ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))) ↔ ∃𝑥 ∈ ℕ (𝐺𝑘) = (𝐺‘(𝑀 + (𝑥 − 1))))
132128, 131sylibr 234 . . . . . . . . 9 ((𝜑𝑘𝑍) → (𝐺𝑘) ∈ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))))
133132ralrimiva 3133 . . . . . . . 8 (𝜑 → ∀𝑘𝑍 (𝐺𝑘) ∈ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))))
134 ffnfv 7114 . . . . . . . 8 (𝐺:𝑍⟶ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))) ↔ (𝐺 Fn 𝑍 ∧ ∀𝑘𝑍 (𝐺𝑘) ∈ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))))
135108, 133, 134sylanbrc 583 . . . . . . 7 (𝜑𝐺:𝑍⟶ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))))
136135frnd 6719 . . . . . 6 (𝜑 → ran 𝐺 ⊆ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))))
137136sscond 4126 . . . . 5 (𝜑 → (𝑊 ∖ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))) ⊆ (𝑊 ∖ ran 𝐺))
138137sselda 3963 . . . 4 ((𝜑𝑛 ∈ (𝑊 ∖ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))))) → 𝑛 ∈ (𝑊 ∖ ran 𝐺))
139 isercoll2.0 . . . 4 ((𝜑𝑛 ∈ (𝑊 ∖ ran 𝐺)) → (𝐹𝑛) = 0)
140138, 139syldan 591 . . 3 ((𝜑𝑛 ∈ (𝑊 ∖ ran (𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1)))))) → (𝐹𝑛) = 0)
141 isercoll2.f . . 3 ((𝜑𝑛𝑊) → (𝐹𝑛) ∈ ℂ)
142 fveq2 6881 . . . . . 6 (𝑘 = (𝑀 + (𝑗 − 1)) → (𝐻𝑘) = (𝐻‘(𝑀 + (𝑗 − 1))))
14369fveq2d 6885 . . . . . 6 (𝑘 = (𝑀 + (𝑗 − 1)) → (𝐹‘(𝐺𝑘)) = (𝐹‘(𝐺‘(𝑀 + (𝑗 − 1)))))
144142, 143eqeq12d 2752 . . . . 5 (𝑘 = (𝑀 + (𝑗 − 1)) → ((𝐻𝑘) = (𝐹‘(𝐺𝑘)) ↔ (𝐻‘(𝑀 + (𝑗 − 1))) = (𝐹‘(𝐺‘(𝑀 + (𝑗 − 1))))))
145 isercoll2.h . . . . . . 7 ((𝜑𝑘𝑍) → (𝐻𝑘) = (𝐹‘(𝐺𝑘)))
146145ralrimiva 3133 . . . . . 6 (𝜑 → ∀𝑘𝑍 (𝐻𝑘) = (𝐹‘(𝐺𝑘)))
147146adantr 480 . . . . 5 ((𝜑𝑗 ∈ ℕ) → ∀𝑘𝑍 (𝐻𝑘) = (𝐹‘(𝐺𝑘)))
148144, 147, 78rspcdva 3607 . . . 4 ((𝜑𝑗 ∈ ℕ) → (𝐻‘(𝑀 + (𝑗 − 1))) = (𝐹‘(𝐺‘(𝑀 + (𝑗 − 1)))))
14993fveq2d 6885 . . . . . 6 (𝑥 = 𝑗 → (𝐻‘(𝑀 + (𝑥 − 1))) = (𝐻‘(𝑀 + (𝑗 − 1))))
150 fvex 6894 . . . . . 6 (𝐻‘(𝑀 + (𝑗 − 1))) ∈ V
151149, 33, 150fvmpt 6991 . . . . 5 (𝑗 ∈ ℕ → ((𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))‘𝑗) = (𝐻‘(𝑀 + (𝑗 − 1))))
152151adantl 481 . . . 4 ((𝜑𝑗 ∈ ℕ) → ((𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))‘𝑗) = (𝐻‘(𝑀 + (𝑗 − 1))))
15398fveq2d 6885 . . . 4 ((𝜑𝑗 ∈ ℕ) → (𝐹‘((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘𝑗)) = (𝐹‘(𝐺‘(𝑀 + (𝑗 − 1)))))
154148, 152, 1533eqtr4d 2781 . . 3 ((𝜑𝑗 ∈ ℕ) → ((𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))‘𝑗) = (𝐹‘((𝑥 ∈ ℕ ↦ (𝐺‘(𝑀 + (𝑥 − 1))))‘𝑗)))
15557, 58, 68, 107, 140, 141, 154isercoll 15689 . 2 (𝜑 → (seq1( + , (𝑥 ∈ ℕ ↦ (𝐻‘(𝑀 + (𝑥 − 1))))) ⇝ 𝐴 ↔ seq𝑁( + , 𝐹) ⇝ 𝐴))
15656, 155bitrd 279 1 (𝜑 → (seq𝑀( + , 𝐻) ⇝ 𝐴 ↔ seq𝑁( + , 𝐹) ⇝ 𝐴))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1540  wcel 2109  wral 3052  wrex 3061  Vcvv 3464  cdif 3928   class class class wbr 5124  cmpt 5206  ran crn 5660   Fn wfn 6531  wf 6532  cfv 6536  (class class class)co 7410  cc 11132  0cc0 11134  1c1 11135   + caddc 11137   < clt 11274  cmin 11471  cn 12245  0cn0 12506  cz 12593  cuz 12857  ...cfz 13529  seqcseq 14024  cli 15505
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2708  ax-rep 5254  ax-sep 5271  ax-nul 5281  ax-pow 5340  ax-pr 5407  ax-un 7734  ax-inf2 9660  ax-cnex 11190  ax-resscn 11191  ax-1cn 11192  ax-icn 11193  ax-addcl 11194  ax-addrcl 11195  ax-mulcl 11196  ax-mulrcl 11197  ax-mulcom 11198  ax-addass 11199  ax-mulass 11200  ax-distr 11201  ax-i2m1 11202  ax-1ne0 11203  ax-1rid 11204  ax-rnegex 11205  ax-rrecex 11206  ax-cnre 11207  ax-pre-lttri 11208  ax-pre-lttrn 11209  ax-pre-ltadd 11210  ax-pre-mulgt0 11211  ax-pre-sup 11212
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2810  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3062  df-rmo 3364  df-reu 3365  df-rab 3421  df-v 3466  df-sbc 3771  df-csb 3880  df-dif 3934  df-un 3936  df-in 3938  df-ss 3948  df-pss 3951  df-nul 4314  df-if 4506  df-pw 4582  df-sn 4607  df-pr 4609  df-op 4613  df-uni 4889  df-int 4928  df-iun 4974  df-br 5125  df-opab 5187  df-mpt 5207  df-tr 5235  df-id 5553  df-eprel 5558  df-po 5566  df-so 5567  df-fr 5611  df-we 5613  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6295  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-om 7867  df-1st 7993  df-2nd 7994  df-frecs 8285  df-wrecs 8316  df-recs 8390  df-rdg 8429  df-1o 8485  df-oadd 8489  df-er 8724  df-en 8965  df-dom 8966  df-sdom 8967  df-fin 8968  df-sup 9459  df-card 9958  df-pnf 11276  df-mnf 11277  df-xr 11278  df-ltxr 11279  df-le 11280  df-sub 11473  df-neg 11474  df-nn 12246  df-n0 12507  df-xnn0 12580  df-z 12594  df-uz 12858  df-fz 13530  df-seq 14025  df-hash 14354  df-shft 15091  df-clim 15509
This theorem is referenced by:  iserodd  16860  stirlinglem5  46074
  Copyright terms: Public domain W3C validator