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

Theorem seqf1olem2 14074
Description: Lemma for seqf1o 14075. (Contributed by Mario Carneiro, 27-Feb-2014.) (Revised by Mario Carneiro, 24-Apr-2016.)
Hypotheses
Ref Expression
seqf1o.1 ((𝜑 ∧ (𝑥𝑆𝑦𝑆)) → (𝑥 + 𝑦) ∈ 𝑆)
seqf1o.2 ((𝜑 ∧ (𝑥𝐶𝑦𝐶)) → (𝑥 + 𝑦) = (𝑦 + 𝑥))
seqf1o.3 ((𝜑 ∧ (𝑥𝑆𝑦𝑆𝑧𝑆)) → ((𝑥 + 𝑦) + 𝑧) = (𝑥 + (𝑦 + 𝑧)))
seqf1o.4 (𝜑𝑁 ∈ (ℤ𝑀))
seqf1o.5 (𝜑𝐶𝑆)
seqf1olem.5 (𝜑𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
seqf1olem.6 (𝜑𝐺:(𝑀...(𝑁 + 1))⟶𝐶)
seqf1olem.7 𝐽 = (𝑘 ∈ (𝑀...𝑁) ↦ (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))
seqf1olem.8 𝐾 = (𝐹‘(𝑁 + 1))
seqf1olem.9 (𝜑 → ∀𝑔𝑓((𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ 𝑔:(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , 𝑔)‘𝑁)))
Assertion
Ref Expression
seqf1olem2 (𝜑 → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = (seq𝑀( + , 𝐺)‘(𝑁 + 1)))
Distinct variable groups:   𝑓,𝑔,𝑘,𝑥,𝑦,𝑧,𝐹   𝑓,𝐺,𝑔,𝑘,𝑥,𝑦,𝑧   𝑓,𝑀,𝑔,𝑘,𝑥,𝑦,𝑧   + ,𝑓,𝑔,𝑘,𝑥,𝑦,𝑧   𝑓,𝐽,𝑔,𝑥,𝑦,𝑧   𝑓,𝑁,𝑔,𝑘,𝑥,𝑦,𝑧   𝑘,𝐾,𝑥,𝑦,𝑧   𝜑,𝑓,𝑔,𝑘,𝑥,𝑦,𝑧   𝑆,𝑘,𝑥,𝑦,𝑧   𝐶,𝑓,𝑔,𝑘,𝑥,𝑦,𝑧
Allowed substitution hints:   𝑆(𝑓,𝑔)   𝐽(𝑘)   𝐾(𝑓,𝑔)

Proof of Theorem seqf1olem2
StepHypRef Expression
1 seqf1olem.6 . . . . . . . . . 10 (𝜑𝐺:(𝑀...(𝑁 + 1))⟶𝐶)
21ffnd 6706 . . . . . . . . 9 (𝜑𝐺 Fn (𝑀...(𝑁 + 1)))
3 fzssp1 13591 . . . . . . . . 9 (𝑀...𝑁) ⊆ (𝑀...(𝑁 + 1))
4 fnssres 6658 . . . . . . . . 9 ((𝐺 Fn (𝑀...(𝑁 + 1)) ∧ (𝑀...𝑁) ⊆ (𝑀...(𝑁 + 1))) → (𝐺 ↾ (𝑀...𝑁)) Fn (𝑀...𝑁))
52, 3, 4sylancl 597 . . . . . . . 8 (𝜑 → (𝐺 ↾ (𝑀...𝑁)) Fn (𝑀...𝑁))
6 fzfid 14005 . . . . . . . 8 (𝜑 → (𝑀...𝑁) ∈ Fin)
7 fnfi 9158 . . . . . . . 8 (((𝐺 ↾ (𝑀...𝑁)) Fn (𝑀...𝑁) ∧ (𝑀...𝑁) ∈ Fin) → (𝐺 ↾ (𝑀...𝑁)) ∈ Fin)
85, 6, 7syl2anc 595 . . . . . . 7 (𝜑 → (𝐺 ↾ (𝑀...𝑁)) ∈ Fin)
98elexd 3478 . . . . . 6 (𝜑 → (𝐺 ↾ (𝑀...𝑁)) ∈ V)
10 seqf1o.1 . . . . . . . . 9 ((𝜑 ∧ (𝑥𝑆𝑦𝑆)) → (𝑥 + 𝑦) ∈ 𝑆)
11 seqf1o.2 . . . . . . . . 9 ((𝜑 ∧ (𝑥𝐶𝑦𝐶)) → (𝑥 + 𝑦) = (𝑦 + 𝑥))
12 seqf1o.3 . . . . . . . . 9 ((𝜑 ∧ (𝑥𝑆𝑦𝑆𝑧𝑆)) → ((𝑥 + 𝑦) + 𝑧) = (𝑥 + (𝑦 + 𝑧)))
13 seqf1o.4 . . . . . . . . 9 (𝜑𝑁 ∈ (ℤ𝑀))
14 seqf1o.5 . . . . . . . . 9 (𝜑𝐶𝑆)
15 seqf1olem.5 . . . . . . . . 9 (𝜑𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
16 seqf1olem.7 . . . . . . . . 9 𝐽 = (𝑘 ∈ (𝑀...𝑁) ↦ (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))))
17 seqf1olem.8 . . . . . . . . 9 𝐾 = (𝐹‘(𝑁 + 1))
1810, 11, 12, 13, 14, 15, 1, 16, 17seqf1olem1 14073 . . . . . . . 8 (𝜑𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁))
19 f1of 6820 . . . . . . . 8 (𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) → 𝐽:(𝑀...𝑁)⟶(𝑀...𝑁))
2018, 19syl 18 . . . . . . 7 (𝜑𝐽:(𝑀...𝑁)⟶(𝑀...𝑁))
21 fex2 7929 . . . . . . 7 ((𝐽:(𝑀...𝑁)⟶(𝑀...𝑁) ∧ (𝑀...𝑁) ∈ Fin ∧ (𝑀...𝑁) ∈ Fin) → 𝐽 ∈ V)
2220, 6, 6, 21syl3anc 1398 . . . . . 6 (𝜑𝐽 ∈ V)
239, 22jca 520 . . . . 5 (𝜑 → ((𝐺 ↾ (𝑀...𝑁)) ∈ V ∧ 𝐽 ∈ V))
24 seqf1olem.9 . . . . 5 (𝜑 → ∀𝑔𝑓((𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ 𝑔:(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , 𝑔)‘𝑁)))
25 fssres 6744 . . . . . . 7 ((𝐺:(𝑀...(𝑁 + 1))⟶𝐶 ∧ (𝑀...𝑁) ⊆ (𝑀...(𝑁 + 1))) → (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶)
261, 3, 25sylancl 597 . . . . . 6 (𝜑 → (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶)
2718, 26jca 520 . . . . 5 (𝜑 → (𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶))
28 f1oeq1 6808 . . . . . . . 8 (𝑓 = 𝐽 → (𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ↔ 𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁)))
29 feq1 6683 . . . . . . . 8 (𝑔 = (𝐺 ↾ (𝑀...𝑁)) → (𝑔:(𝑀...𝑁)⟶𝐶 ↔ (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶))
3028, 29bi2anan9r 650 . . . . . . 7 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → ((𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ 𝑔:(𝑀...𝑁)⟶𝐶) ↔ (𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶)))
31 coeq1 5843 . . . . . . . . . . 11 (𝑔 = (𝐺 ↾ (𝑀...𝑁)) → (𝑔𝑓) = ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝑓))
32 coeq2 5844 . . . . . . . . . . 11 (𝑓 = 𝐽 → ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝑓) = ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))
3331, 32sylan9eq 2818 . . . . . . . . . 10 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → (𝑔𝑓) = ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))
3433seqeq3d 14041 . . . . . . . . 9 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → seq𝑀( + , (𝑔𝑓)) = seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)))
3534fveq1d 6883 . . . . . . . 8 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → (seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁))
36 simpl 487 . . . . . . . . . 10 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → 𝑔 = (𝐺 ↾ (𝑀...𝑁)))
3736seqeq3d 14041 . . . . . . . . 9 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → seq𝑀( + , 𝑔) = seq𝑀( + , (𝐺 ↾ (𝑀...𝑁))))
3837fveq1d 6883 . . . . . . . 8 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → (seq𝑀( + , 𝑔)‘𝑁) = (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁))
3935, 38eqeq12d 2779 . . . . . . 7 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → ((seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , 𝑔)‘𝑁) ↔ (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁)))
4030, 39imbi12d 347 . . . . . 6 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → (((𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ 𝑔:(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , 𝑔)‘𝑁)) ↔ ((𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁))))
4140spc2gv 3559 . . . . 5 (((𝐺 ↾ (𝑀...𝑁)) ∈ V ∧ 𝐽 ∈ V) → (∀𝑔𝑓((𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ 𝑔:(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , 𝑔)‘𝑁)) → ((𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁))))
4223, 24, 27, 41syl3c 67 . . . 4 (𝜑 → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁))
43 fvres 6900 . . . . . 6 (𝑥 ∈ (𝑀...𝑁) → ((𝐺 ↾ (𝑀...𝑁))‘𝑥) = (𝐺𝑥))
4443adantl 486 . . . . 5 ((𝜑𝑥 ∈ (𝑀...𝑁)) → ((𝐺 ↾ (𝑀...𝑁))‘𝑥) = (𝐺𝑥))
4513, 44seqfveq 14058 . . . 4 (𝜑 → (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁) = (seq𝑀( + , 𝐺)‘𝑁))
4642, 45eqtrd 2798 . . 3 (𝜑 → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , 𝐺)‘𝑁))
4746oveq1d 7425 . 2 (𝜑 → ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))) = ((seq𝑀( + , 𝐺)‘𝑁) + (𝐺‘(𝑁 + 1))))
4810adantlr 727 . . . . 5 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ (𝑥𝑆𝑦𝑆)) → (𝑥 + 𝑦) ∈ 𝑆)
4912adantlr 727 . . . . 5 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ (𝑥𝑆𝑦𝑆𝑧𝑆)) → ((𝑥 + 𝑦) + 𝑧) = (𝑥 + (𝑦 + 𝑧)))
50 elfzuz3 13544 . . . . . . 7 (𝐾 ∈ (𝑀...𝑁) → 𝑁 ∈ (ℤ𝐾))
5150adantl 486 . . . . . 6 ((𝜑𝐾 ∈ (𝑀...𝑁)) → 𝑁 ∈ (ℤ𝐾))
52 eluzp1p1 12885 . . . . . 6 (𝑁 ∈ (ℤ𝐾) → (𝑁 + 1) ∈ (ℤ‘(𝐾 + 1)))
5351, 52syl 18 . . . . 5 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (𝑁 + 1) ∈ (ℤ‘(𝐾 + 1)))
54 elfzuz 13543 . . . . . 6 (𝐾 ∈ (𝑀...𝑁) → 𝐾 ∈ (ℤ𝑀))
5554adantl 486 . . . . 5 ((𝜑𝐾 ∈ (𝑀...𝑁)) → 𝐾 ∈ (ℤ𝑀))
56 f1of 6820 . . . . . . . . . 10 (𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
5715, 56syl 18 . . . . . . . . 9 (𝜑𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
58 fco 6730 . . . . . . . . 9 ((𝐺:(𝑀...(𝑁 + 1))⟶𝐶𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1))) → (𝐺𝐹):(𝑀...(𝑁 + 1))⟶𝐶)
591, 57, 58syl2anc 595 . . . . . . . 8 (𝜑 → (𝐺𝐹):(𝑀...(𝑁 + 1))⟶𝐶)
6059, 14fssd 6723 . . . . . . 7 (𝜑 → (𝐺𝐹):(𝑀...(𝑁 + 1))⟶𝑆)
6160ffvelcdmda 7079 . . . . . 6 ((𝜑𝑥 ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘𝑥) ∈ 𝑆)
6261adantlr 727 . . . . 5 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ 𝑥 ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘𝑥) ∈ 𝑆)
6348, 49, 53, 55, 62seqsplit 14067 . . . 4 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))))
64 elfzp12 13627 . . . . . . 7 (𝑁 ∈ (ℤ𝑀) → (𝐾 ∈ (𝑀...𝑁) ↔ (𝐾 = 𝑀𝐾 ∈ ((𝑀 + 1)...𝑁))))
6564biimpa 481 . . . . . 6 ((𝑁 ∈ (ℤ𝑀) ∧ 𝐾 ∈ (𝑀...𝑁)) → (𝐾 = 𝑀𝐾 ∈ ((𝑀 + 1)...𝑁)))
6613, 65sylan 591 . . . . 5 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (𝐾 = 𝑀𝐾 ∈ ((𝑀 + 1)...𝑁)))
67 seqeq1 14036 . . . . . . . . . . 11 (𝐾 = 𝑀 → seq𝐾( + , (𝐺𝐹)) = seq𝑀( + , (𝐺𝐹)))
6867eqcomd 2769 . . . . . . . . . 10 (𝐾 = 𝑀 → seq𝑀( + , (𝐺𝐹)) = seq𝐾( + , (𝐺𝐹)))
6968fveq1d 6883 . . . . . . . . 9 (𝐾 = 𝑀 → (seq𝑀( + , (𝐺𝐹))‘𝐾) = (seq𝐾( + , (𝐺𝐹))‘𝐾))
70 f1ocnv 6833 . . . . . . . . . . . . 13 (𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
71 f1of 6820 . . . . . . . . . . . . 13 (𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
7215, 70, 713syl 19 . . . . . . . . . . . 12 (𝜑𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
73 peano2uz 12920 . . . . . . . . . . . . 13 (𝑁 ∈ (ℤ𝑀) → (𝑁 + 1) ∈ (ℤ𝑀))
74 eluzfz2 13555 . . . . . . . . . . . . 13 ((𝑁 + 1) ∈ (ℤ𝑀) → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
7513, 73, 743syl 19 . . . . . . . . . . . 12 (𝜑 → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
7672, 75ffvelcdmd 7080 . . . . . . . . . . 11 (𝜑 → (𝐹‘(𝑁 + 1)) ∈ (𝑀...(𝑁 + 1)))
7717, 76eqeltrid 2867 . . . . . . . . . 10 (𝜑𝐾 ∈ (𝑀...(𝑁 + 1)))
78 elfzelz 13547 . . . . . . . . . 10 (𝐾 ∈ (𝑀...(𝑁 + 1)) → 𝐾 ∈ ℤ)
79 seq1 14046 . . . . . . . . . 10 (𝐾 ∈ ℤ → (seq𝐾( + , (𝐺𝐹))‘𝐾) = ((𝐺𝐹)‘𝐾))
8077, 78, 793syl 19 . . . . . . . . 9 (𝜑 → (seq𝐾( + , (𝐺𝐹))‘𝐾) = ((𝐺𝐹)‘𝐾))
8169, 80sylan9eqr 2820 . . . . . . . 8 ((𝜑𝐾 = 𝑀) → (seq𝑀( + , (𝐺𝐹))‘𝐾) = ((𝐺𝐹)‘𝐾))
8281oveq1d 7425 . . . . . . 7 ((𝜑𝐾 = 𝑀) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))))
83 simpr 489 . . . . . . . . 9 ((𝜑𝐾 = 𝑀) → 𝐾 = 𝑀)
84 eluzfz1 13554 . . . . . . . . . . 11 (𝑁 ∈ (ℤ𝑀) → 𝑀 ∈ (𝑀...𝑁))
8513, 84syl 18 . . . . . . . . . 10 (𝜑𝑀 ∈ (𝑀...𝑁))
8685adantr 485 . . . . . . . . 9 ((𝜑𝐾 = 𝑀) → 𝑀 ∈ (𝑀...𝑁))
8783, 86eqeltrd 2863 . . . . . . . 8 ((𝜑𝐾 = 𝑀) → 𝐾 ∈ (𝑀...𝑁))
8811adantlr 727 . . . . . . . . . 10 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ (𝑥𝐶𝑦𝐶)) → (𝑥 + 𝑦) = (𝑦 + 𝑥))
8914adantr 485 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → 𝐶𝑆)
9059adantr 485 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (𝐺𝐹):(𝑀...(𝑁 + 1))⟶𝐶)
9177adantr 485 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → 𝐾 ∈ (𝑀...(𝑁 + 1)))
92 peano2uz 12920 . . . . . . . . . . 11 (𝐾 ∈ (ℤ𝑀) → (𝐾 + 1) ∈ (ℤ𝑀))
93 fzss1 13587 . . . . . . . . . . 11 ((𝐾 + 1) ∈ (ℤ𝑀) → ((𝐾 + 1)...(𝑁 + 1)) ⊆ (𝑀...(𝑁 + 1)))
9455, 92, 933syl 19 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → ((𝐾 + 1)...(𝑁 + 1)) ⊆ (𝑀...(𝑁 + 1)))
9548, 88, 49, 53, 89, 90, 91, 94seqf1olem2a 14072 . . . . . . . . 9 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) + ((𝐺𝐹)‘𝐾)))
96 1zzd 12620 . . . . . . . . . . 11 ((𝜑𝐾 ∈ (𝑀...𝑁)) → 1 ∈ ℤ)
97 elfzuz 13543 . . . . . . . . . . . . . . . . . 18 (𝐾 ∈ (𝑀...(𝑁 + 1)) → 𝐾 ∈ (ℤ𝑀))
98 fzss1 13587 . . . . . . . . . . . . . . . . . 18 (𝐾 ∈ (ℤ𝑀) → (𝐾...𝑁) ⊆ (𝑀...𝑁))
9977, 97, 983syl 19 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐾...𝑁) ⊆ (𝑀...𝑁))
10099sselda 3937 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝐾...𝑁)) → 𝑥 ∈ (𝑀...𝑁))
10120ffvelcdmda 7079 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (𝐽𝑥) ∈ (𝑀...𝑁))
102100, 101syldan 602 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝐽𝑥) ∈ (𝑀...𝑁))
103102fvresd 6901 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝐾...𝑁)) → ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)) = (𝐺‘(𝐽𝑥)))
104 breq1 5112 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 𝑥 → (𝑘 < 𝐾𝑥 < 𝐾))
105 id 23 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 𝑥𝑘 = 𝑥)
106 oveq1 7417 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 𝑥 → (𝑘 + 1) = (𝑥 + 1))
107104, 105, 106ifbieq12d 4516 . . . . . . . . . . . . . . . . . . 19 (𝑘 = 𝑥 → if(𝑘 < 𝐾, 𝑘, (𝑘 + 1)) = if(𝑥 < 𝐾, 𝑥, (𝑥 + 1)))
108107fveq2d 6885 . . . . . . . . . . . . . . . . . 18 (𝑘 = 𝑥 → (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) = (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))))
109 fvex 6894 . . . . . . . . . . . . . . . . . 18 (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) ∈ V
110108, 16, 109fvmpt 6989 . . . . . . . . . . . . . . . . 17 (𝑥 ∈ (𝑀...𝑁) → (𝐽𝑥) = (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))))
111100, 110syl 18 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝐽𝑥) = (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))))
11277, 78syl 18 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝐾 ∈ ℤ)
113112zred 12695 . . . . . . . . . . . . . . . . . . 19 (𝜑𝐾 ∈ ℝ)
114113adantr 485 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ (𝐾...𝑁)) → 𝐾 ∈ ℝ)
115 elfzelz 13547 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ (𝐾...𝑁) → 𝑥 ∈ ℤ)
116115adantl 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑥 ∈ (𝐾...𝑁)) → 𝑥 ∈ ℤ)
117116zred 12695 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ (𝐾...𝑁)) → 𝑥 ∈ ℝ)
118 elfzle1 13550 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ (𝐾...𝑁) → 𝐾𝑥)
119118adantl 486 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ (𝐾...𝑁)) → 𝐾𝑥)
120114, 117, 119lensymd 11356 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ (𝐾...𝑁)) → ¬ 𝑥 < 𝐾)
121 iffalse 4496 . . . . . . . . . . . . . . . . . 18 𝑥 < 𝐾 → if(𝑥 < 𝐾, 𝑥, (𝑥 + 1)) = (𝑥 + 1))
122121fveq2d 6885 . . . . . . . . . . . . . . . . 17 𝑥 < 𝐾 → (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) = (𝐹‘(𝑥 + 1)))
123120, 122syl 18 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) = (𝐹‘(𝑥 + 1)))
124111, 123eqtrd 2798 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝐽𝑥) = (𝐹‘(𝑥 + 1)))
125124fveq2d 6885 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝐺‘(𝐽𝑥)) = (𝐺‘(𝐹‘(𝑥 + 1))))
126103, 125eqtrd 2798 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝐾...𝑁)) → ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)) = (𝐺‘(𝐹‘(𝑥 + 1))))
127 fvco3 6981 . . . . . . . . . . . . . . 15 ((𝐽:(𝑀...𝑁)⟶(𝑀...𝑁) ∧ 𝑥 ∈ (𝑀...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
12820, 127sylan 591 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
129100, 128syldan 602 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
130 fzp1elp1 13601 . . . . . . . . . . . . . . 15 (𝑥 ∈ (𝑀...𝑁) → (𝑥 + 1) ∈ (𝑀...(𝑁 + 1)))
131100, 130syl 18 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝑥 + 1) ∈ (𝑀...(𝑁 + 1)))
132 fvco3 6981 . . . . . . . . . . . . . . 15 ((𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)) ∧ (𝑥 + 1) ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘(𝑥 + 1)) = (𝐺‘(𝐹‘(𝑥 + 1))))
13357, 132sylan 591 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑥 + 1) ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘(𝑥 + 1)) = (𝐺‘(𝐹‘(𝑥 + 1))))
134131, 133syldan 602 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝐾...𝑁)) → ((𝐺𝐹)‘(𝑥 + 1)) = (𝐺‘(𝐹‘(𝑥 + 1))))
135126, 129, 1343eqtr4d 2808 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺𝐹)‘(𝑥 + 1)))
136135adantlr 727 . . . . . . . . . . 11 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ 𝑥 ∈ (𝐾...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺𝐹)‘(𝑥 + 1)))
13751, 96, 136seqshft2 14060 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)))
138 fvco3 6981 . . . . . . . . . . . . 13 ((𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)) ∧ 𝐾 ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘𝐾) = (𝐺‘(𝐹𝐾)))
13957, 77, 138syl2anc 595 . . . . . . . . . . . 12 (𝜑 → ((𝐺𝐹)‘𝐾) = (𝐺‘(𝐹𝐾)))
14017fveq2i 6884 . . . . . . . . . . . . . 14 (𝐹𝐾) = (𝐹‘(𝐹‘(𝑁 + 1)))
141 f1ocnvfv2 7275 . . . . . . . . . . . . . . 15 ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ (𝑁 + 1) ∈ (𝑀...(𝑁 + 1))) → (𝐹‘(𝐹‘(𝑁 + 1))) = (𝑁 + 1))
14215, 75, 141syl2anc 595 . . . . . . . . . . . . . 14 (𝜑 → (𝐹‘(𝐹‘(𝑁 + 1))) = (𝑁 + 1))
143140, 142eqtrid 2810 . . . . . . . . . . . . 13 (𝜑 → (𝐹𝐾) = (𝑁 + 1))
144143fveq2d 6885 . . . . . . . . . . . 12 (𝜑 → (𝐺‘(𝐹𝐾)) = (𝐺‘(𝑁 + 1)))
145139, 144eqtr2d 2799 . . . . . . . . . . 11 (𝜑 → (𝐺‘(𝑁 + 1)) = ((𝐺𝐹)‘𝐾))
146145adantr 485 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (𝐺‘(𝑁 + 1)) = ((𝐺𝐹)‘𝐾))
147137, 146oveq12d 7428 . . . . . . . . 9 ((𝜑𝐾 ∈ (𝑀...𝑁)) → ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))) = ((seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) + ((𝐺𝐹)‘𝐾)))
14895, 147eqtr4d 2801 . . . . . . . 8 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
14987, 148syldan 602 . . . . . . 7 ((𝜑𝐾 = 𝑀) → (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
15083seqeq1d 14039 . . . . . . . . 9 ((𝜑𝐾 = 𝑀) → seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)) = seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)))
151150fveq1d 6883 . . . . . . . 8 ((𝜑𝐾 = 𝑀) → (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁))
152151oveq1d 7425 . . . . . . 7 ((𝜑𝐾 = 𝑀) → ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
15382, 149, 1523eqtrd 2802 . . . . . 6 ((𝜑𝐾 = 𝑀) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
154 eluzel2 12862 . . . . . . . . . . . 12 (𝑁 ∈ (ℤ𝑀) → 𝑀 ∈ ℤ)
15513, 154syl 18 . . . . . . . . . . 11 (𝜑𝑀 ∈ ℤ)
156 elfzuz 13543 . . . . . . . . . . 11 (𝐾 ∈ ((𝑀 + 1)...𝑁) → 𝐾 ∈ (ℤ‘(𝑀 + 1)))
157 eluzp1m1 12883 . . . . . . . . . . 11 ((𝑀 ∈ ℤ ∧ 𝐾 ∈ (ℤ‘(𝑀 + 1))) → (𝐾 − 1) ∈ (ℤ𝑀))
158155, 156, 157syl2an 607 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (𝐾 − 1) ∈ (ℤ𝑀))
159 eluzelz 12867 . . . . . . . . . . . . . . . . . . . . 21 (𝑁 ∈ (ℤ𝑀) → 𝑁 ∈ ℤ)
16013, 159syl 18 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝑁 ∈ ℤ)
161160zcnd 12696 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑁 ∈ ℂ)
162 ax-1cn 11153 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℂ
163 pncan 11458 . . . . . . . . . . . . . . . . . . 19 ((𝑁 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑁 + 1) − 1) = 𝑁)
164161, 162, 163sylancl 597 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑁 + 1) − 1) = 𝑁)
165 peano2zm 12632 . . . . . . . . . . . . . . . . . . . 20 (𝐾 ∈ ℤ → (𝐾 − 1) ∈ ℤ)
16677, 78, 1653syl 19 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝐾 − 1) ∈ ℤ)
167 elfzuz3 13544 . . . . . . . . . . . . . . . . . . . . 21 (𝐾 ∈ (𝑀...(𝑁 + 1)) → (𝑁 + 1) ∈ (ℤ𝐾))
16877, 167syl 18 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑁 + 1) ∈ (ℤ𝐾))
169112zcnd 12696 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑𝐾 ∈ ℂ)
170 npcan 11461 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐾 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝐾 − 1) + 1) = 𝐾)
171169, 162, 170sylancl 597 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝐾 − 1) + 1) = 𝐾)
172171fveq2d 6885 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (ℤ‘((𝐾 − 1) + 1)) = (ℤ𝐾))
173168, 172eleqtrrd 2866 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑁 + 1) ∈ (ℤ‘((𝐾 − 1) + 1)))
174 eluzp1m1 12883 . . . . . . . . . . . . . . . . . . 19 (((𝐾 − 1) ∈ ℤ ∧ (𝑁 + 1) ∈ (ℤ‘((𝐾 − 1) + 1))) → ((𝑁 + 1) − 1) ∈ (ℤ‘(𝐾 − 1)))
175166, 173, 174syl2anc 595 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑁 + 1) − 1) ∈ (ℤ‘(𝐾 − 1)))
176164, 175eqeltrrd 2864 . . . . . . . . . . . . . . . . 17 (𝜑𝑁 ∈ (ℤ‘(𝐾 − 1)))
177 fzss2 13588 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ (ℤ‘(𝐾 − 1)) → (𝑀...(𝐾 − 1)) ⊆ (𝑀...𝑁))
178176, 177syl 18 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑀...(𝐾 − 1)) ⊆ (𝑀...𝑁))
179178sselda 3937 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → 𝑥 ∈ (𝑀...𝑁))
180179, 101syldan 602 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐽𝑥) ∈ (𝑀...𝑁))
181180fvresd 6901 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)) = (𝐺‘(𝐽𝑥)))
182179, 110syl 18 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐽𝑥) = (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))))
183 elfzm11 13619 . . . . . . . . . . . . . . . . . . 19 ((𝑀 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑥 ∈ (𝑀...(𝐾 − 1)) ↔ (𝑥 ∈ ℤ ∧ 𝑀𝑥𝑥 < 𝐾)))
184155, 112, 183syl2anc 595 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑥 ∈ (𝑀...(𝐾 − 1)) ↔ (𝑥 ∈ ℤ ∧ 𝑀𝑥𝑥 < 𝐾)))
185184biimpa 481 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝑥 ∈ ℤ ∧ 𝑀𝑥𝑥 < 𝐾))
186185simp3d 1162 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → 𝑥 < 𝐾)
187 iftrue 4493 . . . . . . . . . . . . . . . . 17 (𝑥 < 𝐾 → if(𝑥 < 𝐾, 𝑥, (𝑥 + 1)) = 𝑥)
188187fveq2d 6885 . . . . . . . . . . . . . . . 16 (𝑥 < 𝐾 → (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) = (𝐹𝑥))
189186, 188syl 18 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) = (𝐹𝑥))
190182, 189eqtrd 2798 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐽𝑥) = (𝐹𝑥))
191190fveq2d 6885 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐺‘(𝐽𝑥)) = (𝐺‘(𝐹𝑥)))
192181, 191eqtr2d 2799 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐺‘(𝐹𝑥)) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
193 peano2uz 12920 . . . . . . . . . . . . . . 15 (𝑁 ∈ (ℤ‘(𝐾 − 1)) → (𝑁 + 1) ∈ (ℤ‘(𝐾 − 1)))
194 fzss2 13588 . . . . . . . . . . . . . . 15 ((𝑁 + 1) ∈ (ℤ‘(𝐾 − 1)) → (𝑀...(𝐾 − 1)) ⊆ (𝑀...(𝑁 + 1)))
195176, 193, 1943syl 19 . . . . . . . . . . . . . 14 (𝜑 → (𝑀...(𝐾 − 1)) ⊆ (𝑀...(𝑁 + 1)))
196195sselda 3937 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
197 fvco3 6981 . . . . . . . . . . . . . 14 ((𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘𝑥) = (𝐺‘(𝐹𝑥)))
19857, 197sylan 591 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘𝑥) = (𝐺‘(𝐹𝑥)))
199196, 198syldan 602 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺𝐹)‘𝑥) = (𝐺‘(𝐹𝑥)))
200179, 128syldan 602 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
201192, 199, 2003eqtr4d 2808 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺𝐹)‘𝑥) = (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥))
202201adantlr 727 . . . . . . . . . 10 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ 𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺𝐹)‘𝑥) = (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥))
203158, 202seqfveq 14058 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) = (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)))
204 fzp1ss 13599 . . . . . . . . . . . 12 (𝑀 ∈ ℤ → ((𝑀 + 1)...𝑁) ⊆ (𝑀...𝑁))
20513, 154, 2043syl 19 . . . . . . . . . . 11 (𝜑 → ((𝑀 + 1)...𝑁) ⊆ (𝑀...𝑁))
206205sselda 3937 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → 𝐾 ∈ (𝑀...𝑁))
207206, 148syldan 602 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
208203, 207oveq12d 7428 . . . . . . . 8 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1)))))
209196, 61syldan 602 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺𝐹)‘𝑥) ∈ 𝑆)
210209adantlr 727 . . . . . . . . . . 11 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ 𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺𝐹)‘𝑥) ∈ 𝑆)
21110adantlr 727 . . . . . . . . . . 11 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ (𝑥𝑆𝑦𝑆)) → (𝑥 + 𝑦) ∈ 𝑆)
212158, 210, 211seqcl 14054 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) ∈ 𝑆)
21359, 77ffvelcdmd 7080 . . . . . . . . . . . 12 (𝜑 → ((𝐺𝐹)‘𝐾) ∈ 𝐶)
21414, 213sseldd 3938 . . . . . . . . . . 11 (𝜑 → ((𝐺𝐹)‘𝐾) ∈ 𝑆)
215214adantr 485 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((𝐺𝐹)‘𝐾) ∈ 𝑆)
21694sselda 3937 . . . . . . . . . . . . 13 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ 𝑥 ∈ ((𝐾 + 1)...(𝑁 + 1))) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
217216, 62syldan 602 . . . . . . . . . . . 12 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ 𝑥 ∈ ((𝐾 + 1)...(𝑁 + 1))) → ((𝐺𝐹)‘𝑥) ∈ 𝑆)
21853, 217, 48seqcl 14054 . . . . . . . . . . 11 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) ∈ 𝑆)
219206, 218syldan 602 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) ∈ 𝑆)
220212, 215, 2193jca 1146 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) ∈ 𝑆 ∧ ((𝐺𝐹)‘𝐾) ∈ 𝑆 ∧ (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) ∈ 𝑆))
22112caovassg 7608 . . . . . . . . 9 ((𝜑 ∧ ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) ∈ 𝑆 ∧ ((𝐺𝐹)‘𝐾) ∈ 𝑆 ∧ (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) ∈ 𝑆)) → (((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)))))
222220, 221syldan 602 . . . . . . . 8 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)))))
2231, 14fssd 6723 . . . . . . . . . . . . . . . 16 (𝜑𝐺:(𝑀...(𝑁 + 1))⟶𝑆)
224 fssres 6744 . . . . . . . . . . . . . . . 16 ((𝐺:(𝑀...(𝑁 + 1))⟶𝑆 ∧ (𝑀...𝑁) ⊆ (𝑀...(𝑁 + 1))) → (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝑆)
225223, 3, 224sylancl 597 . . . . . . . . . . . . . . 15 (𝜑 → (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝑆)
226 fco 6730 . . . . . . . . . . . . . . 15 (((𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝑆𝐽:(𝑀...𝑁)⟶(𝑀...𝑁)) → ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽):(𝑀...𝑁)⟶𝑆)
227225, 20, 226syl2anc 595 . . . . . . . . . . . . . 14 (𝜑 → ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽):(𝑀...𝑁)⟶𝑆)
228227ffvelcdmda 7079 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
229179, 228syldan 602 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
230229adantlr 727 . . . . . . . . . . 11 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ 𝑥 ∈ (𝑀...(𝐾 − 1))) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
231158, 230, 211seqcl 14054 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) ∈ 𝑆)
232 elfzuz3 13544 . . . . . . . . . . . 12 (𝐾 ∈ ((𝑀 + 1)...𝑁) → 𝑁 ∈ (ℤ𝐾))
233232adantl 486 . . . . . . . . . . 11 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → 𝑁 ∈ (ℤ𝐾))
234100, 228syldan 602 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
235234adantlr 727 . . . . . . . . . . 11 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ 𝑥 ∈ (𝐾...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
236233, 235, 211seqcl 14054 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) ∈ 𝑆)
237223, 75ffvelcdmd 7080 . . . . . . . . . . 11 (𝜑 → (𝐺‘(𝑁 + 1)) ∈ 𝑆)
238237adantr 485 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (𝐺‘(𝑁 + 1)) ∈ 𝑆)
239231, 236, 2383jca 1146 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) ∈ 𝑆 ∧ (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) ∈ 𝑆 ∧ (𝐺‘(𝑁 + 1)) ∈ 𝑆))
24012caovassg 7608 . . . . . . . . 9 ((𝜑 ∧ ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) ∈ 𝑆 ∧ (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) ∈ 𝑆 ∧ (𝐺‘(𝑁 + 1)) ∈ 𝑆)) → (((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)) + (𝐺‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1)))))
241239, 240syldan 602 . . . . . . . 8 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)) + (𝐺‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1)))))
242208, 222, 2413eqtr4d 2808 . . . . . . 7 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = (((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)) + (𝐺‘(𝑁 + 1))))
243 seqm1 14051 . . . . . . . . 9 ((𝑀 ∈ ℤ ∧ 𝐾 ∈ (ℤ‘(𝑀 + 1))) → (seq𝑀( + , (𝐺𝐹))‘𝐾) = ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)))
244155, 156, 243syl2an 607 . . . . . . . 8 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , (𝐺𝐹))‘𝐾) = ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)))
245244oveq1d 7425 . . . . . . 7 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = (((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))))
24612adantlr 727 . . . . . . . . . 10 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ (𝑥𝑆𝑦𝑆𝑧𝑆)) → ((𝑥 + 𝑦) + 𝑧) = (𝑥 + (𝑦 + 𝑧)))
247 elfzelz 13547 . . . . . . . . . . . . . . 15 (𝐾 ∈ ((𝑀 + 1)...𝑁) → 𝐾 ∈ ℤ)
248247adantl 486 . . . . . . . . . . . . . 14 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → 𝐾 ∈ ℤ)
249248zcnd 12696 . . . . . . . . . . . . 13 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → 𝐾 ∈ ℂ)
250249, 162, 170sylancl 597 . . . . . . . . . . . 12 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((𝐾 − 1) + 1) = 𝐾)
251250fveq2d 6885 . . . . . . . . . . 11 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (ℤ‘((𝐾 − 1) + 1)) = (ℤ𝐾))
252233, 251eleqtrrd 2866 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → 𝑁 ∈ (ℤ‘((𝐾 − 1) + 1)))
253228adantlr 727 . . . . . . . . . 10 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
254211, 246, 252, 158, 253seqsplit 14067 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq((𝐾 − 1) + 1)( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)))
255250seqeq1d 14039 . . . . . . . . . . 11 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → seq((𝐾 − 1) + 1)( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)) = seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)))
256255fveq1d 6883 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq((𝐾 − 1) + 1)( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁))
257256oveq2d 7426 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq((𝐾 − 1) + 1)( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)))
258254, 257eqtrd 2798 . . . . . . . 8 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)))
259258oveq1d 7425 . . . . . . 7 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))) = (((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)) + (𝐺‘(𝑁 + 1))))
260242, 245, 2593eqtr4d 2808 . . . . . 6 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
261153, 260jaodan 972 . . . . 5 ((𝜑 ∧ (𝐾 = 𝑀𝐾 ∈ ((𝑀 + 1)...𝑁))) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
26266, 261syldan 602 . . . 4 ((𝜑𝐾 ∈ (𝑀...𝑁)) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
26363, 262eqtrd 2798 . . 3 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
26413adantr 485 . . . . 5 ((𝜑𝐾 = (𝑁 + 1)) → 𝑁 ∈ (ℤ𝑀))
265 seqp1 14048 . . . . 5 (𝑁 ∈ (ℤ𝑀) → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , (𝐺𝐹))‘𝑁) + ((𝐺𝐹)‘(𝑁 + 1))))
266264, 265syl 18 . . . 4 ((𝜑𝐾 = (𝑁 + 1)) → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , (𝐺𝐹))‘𝑁) + ((𝐺𝐹)‘(𝑁 + 1))))
267110adantl 486 . . . . . . . . . 10 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐽𝑥) = (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))))
268 elfzelz 13547 . . . . . . . . . . . . . . . 16 (𝑥 ∈ (𝑀...𝑁) → 𝑥 ∈ ℤ)
269268zred 12695 . . . . . . . . . . . . . . 15 (𝑥 ∈ (𝑀...𝑁) → 𝑥 ∈ ℝ)
270269adantl 486 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → 𝑥 ∈ ℝ)
271160zred 12695 . . . . . . . . . . . . . . 15 (𝜑𝑁 ∈ ℝ)
272271adantr 485 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → 𝑁 ∈ ℝ)
273 peano2re 11378 . . . . . . . . . . . . . . 15 (𝑁 ∈ ℝ → (𝑁 + 1) ∈ ℝ)
274272, 273syl 18 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (𝑁 + 1) ∈ ℝ)
275 elfzle2 13551 . . . . . . . . . . . . . . 15 (𝑥 ∈ (𝑀...𝑁) → 𝑥𝑁)
276275adantl 486 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → 𝑥𝑁)
277272ltp1d 12140 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → 𝑁 < (𝑁 + 1))
278270, 272, 274, 276, 277lelttrd 11363 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...𝑁)) → 𝑥 < (𝑁 + 1))
279278adantlr 727 . . . . . . . . . . . 12 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 < (𝑁 + 1))
280 simplr 780 . . . . . . . . . . . 12 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝐾 = (𝑁 + 1))
281279, 280breqtrrd 5139 . . . . . . . . . . 11 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 < 𝐾)
282281, 188syl 18 . . . . . . . . . 10 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) = (𝐹𝑥))
283267, 282eqtrd 2798 . . . . . . . . 9 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐽𝑥) = (𝐹𝑥))
284283fveq2d 6885 . . . . . . . 8 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐹𝑥)))
285269adantl 486 . . . . . . . . . . 11 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 ∈ ℝ)
286285, 281gtned 11340 . . . . . . . . . 10 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝐾𝑥)
28757ad2antrr 738 . . . . . . . . . . . . . . 15 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
288 fzelp1 13600 . . . . . . . . . . . . . . . 16 (𝑥 ∈ (𝑀...𝑁) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
289288adantl 486 . . . . . . . . . . . . . . 15 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
290287, 289ffvelcdmd 7080 . . . . . . . . . . . . . 14 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹𝑥) ∈ (𝑀...(𝑁 + 1)))
29113ad2antrr 738 . . . . . . . . . . . . . . 15 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑁 ∈ (ℤ𝑀))
292 elfzp1 13598 . . . . . . . . . . . . . . 15 (𝑁 ∈ (ℤ𝑀) → ((𝐹𝑥) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹𝑥) ∈ (𝑀...𝑁) ∨ (𝐹𝑥) = (𝑁 + 1))))
293291, 292syl 18 . . . . . . . . . . . . . 14 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹𝑥) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹𝑥) ∈ (𝑀...𝑁) ∨ (𝐹𝑥) = (𝑁 + 1))))
294290, 293mpbid 235 . . . . . . . . . . . . 13 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹𝑥) ∈ (𝑀...𝑁) ∨ (𝐹𝑥) = (𝑁 + 1)))
295294ord 877 . . . . . . . . . . . 12 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (¬ (𝐹𝑥) ∈ (𝑀...𝑁) → (𝐹𝑥) = (𝑁 + 1)))
29615ad2antrr 738 . . . . . . . . . . . . . 14 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
297 f1ocnvfv 7276 . . . . . . . . . . . . . 14 ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...(𝑁 + 1))) → ((𝐹𝑥) = (𝑁 + 1) → (𝐹‘(𝑁 + 1)) = 𝑥))
298296, 289, 297syl2anc 595 . . . . . . . . . . . . 13 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹𝑥) = (𝑁 + 1) → (𝐹‘(𝑁 + 1)) = 𝑥))
29917eqeq1i 2768 . . . . . . . . . . . . 13 (𝐾 = 𝑥 ↔ (𝐹‘(𝑁 + 1)) = 𝑥)
300298, 299imbitrrdi 255 . . . . . . . . . . . 12 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹𝑥) = (𝑁 + 1) → 𝐾 = 𝑥))
301295, 300syld 48 . . . . . . . . . . 11 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (¬ (𝐹𝑥) ∈ (𝑀...𝑁) → 𝐾 = 𝑥))
302301necon1ad 2975 . . . . . . . . . 10 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐾𝑥 → (𝐹𝑥) ∈ (𝑀...𝑁)))
303286, 302mpd 16 . . . . . . . . 9 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹𝑥) ∈ (𝑀...𝑁))
304303fvresd 6901 . . . . . . . 8 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐺 ↾ (𝑀...𝑁))‘(𝐹𝑥)) = (𝐺‘(𝐹𝑥)))
305284, 304eqtr2d 2799 . . . . . . 7 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐺‘(𝐹𝑥)) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
30657, 288, 197syl2an 607 . . . . . . . 8 ((𝜑𝑥 ∈ (𝑀...𝑁)) → ((𝐺𝐹)‘𝑥) = (𝐺‘(𝐹𝑥)))
307306adantlr 727 . . . . . . 7 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐺𝐹)‘𝑥) = (𝐺‘(𝐹𝑥)))
308128adantlr 727 . . . . . . 7 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
309305, 307, 3083eqtr4d 2808 . . . . . 6 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐺𝐹)‘𝑥) = (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥))
310264, 309seqfveq 14058 . . . . 5 ((𝜑𝐾 = (𝑁 + 1)) → (seq𝑀( + , (𝐺𝐹))‘𝑁) = (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁))
311 fvco3 6981 . . . . . . . 8 ((𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)) ∧ (𝑁 + 1) ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘(𝑁 + 1)) = (𝐺‘(𝐹‘(𝑁 + 1))))
31257, 75, 311syl2anc 595 . . . . . . 7 (𝜑 → ((𝐺𝐹)‘(𝑁 + 1)) = (𝐺‘(𝐹‘(𝑁 + 1))))
313312adantr 485 . . . . . 6 ((𝜑𝐾 = (𝑁 + 1)) → ((𝐺𝐹)‘(𝑁 + 1)) = (𝐺‘(𝐹‘(𝑁 + 1))))
314 simpr 489 . . . . . . . . . 10 ((𝜑𝐾 = (𝑁 + 1)) → 𝐾 = (𝑁 + 1))
31517, 314eqtr3id 2812 . . . . . . . . 9 ((𝜑𝐾 = (𝑁 + 1)) → (𝐹‘(𝑁 + 1)) = (𝑁 + 1))
316315fveq2d 6885 . . . . . . . 8 ((𝜑𝐾 = (𝑁 + 1)) → (𝐹‘(𝐹‘(𝑁 + 1))) = (𝐹‘(𝑁 + 1)))
317142adantr 485 . . . . . . . 8 ((𝜑𝐾 = (𝑁 + 1)) → (𝐹‘(𝐹‘(𝑁 + 1))) = (𝑁 + 1))
318316, 317eqtr3d 2800 . . . . . . 7 ((𝜑𝐾 = (𝑁 + 1)) → (𝐹‘(𝑁 + 1)) = (𝑁 + 1))
319318fveq2d 6885 . . . . . 6 ((𝜑𝐾 = (𝑁 + 1)) → (𝐺‘(𝐹‘(𝑁 + 1))) = (𝐺‘(𝑁 + 1)))
320313, 319eqtrd 2798 . . . . 5 ((𝜑𝐾 = (𝑁 + 1)) → ((𝐺𝐹)‘(𝑁 + 1)) = (𝐺‘(𝑁 + 1)))
321310, 320oveq12d 7428 . . . 4 ((𝜑𝐾 = (𝑁 + 1)) → ((seq𝑀( + , (𝐺𝐹))‘𝑁) + ((𝐺𝐹)‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
322266, 321eqtrd 2798 . . 3 ((𝜑𝐾 = (𝑁 + 1)) → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
323 elfzp1 13598 . . . . 5 (𝑁 ∈ (ℤ𝑀) → (𝐾 ∈ (𝑀...(𝑁 + 1)) ↔ (𝐾 ∈ (𝑀...𝑁) ∨ 𝐾 = (𝑁 + 1))))
32413, 323syl 18 . . . 4 (𝜑 → (𝐾 ∈ (𝑀...(𝑁 + 1)) ↔ (𝐾 ∈ (𝑀...𝑁) ∨ 𝐾 = (𝑁 + 1))))
32577, 324mpbid 235 . . 3 (𝜑 → (𝐾 ∈ (𝑀...𝑁) ∨ 𝐾 = (𝑁 + 1)))
326263, 322, 325mpjaodan 973 . 2 (𝜑 → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
327 seqp1 14048 . . 3 (𝑁 ∈ (ℤ𝑀) → (seq𝑀( + , 𝐺)‘(𝑁 + 1)) = ((seq𝑀( + , 𝐺)‘𝑁) + (𝐺‘(𝑁 + 1))))
32813, 327syl 18 . 2 (𝜑 → (seq𝑀( + , 𝐺)‘(𝑁 + 1)) = ((seq𝑀( + , 𝐺)‘𝑁) + (𝐺‘(𝑁 + 1))))
32947, 326, 3283eqtr4d 2808 1 (𝜑 → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = (seq𝑀( + , 𝐺)‘(𝑁 + 1)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 400  wo 860  w3a 1103  wal 1568   = wceq 1570  wcel 2143  wne 2958  Vcvv 3455  wss 3905  ifcif 4487   class class class wbr 5109  cmpt 5192  ccnv 5660  cres 5663  ccom 5665   Fn wfn 6531  wf 6532  1-1-ontowf1o 6535  cfv 6536  (class class class)co 7410  Fincfn 8939  cc 11093  cr 11094  1c1 11096   + caddc 11098   < clt 11238  cle 11239  cmin 11436  cz 12586  cuz 12857  ...cfz 13530  seqcseq 14033
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-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-cnex 11151  ax-resscn 11152  ax-1cn 11153  ax-icn 11154  ax-addcl 11155  ax-addrcl 11156  ax-mulcl 11157  ax-mulrcl 11158  ax-mulcom 11159  ax-addass 11160  ax-mulass 11161  ax-distr 11162  ax-i2m1 11163  ax-1ne0 11164  ax-1rid 11165  ax-rnegex 11166  ax-rrecex 11167  ax-cnre 11168  ax-pre-lttri 11169  ax-pre-lttrn 11170  ax-pre-ltadd 11171  ax-pre-mulgt0 11172
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-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4873  df-iun 4958  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-om 7859  df-1st 7982  df-2nd 7983  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-er 8690  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-pnf 11240  df-mnf 11241  df-xr 11242  df-ltxr 11243  df-le 11244  df-sub 11438  df-neg 11439  df-nn 12229  df-n0 12500  df-z 12587  df-uz 12858  df-fz 13531  df-fzo 13679  df-seq 14034
This theorem is referenced by:  seqf1o  14075
  Copyright terms: Public domain W3C validator