Theorem seq3shft2 10787

Description: Shifting the index set of a sequence. (Contributed by Jim Kingdon, 15-Aug-2021.) (Revised by Jim Kingdon, 7-Apr-2023.)

Hypotheses

Ref	Expression
seq3shft2.1	⊢ (𝜑 → 𝑁 ∈ (ℤ≥‘𝑀))
seq3shft2.2	⊢ (𝜑 → 𝐾 ∈ ℤ)
seq3shft2.3	⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) → (𝐹‘𝑘) = (𝐺‘(𝑘 + 𝐾)))
seq3shft2.f	⊢ ((𝜑 ∧ 𝑥 ∈ (ℤ≥‘𝑀)) → (𝐹‘𝑥) ∈ 𝑆)
seq3shft2.g	⊢ ((𝜑 ∧ 𝑥 ∈ (ℤ≥‘(𝑀 + 𝐾))) → (𝐺‘𝑥) ∈ 𝑆)
seq3shft2.pl	⊢ ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆)) → (𝑥 + 𝑦) ∈ 𝑆)

Assertion

Ref	Expression
seq3shft2	⊢ (𝜑 → (seq𝑀( + , 𝐹)‘𝑁) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑁 + 𝐾)))

Distinct variable groups:   𝑥, + ,𝑦   𝑘,𝐹,𝑥   𝑦,𝐹   𝑘,𝐺,𝑥   𝑦,𝐺   𝑘,𝐾,𝑥   𝑦,𝐾   𝑘,𝑀,𝑥   𝑦,𝑀   𝑘,𝑁,𝑥   𝑦,𝑁   𝑥,𝑆,𝑦   𝜑,𝑘,𝑥   𝜑,𝑦

Allowed substitution hints:   + (𝑘)   𝑆(𝑘)

Proof of Theorem seq3shft2

Dummy variable 𝑛 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		seq3shft2.1	. . 3 ⊢ (𝜑 → 𝑁 ∈ (ℤ≥‘𝑀))
2		eluzfz2 10310	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘𝑀) → 𝑁 ∈ (𝑀...𝑁))
3	1, 2	syl 14	. 2 ⊢ (𝜑 → 𝑁 ∈ (𝑀...𝑁))
4		eleq1 2294	. . . . . 6 ⊢ (𝑥 = 𝑀 → (𝑥 ∈ (𝑀...𝑁) ↔ 𝑀 ∈ (𝑀...𝑁)))
5		fveq2 5648	. . . . . . 7 ⊢ (𝑥 = 𝑀 → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝑀( + , 𝐹)‘𝑀))
6		fvoveq1 6051	. . . . . . 7 ⊢ (𝑥 = 𝑀 → (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾)) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑀 + 𝐾)))
7	5, 6	eqeq12d 2246	. . . . . 6 ⊢ (𝑥 = 𝑀 → ((seq𝑀( + , 𝐹)‘𝑥) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾)) ↔ (seq𝑀( + , 𝐹)‘𝑀) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑀 + 𝐾))))
8	4, 7	imbi12d 234	. . . . 5 ⊢ (𝑥 = 𝑀 → ((𝑥 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾))) ↔ (𝑀 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑀) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑀 + 𝐾)))))
9	8	imbi2d 230	. . . 4 ⊢ (𝑥 = 𝑀 → ((𝜑 → (𝑥 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾)))) ↔ (𝜑 → (𝑀 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑀) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑀 + 𝐾))))))
10		eleq1 2294	. . . . . 6 ⊢ (𝑥 = 𝑛 → (𝑥 ∈ (𝑀...𝑁) ↔ 𝑛 ∈ (𝑀...𝑁)))
11		fveq2 5648	. . . . . . 7 ⊢ (𝑥 = 𝑛 → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝑀( + , 𝐹)‘𝑛))
12		fvoveq1 6051	. . . . . . 7 ⊢ (𝑥 = 𝑛 → (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾)) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑛 + 𝐾)))
13	11, 12	eqeq12d 2246	. . . . . 6 ⊢ (𝑥 = 𝑛 → ((seq𝑀( + , 𝐹)‘𝑥) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾)) ↔ (seq𝑀( + , 𝐹)‘𝑛) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑛 + 𝐾))))
14	10, 13	imbi12d 234	. . . . 5 ⊢ (𝑥 = 𝑛 → ((𝑥 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾))) ↔ (𝑛 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑛) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑛 + 𝐾)))))
15	14	imbi2d 230	. . . 4 ⊢ (𝑥 = 𝑛 → ((𝜑 → (𝑥 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾)))) ↔ (𝜑 → (𝑛 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑛) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑛 + 𝐾))))))
16		eleq1 2294	. . . . . 6 ⊢ (𝑥 = (𝑛 + 1) → (𝑥 ∈ (𝑀...𝑁) ↔ (𝑛 + 1) ∈ (𝑀...𝑁)))
17		fveq2 5648	. . . . . . 7 ⊢ (𝑥 = (𝑛 + 1) → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝑀( + , 𝐹)‘(𝑛 + 1)))
18		fvoveq1 6051	. . . . . . 7 ⊢ (𝑥 = (𝑛 + 1) → (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾)) = (seq(𝑀 + 𝐾)( + , 𝐺)‘((𝑛 + 1) + 𝐾)))
19	17, 18	eqeq12d 2246	. . . . . 6 ⊢ (𝑥 = (𝑛 + 1) → ((seq𝑀( + , 𝐹)‘𝑥) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾)) ↔ (seq𝑀( + , 𝐹)‘(𝑛 + 1)) = (seq(𝑀 + 𝐾)( + , 𝐺)‘((𝑛 + 1) + 𝐾))))
20	16, 19	imbi12d 234	. . . . 5 ⊢ (𝑥 = (𝑛 + 1) → ((𝑥 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾))) ↔ ((𝑛 + 1) ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘(𝑛 + 1)) = (seq(𝑀 + 𝐾)( + , 𝐺)‘((𝑛 + 1) + 𝐾)))))
21	20	imbi2d 230	. . . 4 ⊢ (𝑥 = (𝑛 + 1) → ((𝜑 → (𝑥 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾)))) ↔ (𝜑 → ((𝑛 + 1) ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘(𝑛 + 1)) = (seq(𝑀 + 𝐾)( + , 𝐺)‘((𝑛 + 1) + 𝐾))))))
22		eleq1 2294	. . . . . 6 ⊢ (𝑥 = 𝑁 → (𝑥 ∈ (𝑀...𝑁) ↔ 𝑁 ∈ (𝑀...𝑁)))
23		fveq2 5648	. . . . . . 7 ⊢ (𝑥 = 𝑁 → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝑀( + , 𝐹)‘𝑁))
24		fvoveq1 6051	. . . . . . 7 ⊢ (𝑥 = 𝑁 → (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾)) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑁 + 𝐾)))
25	23, 24	eqeq12d 2246	. . . . . 6 ⊢ (𝑥 = 𝑁 → ((seq𝑀( + , 𝐹)‘𝑥) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾)) ↔ (seq𝑀( + , 𝐹)‘𝑁) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑁 + 𝐾))))
26	22, 25	imbi12d 234	. . . . 5 ⊢ (𝑥 = 𝑁 → ((𝑥 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾))) ↔ (𝑁 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑁) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑁 + 𝐾)))))
27	26	imbi2d 230	. . . 4 ⊢ (𝑥 = 𝑁 → ((𝜑 → (𝑥 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑥 + 𝐾)))) ↔ (𝜑 → (𝑁 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑁) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑁 + 𝐾))))))
28		fveq2 5648	. . . . . . . 8 ⊢ (𝑘 = 𝑀 → (𝐹‘𝑘) = (𝐹‘𝑀))
29		fvoveq1 6051	. . . . . . . 8 ⊢ (𝑘 = 𝑀 → (𝐺‘(𝑘 + 𝐾)) = (𝐺‘(𝑀 + 𝐾)))
30	28, 29	eqeq12d 2246	. . . . . . 7 ⊢ (𝑘 = 𝑀 → ((𝐹‘𝑘) = (𝐺‘(𝑘 + 𝐾)) ↔ (𝐹‘𝑀) = (𝐺‘(𝑀 + 𝐾))))
31		seq3shft2.3	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) → (𝐹‘𝑘) = (𝐺‘(𝑘 + 𝐾)))
32	31	ralrimiva 2606	. . . . . . 7 ⊢ (𝜑 → ∀𝑘 ∈ (𝑀...𝑁)(𝐹‘𝑘) = (𝐺‘(𝑘 + 𝐾)))
33		eluzfz1 10309	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ≥‘𝑀) → 𝑀 ∈ (𝑀...𝑁))
34	1, 33	syl 14	. . . . . . 7 ⊢ (𝜑 → 𝑀 ∈ (𝑀...𝑁))
35	30, 32, 34	rspcdva 2916	. . . . . 6 ⊢ (𝜑 → (𝐹‘𝑀) = (𝐺‘(𝑀 + 𝐾)))
36		eluzel2 9803	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ≥‘𝑀) → 𝑀 ∈ ℤ)
37	1, 36	syl 14	. . . . . . 7 ⊢ (𝜑 → 𝑀 ∈ ℤ)
38		seq3shft2.f	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (ℤ≥‘𝑀)) → (𝐹‘𝑥) ∈ 𝑆)
39		seq3shft2.pl	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆)) → (𝑥 + 𝑦) ∈ 𝑆)
40	37, 38, 39	seq3-1 10768	. . . . . 6 ⊢ (𝜑 → (seq𝑀( + , 𝐹)‘𝑀) = (𝐹‘𝑀))
41		seq3shft2.2	. . . . . . . 8 ⊢ (𝜑 → 𝐾 ∈ ℤ)
42	37, 41	zaddcld 9649	. . . . . . 7 ⊢ (𝜑 → (𝑀 + 𝐾) ∈ ℤ)
43		seq3shft2.g	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (ℤ≥‘(𝑀 + 𝐾))) → (𝐺‘𝑥) ∈ 𝑆)
44	42, 43, 39	seq3-1 10768	. . . . . 6 ⊢ (𝜑 → (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑀 + 𝐾)) = (𝐺‘(𝑀 + 𝐾)))
45	35, 40, 44	3eqtr4d 2274	. . . . 5 ⊢ (𝜑 → (seq𝑀( + , 𝐹)‘𝑀) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑀 + 𝐾)))
46	45	a1i13 24	. . . 4 ⊢ (𝑀 ∈ ℤ → (𝜑 → (𝑀 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑀) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑀 + 𝐾)))))
47		peano2fzr 10315	. . . . . . . 8 ⊢ ((𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁)) → 𝑛 ∈ (𝑀...𝑁))
48	47	adantl 277	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → 𝑛 ∈ (𝑀...𝑁))
49	48	expr 375	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘𝑀)) → ((𝑛 + 1) ∈ (𝑀...𝑁) → 𝑛 ∈ (𝑀...𝑁)))
50	49	imim1d 75	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘𝑀)) → ((𝑛 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑛) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑛 + 𝐾))) → ((𝑛 + 1) ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑛) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑛 + 𝐾)))))
51		oveq1 6035	. . . . . 6 ⊢ ((seq𝑀( + , 𝐹)‘𝑛) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑛 + 𝐾)) → ((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1))) = ((seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑛 + 𝐾)) + (𝐹‘(𝑛 + 1))))
52		simprl 531	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → 𝑛 ∈ (ℤ≥‘𝑀))
53	38	adantlr 477	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) ∧ 𝑥 ∈ (ℤ≥‘𝑀)) → (𝐹‘𝑥) ∈ 𝑆)
54	39	adantlr 477	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) ∧ (𝑥 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆)) → (𝑥 + 𝑦) ∈ 𝑆)
55	52, 53, 54	seq3p1 10771	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (seq𝑀( + , 𝐹)‘(𝑛 + 1)) = ((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1))))
56	41	adantr 276	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → 𝐾 ∈ ℤ)
57		eluzadd 9828	. . . . . . . . . 10 ⊢ ((𝑛 ∈ (ℤ≥‘𝑀) ∧ 𝐾 ∈ ℤ) → (𝑛 + 𝐾) ∈ (ℤ≥‘(𝑀 + 𝐾)))
58	52, 56, 57	syl2anc 411	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (𝑛 + 𝐾) ∈ (ℤ≥‘(𝑀 + 𝐾)))
59	43	adantlr 477	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) ∧ 𝑥 ∈ (ℤ≥‘(𝑀 + 𝐾))) → (𝐺‘𝑥) ∈ 𝑆)
60	58, 59, 54	seq3p1 10771	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (seq(𝑀 + 𝐾)( + , 𝐺)‘((𝑛 + 𝐾) + 1)) = ((seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑛 + 𝐾)) + (𝐺‘((𝑛 + 𝐾) + 1))))
61		eluzelz 9808	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ (ℤ≥‘𝑀) → 𝑛 ∈ ℤ)
62	52, 61	syl 14	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → 𝑛 ∈ ℤ)
63	62	zcnd 9646	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → 𝑛 ∈ ℂ)
64		1cnd 8238	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → 1 ∈ ℂ)
65	56	zcnd 9646	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → 𝐾 ∈ ℂ)
66	63, 64, 65	add32d 8390	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → ((𝑛 + 1) + 𝐾) = ((𝑛 + 𝐾) + 1))
67	66	fveq2d 5652	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (seq(𝑀 + 𝐾)( + , 𝐺)‘((𝑛 + 1) + 𝐾)) = (seq(𝑀 + 𝐾)( + , 𝐺)‘((𝑛 + 𝐾) + 1)))
68		fveq2 5648	. . . . . . . . . . . 12 ⊢ (𝑘 = (𝑛 + 1) → (𝐹‘𝑘) = (𝐹‘(𝑛 + 1)))
69		fvoveq1 6051	. . . . . . . . . . . 12 ⊢ (𝑘 = (𝑛 + 1) → (𝐺‘(𝑘 + 𝐾)) = (𝐺‘((𝑛 + 1) + 𝐾)))
70	68, 69	eqeq12d 2246	. . . . . . . . . . 11 ⊢ (𝑘 = (𝑛 + 1) → ((𝐹‘𝑘) = (𝐺‘(𝑘 + 𝐾)) ↔ (𝐹‘(𝑛 + 1)) = (𝐺‘((𝑛 + 1) + 𝐾))))
71	32	adantr 276	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → ∀𝑘 ∈ (𝑀...𝑁)(𝐹‘𝑘) = (𝐺‘(𝑘 + 𝐾)))
72		simprr 533	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (𝑛 + 1) ∈ (𝑀...𝑁))
73	70, 71, 72	rspcdva 2916	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (𝐹‘(𝑛 + 1)) = (𝐺‘((𝑛 + 1) + 𝐾)))
74	66	fveq2d 5652	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (𝐺‘((𝑛 + 1) + 𝐾)) = (𝐺‘((𝑛 + 𝐾) + 1)))
75	73, 74	eqtrd 2264	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (𝐹‘(𝑛 + 1)) = (𝐺‘((𝑛 + 𝐾) + 1)))
76	75	oveq2d 6044	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → ((seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑛 + 𝐾)) + (𝐹‘(𝑛 + 1))) = ((seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑛 + 𝐾)) + (𝐺‘((𝑛 + 𝐾) + 1))))
77	60, 67, 76	3eqtr4d 2274	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (seq(𝑀 + 𝐾)( + , 𝐺)‘((𝑛 + 1) + 𝐾)) = ((seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑛 + 𝐾)) + (𝐹‘(𝑛 + 1))))
78	55, 77	eqeq12d 2246	. . . . . 6 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → ((seq𝑀( + , 𝐹)‘(𝑛 + 1)) = (seq(𝑀 + 𝐾)( + , 𝐺)‘((𝑛 + 1) + 𝐾)) ↔ ((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1))) = ((seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑛 + 𝐾)) + (𝐹‘(𝑛 + 1)))))
79	51, 78	imbitrrid 156	. . . . 5 ⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → ((seq𝑀( + , 𝐹)‘𝑛) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑛 + 𝐾)) → (seq𝑀( + , 𝐹)‘(𝑛 + 1)) = (seq(𝑀 + 𝐾)( + , 𝐺)‘((𝑛 + 1) + 𝐾))))
80	50, 79	animpimp2impd 561	. . . 4 ⊢ (𝑛 ∈ (ℤ≥‘𝑀) → ((𝜑 → (𝑛 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑛) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑛 + 𝐾)))) → (𝜑 → ((𝑛 + 1) ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘(𝑛 + 1)) = (seq(𝑀 + 𝐾)( + , 𝐺)‘((𝑛 + 1) + 𝐾))))))
81	9, 15, 21, 27, 46, 80	uzind4 9865	. . 3 ⊢ (𝑁 ∈ (ℤ≥‘𝑀) → (𝜑 → (𝑁 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑁) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑁 + 𝐾)))))
82	1, 81	mpcom 36	. 2 ⊢ (𝜑 → (𝑁 ∈ (𝑀...𝑁) → (seq𝑀( + , 𝐹)‘𝑁) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑁 + 𝐾))))
83	3, 82	mpd 13	1 ⊢ (𝜑 → (seq𝑀( + , 𝐹)‘𝑁) = (seq(𝑀 + 𝐾)( + , 𝐺)‘(𝑁 + 𝐾)))

Syntax hints:   → wi 4   ∧ wa 104   = wceq 1398   ∈ wcel 2202  ∀wral 2511  ‘cfv 5333  (class class class)co 6028  1c1 8076   + caddc 8078  ℤcz 9522  ℤ_≥cuz 9798  ...cfz 10286  seqcseq 10753

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 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-13 2204  ax-14 2205  ax-ext 2213  ax-coll 4209  ax-sep 4212  ax-nul 4220  ax-pow 4270  ax-pr 4305  ax-un 4536  ax-setind 4641  ax-iinf 4692  ax-cnex 8166  ax-resscn 8167  ax-1cn 8168  ax-1re 8169  ax-icn 8170  ax-addcl 8171  ax-addrcl 8172  ax-mulcl 8173  ax-addcom 8175  ax-addass 8177  ax-distr 8179  ax-i2m1 8180  ax-0lt1 8181  ax-0id 8183  ax-rnegex 8184  ax-cnre 8186  ax-pre-ltirr 8187  ax-pre-ltwlin 8188  ax-pre-lttrn 8189  ax-pre-ltadd 8191

This theorem depends on definitions:  df-bi 117  df-3or 1006  df-3an 1007  df-tru 1401  df-fal 1404  df-nf 1510  df-sb 1811  df-eu 2082  df-mo 2083  df-clab 2218  df-cleq 2224  df-clel 2227  df-nfc 2364  df-ne 2404  df-nel 2499  df-ral 2516  df-rex 2517  df-reu 2518  df-rab 2520  df-v 2805  df-sbc 3033  df-csb 3129  df-dif 3203  df-un 3205  df-in 3207  df-ss 3214  df-nul 3497  df-pw 3658  df-sn 3679  df-pr 3680  df-op 3682  df-uni 3899  df-int 3934  df-iun 3977  df-br 4094  df-opab 4156  df-mpt 4157  df-tr 4193  df-id 4396  df-iord 4469  df-on 4471  df-ilim 4472  df-suc 4474  df-iom 4695  df-xp 4737  df-rel 4738  df-cnv 4739  df-co 4740  df-dm 4741  df-rn 4742  df-res 4743  df-ima 4744  df-iota 5293  df-fun 5335  df-fn 5336  df-f 5337  df-f1 5338  df-fo 5339  df-f1o 5340  df-fv 5341  df-riota 5981  df-ov 6031  df-oprab 6032  df-mpo 6033  df-1st 6312  df-2nd 6313  df-recs 6514  df-frec 6600  df-pnf 8259  df-mnf 8260  df-xr 8261  df-ltxr 8262  df-le 8263  df-sub 8395  df-neg 8396  df-inn 9187  df-n0 9446  df-z 9523  df-uz 9799  df-fz 10287  df-seqfrec 10754

This theorem is referenced by:  seq3f1olemqsumkj  10817  seq3shft  11459  mulgnndir  13799