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

Theorem seqf1olem2 13763
Description: Lemma for seqf1o 13764. (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 6601 . . . . . . . . 9 (𝜑𝐺 Fn (𝑀...(𝑁 + 1)))
3 fzssp1 13299 . . . . . . . . 9 (𝑀...𝑁) ⊆ (𝑀...(𝑁 + 1))
4 fnssres 6555 . . . . . . . . 9 ((𝐺 Fn (𝑀...(𝑁 + 1)) ∧ (𝑀...𝑁) ⊆ (𝑀...(𝑁 + 1))) → (𝐺 ↾ (𝑀...𝑁)) Fn (𝑀...𝑁))
52, 3, 4sylancl 586 . . . . . . . 8 (𝜑 → (𝐺 ↾ (𝑀...𝑁)) Fn (𝑀...𝑁))
6 fzfid 13693 . . . . . . . 8 (𝜑 → (𝑀...𝑁) ∈ Fin)
7 fnfi 8964 . . . . . . . 8 (((𝐺 ↾ (𝑀...𝑁)) Fn (𝑀...𝑁) ∧ (𝑀...𝑁) ∈ Fin) → (𝐺 ↾ (𝑀...𝑁)) ∈ Fin)
85, 6, 7syl2anc 584 . . . . . . 7 (𝜑 → (𝐺 ↾ (𝑀...𝑁)) ∈ Fin)
98elexd 3452 . . . . . 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 13762 . . . . . . . 8 (𝜑𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁))
19 f1of 6716 . . . . . . . 8 (𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) → 𝐽:(𝑀...𝑁)⟶(𝑀...𝑁))
2018, 19syl 17 . . . . . . 7 (𝜑𝐽:(𝑀...𝑁)⟶(𝑀...𝑁))
21 fex2 7780 . . . . . . 7 ((𝐽:(𝑀...𝑁)⟶(𝑀...𝑁) ∧ (𝑀...𝑁) ∈ Fin ∧ (𝑀...𝑁) ∈ Fin) → 𝐽 ∈ V)
2220, 6, 6, 21syl3anc 1370 . . . . . 6 (𝜑𝐽 ∈ V)
239, 22jca 512 . . . . 5 (𝜑 → ((𝐺 ↾ (𝑀...𝑁)) ∈ V ∧ 𝐽 ∈ V))
24 seqf1olem.9 . . . . 5 (𝜑 → ∀𝑔𝑓((𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ 𝑔:(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , 𝑔)‘𝑁)))
25 fssres 6640 . . . . . . 7 ((𝐺:(𝑀...(𝑁 + 1))⟶𝐶 ∧ (𝑀...𝑁) ⊆ (𝑀...(𝑁 + 1))) → (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶)
261, 3, 25sylancl 586 . . . . . 6 (𝜑 → (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶)
2718, 26jca 512 . . . . 5 (𝜑 → (𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶))
28 f1oeq1 6704 . . . . . . . 8 (𝑓 = 𝐽 → (𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ↔ 𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁)))
29 feq1 6581 . . . . . . . 8 (𝑔 = (𝐺 ↾ (𝑀...𝑁)) → (𝑔:(𝑀...𝑁)⟶𝐶 ↔ (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶))
3028, 29bi2anan9r 637 . . . . . . 7 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → ((𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ 𝑔:(𝑀...𝑁)⟶𝐶) ↔ (𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶)))
31 coeq1 5766 . . . . . . . . . . 11 (𝑔 = (𝐺 ↾ (𝑀...𝑁)) → (𝑔𝑓) = ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝑓))
32 coeq2 5767 . . . . . . . . . . 11 (𝑓 = 𝐽 → ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝑓) = ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))
3331, 32sylan9eq 2798 . . . . . . . . . 10 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → (𝑔𝑓) = ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))
3433seqeq3d 13729 . . . . . . . . 9 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → seq𝑀( + , (𝑔𝑓)) = seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)))
3534fveq1d 6776 . . . . . . . 8 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → (seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁))
36 simpl 483 . . . . . . . . . 10 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → 𝑔 = (𝐺 ↾ (𝑀...𝑁)))
3736seqeq3d 13729 . . . . . . . . 9 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → seq𝑀( + , 𝑔) = seq𝑀( + , (𝐺 ↾ (𝑀...𝑁))))
3837fveq1d 6776 . . . . . . . 8 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → (seq𝑀( + , 𝑔)‘𝑁) = (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁))
3935, 38eqeq12d 2754 . . . . . . 7 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → ((seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , 𝑔)‘𝑁) ↔ (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁)))
4030, 39imbi12d 345 . . . . . 6 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → (((𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ 𝑔:(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , 𝑔)‘𝑁)) ↔ ((𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁))))
4140spc2gv 3539 . . . . 5 (((𝐺 ↾ (𝑀...𝑁)) ∈ V ∧ 𝐽 ∈ V) → (∀𝑔𝑓((𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ 𝑔:(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , 𝑔)‘𝑁)) → ((𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁))))
4223, 24, 27, 41syl3c 66 . . . 4 (𝜑 → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁))
43 fvres 6793 . . . . . 6 (𝑥 ∈ (𝑀...𝑁) → ((𝐺 ↾ (𝑀...𝑁))‘𝑥) = (𝐺𝑥))
4443adantl 482 . . . . 5 ((𝜑𝑥 ∈ (𝑀...𝑁)) → ((𝐺 ↾ (𝑀...𝑁))‘𝑥) = (𝐺𝑥))
4513, 44seqfveq 13747 . . . 4 (𝜑 → (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁) = (seq𝑀( + , 𝐺)‘𝑁))
4642, 45eqtrd 2778 . . 3 (𝜑 → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , 𝐺)‘𝑁))
4746oveq1d 7290 . 2 (𝜑 → ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))) = ((seq𝑀( + , 𝐺)‘𝑁) + (𝐺‘(𝑁 + 1))))
4810adantlr 712 . . . . 5 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ (𝑥𝑆𝑦𝑆)) → (𝑥 + 𝑦) ∈ 𝑆)
4912adantlr 712 . . . . 5 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ (𝑥𝑆𝑦𝑆𝑧𝑆)) → ((𝑥 + 𝑦) + 𝑧) = (𝑥 + (𝑦 + 𝑧)))
50 elfzuz3 13253 . . . . . . 7 (𝐾 ∈ (𝑀...𝑁) → 𝑁 ∈ (ℤ𝐾))
5150adantl 482 . . . . . 6 ((𝜑𝐾 ∈ (𝑀...𝑁)) → 𝑁 ∈ (ℤ𝐾))
52 eluzp1p1 12610 . . . . . 6 (𝑁 ∈ (ℤ𝐾) → (𝑁 + 1) ∈ (ℤ‘(𝐾 + 1)))
5351, 52syl 17 . . . . 5 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (𝑁 + 1) ∈ (ℤ‘(𝐾 + 1)))
54 elfzuz 13252 . . . . . 6 (𝐾 ∈ (𝑀...𝑁) → 𝐾 ∈ (ℤ𝑀))
5554adantl 482 . . . . 5 ((𝜑𝐾 ∈ (𝑀...𝑁)) → 𝐾 ∈ (ℤ𝑀))
56 f1of 6716 . . . . . . . . . 10 (𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
5715, 56syl 17 . . . . . . . . 9 (𝜑𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
58 fco 6624 . . . . . . . . 9 ((𝐺:(𝑀...(𝑁 + 1))⟶𝐶𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1))) → (𝐺𝐹):(𝑀...(𝑁 + 1))⟶𝐶)
591, 57, 58syl2anc 584 . . . . . . . 8 (𝜑 → (𝐺𝐹):(𝑀...(𝑁 + 1))⟶𝐶)
6059, 14fssd 6618 . . . . . . 7 (𝜑 → (𝐺𝐹):(𝑀...(𝑁 + 1))⟶𝑆)
6160ffvelrnda 6961 . . . . . 6 ((𝜑𝑥 ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘𝑥) ∈ 𝑆)
6261adantlr 712 . . . . 5 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ 𝑥 ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘𝑥) ∈ 𝑆)
6348, 49, 53, 55, 62seqsplit 13756 . . . 4 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))))
64 elfzp12 13335 . . . . . . 7 (𝑁 ∈ (ℤ𝑀) → (𝐾 ∈ (𝑀...𝑁) ↔ (𝐾 = 𝑀𝐾 ∈ ((𝑀 + 1)...𝑁))))
6564biimpa 477 . . . . . 6 ((𝑁 ∈ (ℤ𝑀) ∧ 𝐾 ∈ (𝑀...𝑁)) → (𝐾 = 𝑀𝐾 ∈ ((𝑀 + 1)...𝑁)))
6613, 65sylan 580 . . . . 5 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (𝐾 = 𝑀𝐾 ∈ ((𝑀 + 1)...𝑁)))
67 seqeq1 13724 . . . . . . . . . . 11 (𝐾 = 𝑀 → seq𝐾( + , (𝐺𝐹)) = seq𝑀( + , (𝐺𝐹)))
6867eqcomd 2744 . . . . . . . . . 10 (𝐾 = 𝑀 → seq𝑀( + , (𝐺𝐹)) = seq𝐾( + , (𝐺𝐹)))
6968fveq1d 6776 . . . . . . . . 9 (𝐾 = 𝑀 → (seq𝑀( + , (𝐺𝐹))‘𝐾) = (seq𝐾( + , (𝐺𝐹))‘𝐾))
70 f1ocnv 6728 . . . . . . . . . . . . 13 (𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
71 f1of 6716 . . . . . . . . . . . . 13 (𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
7215, 70, 713syl 18 . . . . . . . . . . . 12 (𝜑𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
73 peano2uz 12641 . . . . . . . . . . . . 13 (𝑁 ∈ (ℤ𝑀) → (𝑁 + 1) ∈ (ℤ𝑀))
74 eluzfz2 13264 . . . . . . . . . . . . 13 ((𝑁 + 1) ∈ (ℤ𝑀) → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
7513, 73, 743syl 18 . . . . . . . . . . . 12 (𝜑 → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
7672, 75ffvelrnd 6962 . . . . . . . . . . 11 (𝜑 → (𝐹‘(𝑁 + 1)) ∈ (𝑀...(𝑁 + 1)))
7717, 76eqeltrid 2843 . . . . . . . . . 10 (𝜑𝐾 ∈ (𝑀...(𝑁 + 1)))
78 elfzelz 13256 . . . . . . . . . 10 (𝐾 ∈ (𝑀...(𝑁 + 1)) → 𝐾 ∈ ℤ)
79 seq1 13734 . . . . . . . . . 10 (𝐾 ∈ ℤ → (seq𝐾( + , (𝐺𝐹))‘𝐾) = ((𝐺𝐹)‘𝐾))
8077, 78, 793syl 18 . . . . . . . . 9 (𝜑 → (seq𝐾( + , (𝐺𝐹))‘𝐾) = ((𝐺𝐹)‘𝐾))
8169, 80sylan9eqr 2800 . . . . . . . 8 ((𝜑𝐾 = 𝑀) → (seq𝑀( + , (𝐺𝐹))‘𝐾) = ((𝐺𝐹)‘𝐾))
8281oveq1d 7290 . . . . . . 7 ((𝜑𝐾 = 𝑀) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))))
83 simpr 485 . . . . . . . . 9 ((𝜑𝐾 = 𝑀) → 𝐾 = 𝑀)
84 eluzfz1 13263 . . . . . . . . . . 11 (𝑁 ∈ (ℤ𝑀) → 𝑀 ∈ (𝑀...𝑁))
8513, 84syl 17 . . . . . . . . . 10 (𝜑𝑀 ∈ (𝑀...𝑁))
8685adantr 481 . . . . . . . . 9 ((𝜑𝐾 = 𝑀) → 𝑀 ∈ (𝑀...𝑁))
8783, 86eqeltrd 2839 . . . . . . . 8 ((𝜑𝐾 = 𝑀) → 𝐾 ∈ (𝑀...𝑁))
8811adantlr 712 . . . . . . . . . 10 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ (𝑥𝐶𝑦𝐶)) → (𝑥 + 𝑦) = (𝑦 + 𝑥))
8914adantr 481 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → 𝐶𝑆)
9059adantr 481 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (𝐺𝐹):(𝑀...(𝑁 + 1))⟶𝐶)
9177adantr 481 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → 𝐾 ∈ (𝑀...(𝑁 + 1)))
92 peano2uz 12641 . . . . . . . . . . 11 (𝐾 ∈ (ℤ𝑀) → (𝐾 + 1) ∈ (ℤ𝑀))
93 fzss1 13295 . . . . . . . . . . 11 ((𝐾 + 1) ∈ (ℤ𝑀) → ((𝐾 + 1)...(𝑁 + 1)) ⊆ (𝑀...(𝑁 + 1)))
9455, 92, 933syl 18 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → ((𝐾 + 1)...(𝑁 + 1)) ⊆ (𝑀...(𝑁 + 1)))
9548, 88, 49, 53, 89, 90, 91, 94seqf1olem2a 13761 . . . . . . . . 9 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) + ((𝐺𝐹)‘𝐾)))
96 1zzd 12351 . . . . . . . . . . 11 ((𝜑𝐾 ∈ (𝑀...𝑁)) → 1 ∈ ℤ)
97 elfzuz 13252 . . . . . . . . . . . . . . . . . 18 (𝐾 ∈ (𝑀...(𝑁 + 1)) → 𝐾 ∈ (ℤ𝑀))
98 fzss1 13295 . . . . . . . . . . . . . . . . . 18 (𝐾 ∈ (ℤ𝑀) → (𝐾...𝑁) ⊆ (𝑀...𝑁))
9977, 97, 983syl 18 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐾...𝑁) ⊆ (𝑀...𝑁))
10099sselda 3921 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝐾...𝑁)) → 𝑥 ∈ (𝑀...𝑁))
10120ffvelrnda 6961 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (𝐽𝑥) ∈ (𝑀...𝑁))
102100, 101syldan 591 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝐽𝑥) ∈ (𝑀...𝑁))
103102fvresd 6794 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝐾...𝑁)) → ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)) = (𝐺‘(𝐽𝑥)))
104 breq1 5077 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 𝑥 → (𝑘 < 𝐾𝑥 < 𝐾))
105 id 22 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 𝑥𝑘 = 𝑥)
106 oveq1 7282 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 𝑥 → (𝑘 + 1) = (𝑥 + 1))
107104, 105, 106ifbieq12d 4487 . . . . . . . . . . . . . . . . . . 19 (𝑘 = 𝑥 → if(𝑘 < 𝐾, 𝑘, (𝑘 + 1)) = if(𝑥 < 𝐾, 𝑥, (𝑥 + 1)))
108107fveq2d 6778 . . . . . . . . . . . . . . . . . 18 (𝑘 = 𝑥 → (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) = (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))))
109 fvex 6787 . . . . . . . . . . . . . . . . . 18 (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) ∈ V
110108, 16, 109fvmpt 6875 . . . . . . . . . . . . . . . . 17 (𝑥 ∈ (𝑀...𝑁) → (𝐽𝑥) = (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))))
111100, 110syl 17 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝐽𝑥) = (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))))
11277, 78syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝐾 ∈ ℤ)
113112zred 12426 . . . . . . . . . . . . . . . . . . 19 (𝜑𝐾 ∈ ℝ)
114113adantr 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ (𝐾...𝑁)) → 𝐾 ∈ ℝ)
115 elfzelz 13256 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ (𝐾...𝑁) → 𝑥 ∈ ℤ)
116115adantl 482 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑥 ∈ (𝐾...𝑁)) → 𝑥 ∈ ℤ)
117116zred 12426 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ (𝐾...𝑁)) → 𝑥 ∈ ℝ)
118 elfzle1 13259 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ (𝐾...𝑁) → 𝐾𝑥)
119118adantl 482 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ (𝐾...𝑁)) → 𝐾𝑥)
120114, 117, 119lensymd 11126 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ (𝐾...𝑁)) → ¬ 𝑥 < 𝐾)
121 iffalse 4468 . . . . . . . . . . . . . . . . . 18 𝑥 < 𝐾 → if(𝑥 < 𝐾, 𝑥, (𝑥 + 1)) = (𝑥 + 1))
122121fveq2d 6778 . . . . . . . . . . . . . . . . 17 𝑥 < 𝐾 → (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) = (𝐹‘(𝑥 + 1)))
123120, 122syl 17 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) = (𝐹‘(𝑥 + 1)))
124111, 123eqtrd 2778 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝐽𝑥) = (𝐹‘(𝑥 + 1)))
125124fveq2d 6778 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝐺‘(𝐽𝑥)) = (𝐺‘(𝐹‘(𝑥 + 1))))
126103, 125eqtrd 2778 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝐾...𝑁)) → ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)) = (𝐺‘(𝐹‘(𝑥 + 1))))
127 fvco3 6867 . . . . . . . . . . . . . . 15 ((𝐽:(𝑀...𝑁)⟶(𝑀...𝑁) ∧ 𝑥 ∈ (𝑀...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
12820, 127sylan 580 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
129100, 128syldan 591 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
130 fzp1elp1 13309 . . . . . . . . . . . . . . 15 (𝑥 ∈ (𝑀...𝑁) → (𝑥 + 1) ∈ (𝑀...(𝑁 + 1)))
131100, 130syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝑥 + 1) ∈ (𝑀...(𝑁 + 1)))
132 fvco3 6867 . . . . . . . . . . . . . . 15 ((𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)) ∧ (𝑥 + 1) ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘(𝑥 + 1)) = (𝐺‘(𝐹‘(𝑥 + 1))))
13357, 132sylan 580 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑥 + 1) ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘(𝑥 + 1)) = (𝐺‘(𝐹‘(𝑥 + 1))))
134131, 133syldan 591 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝐾...𝑁)) → ((𝐺𝐹)‘(𝑥 + 1)) = (𝐺‘(𝐹‘(𝑥 + 1))))
135126, 129, 1343eqtr4d 2788 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺𝐹)‘(𝑥 + 1)))
136135adantlr 712 . . . . . . . . . . 11 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ 𝑥 ∈ (𝐾...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺𝐹)‘(𝑥 + 1)))
13751, 96, 136seqshft2 13749 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)))
138 fvco3 6867 . . . . . . . . . . . . 13 ((𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)) ∧ 𝐾 ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘𝐾) = (𝐺‘(𝐹𝐾)))
13957, 77, 138syl2anc 584 . . . . . . . . . . . 12 (𝜑 → ((𝐺𝐹)‘𝐾) = (𝐺‘(𝐹𝐾)))
14017fveq2i 6777 . . . . . . . . . . . . . 14 (𝐹𝐾) = (𝐹‘(𝐹‘(𝑁 + 1)))
141 f1ocnvfv2 7149 . . . . . . . . . . . . . . 15 ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ (𝑁 + 1) ∈ (𝑀...(𝑁 + 1))) → (𝐹‘(𝐹‘(𝑁 + 1))) = (𝑁 + 1))
14215, 75, 141syl2anc 584 . . . . . . . . . . . . . 14 (𝜑 → (𝐹‘(𝐹‘(𝑁 + 1))) = (𝑁 + 1))
143140, 142eqtrid 2790 . . . . . . . . . . . . 13 (𝜑 → (𝐹𝐾) = (𝑁 + 1))
144143fveq2d 6778 . . . . . . . . . . . 12 (𝜑 → (𝐺‘(𝐹𝐾)) = (𝐺‘(𝑁 + 1)))
145139, 144eqtr2d 2779 . . . . . . . . . . 11 (𝜑 → (𝐺‘(𝑁 + 1)) = ((𝐺𝐹)‘𝐾))
146145adantr 481 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (𝐺‘(𝑁 + 1)) = ((𝐺𝐹)‘𝐾))
147137, 146oveq12d 7293 . . . . . . . . 9 ((𝜑𝐾 ∈ (𝑀...𝑁)) → ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))) = ((seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) + ((𝐺𝐹)‘𝐾)))
14895, 147eqtr4d 2781 . . . . . . . 8 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
14987, 148syldan 591 . . . . . . 7 ((𝜑𝐾 = 𝑀) → (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
15083seqeq1d 13727 . . . . . . . . 9 ((𝜑𝐾 = 𝑀) → seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)) = seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)))
151150fveq1d 6776 . . . . . . . 8 ((𝜑𝐾 = 𝑀) → (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁))
152151oveq1d 7290 . . . . . . 7 ((𝜑𝐾 = 𝑀) → ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
15382, 149, 1523eqtrd 2782 . . . . . 6 ((𝜑𝐾 = 𝑀) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
154 eluzel2 12587 . . . . . . . . . . . 12 (𝑁 ∈ (ℤ𝑀) → 𝑀 ∈ ℤ)
15513, 154syl 17 . . . . . . . . . . 11 (𝜑𝑀 ∈ ℤ)
156 elfzuz 13252 . . . . . . . . . . 11 (𝐾 ∈ ((𝑀 + 1)...𝑁) → 𝐾 ∈ (ℤ‘(𝑀 + 1)))
157 eluzp1m1 12608 . . . . . . . . . . 11 ((𝑀 ∈ ℤ ∧ 𝐾 ∈ (ℤ‘(𝑀 + 1))) → (𝐾 − 1) ∈ (ℤ𝑀))
158155, 156, 157syl2an 596 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (𝐾 − 1) ∈ (ℤ𝑀))
159 eluzelz 12592 . . . . . . . . . . . . . . . . . . . . 21 (𝑁 ∈ (ℤ𝑀) → 𝑁 ∈ ℤ)
16013, 159syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝑁 ∈ ℤ)
161160zcnd 12427 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑁 ∈ ℂ)
162 ax-1cn 10929 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℂ
163 pncan 11227 . . . . . . . . . . . . . . . . . . 19 ((𝑁 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑁 + 1) − 1) = 𝑁)
164161, 162, 163sylancl 586 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑁 + 1) − 1) = 𝑁)
165 peano2zm 12363 . . . . . . . . . . . . . . . . . . . 20 (𝐾 ∈ ℤ → (𝐾 − 1) ∈ ℤ)
16677, 78, 1653syl 18 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝐾 − 1) ∈ ℤ)
167 elfzuz3 13253 . . . . . . . . . . . . . . . . . . . . 21 (𝐾 ∈ (𝑀...(𝑁 + 1)) → (𝑁 + 1) ∈ (ℤ𝐾))
16877, 167syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑁 + 1) ∈ (ℤ𝐾))
169112zcnd 12427 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑𝐾 ∈ ℂ)
170 npcan 11230 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐾 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝐾 − 1) + 1) = 𝐾)
171169, 162, 170sylancl 586 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝐾 − 1) + 1) = 𝐾)
172171fveq2d 6778 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (ℤ‘((𝐾 − 1) + 1)) = (ℤ𝐾))
173168, 172eleqtrrd 2842 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑁 + 1) ∈ (ℤ‘((𝐾 − 1) + 1)))
174 eluzp1m1 12608 . . . . . . . . . . . . . . . . . . 19 (((𝐾 − 1) ∈ ℤ ∧ (𝑁 + 1) ∈ (ℤ‘((𝐾 − 1) + 1))) → ((𝑁 + 1) − 1) ∈ (ℤ‘(𝐾 − 1)))
175166, 173, 174syl2anc 584 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑁 + 1) − 1) ∈ (ℤ‘(𝐾 − 1)))
176164, 175eqeltrrd 2840 . . . . . . . . . . . . . . . . 17 (𝜑𝑁 ∈ (ℤ‘(𝐾 − 1)))
177 fzss2 13296 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ (ℤ‘(𝐾 − 1)) → (𝑀...(𝐾 − 1)) ⊆ (𝑀...𝑁))
178176, 177syl 17 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑀...(𝐾 − 1)) ⊆ (𝑀...𝑁))
179178sselda 3921 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → 𝑥 ∈ (𝑀...𝑁))
180179, 101syldan 591 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐽𝑥) ∈ (𝑀...𝑁))
181180fvresd 6794 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)) = (𝐺‘(𝐽𝑥)))
182179, 110syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐽𝑥) = (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))))
183 elfzm11 13327 . . . . . . . . . . . . . . . . . . 19 ((𝑀 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑥 ∈ (𝑀...(𝐾 − 1)) ↔ (𝑥 ∈ ℤ ∧ 𝑀𝑥𝑥 < 𝐾)))
184155, 112, 183syl2anc 584 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑥 ∈ (𝑀...(𝐾 − 1)) ↔ (𝑥 ∈ ℤ ∧ 𝑀𝑥𝑥 < 𝐾)))
185184biimpa 477 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝑥 ∈ ℤ ∧ 𝑀𝑥𝑥 < 𝐾))
186185simp3d 1143 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → 𝑥 < 𝐾)
187 iftrue 4465 . . . . . . . . . . . . . . . . 17 (𝑥 < 𝐾 → if(𝑥 < 𝐾, 𝑥, (𝑥 + 1)) = 𝑥)
188187fveq2d 6778 . . . . . . . . . . . . . . . 16 (𝑥 < 𝐾 → (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) = (𝐹𝑥))
189186, 188syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) = (𝐹𝑥))
190182, 189eqtrd 2778 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐽𝑥) = (𝐹𝑥))
191190fveq2d 6778 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐺‘(𝐽𝑥)) = (𝐺‘(𝐹𝑥)))
192181, 191eqtr2d 2779 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐺‘(𝐹𝑥)) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
193 peano2uz 12641 . . . . . . . . . . . . . . 15 (𝑁 ∈ (ℤ‘(𝐾 − 1)) → (𝑁 + 1) ∈ (ℤ‘(𝐾 − 1)))
194 fzss2 13296 . . . . . . . . . . . . . . 15 ((𝑁 + 1) ∈ (ℤ‘(𝐾 − 1)) → (𝑀...(𝐾 − 1)) ⊆ (𝑀...(𝑁 + 1)))
195176, 193, 1943syl 18 . . . . . . . . . . . . . 14 (𝜑 → (𝑀...(𝐾 − 1)) ⊆ (𝑀...(𝑁 + 1)))
196195sselda 3921 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
197 fvco3 6867 . . . . . . . . . . . . . 14 ((𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘𝑥) = (𝐺‘(𝐹𝑥)))
19857, 197sylan 580 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘𝑥) = (𝐺‘(𝐹𝑥)))
199196, 198syldan 591 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺𝐹)‘𝑥) = (𝐺‘(𝐹𝑥)))
200179, 128syldan 591 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
201192, 199, 2003eqtr4d 2788 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺𝐹)‘𝑥) = (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥))
202201adantlr 712 . . . . . . . . . 10 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ 𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺𝐹)‘𝑥) = (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥))
203158, 202seqfveq 13747 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) = (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)))
204 fzp1ss 13307 . . . . . . . . . . . 12 (𝑀 ∈ ℤ → ((𝑀 + 1)...𝑁) ⊆ (𝑀...𝑁))
20513, 154, 2043syl 18 . . . . . . . . . . 11 (𝜑 → ((𝑀 + 1)...𝑁) ⊆ (𝑀...𝑁))
206205sselda 3921 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → 𝐾 ∈ (𝑀...𝑁))
207206, 148syldan 591 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
208203, 207oveq12d 7293 . . . . . . . 8 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1)))))
209196, 61syldan 591 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺𝐹)‘𝑥) ∈ 𝑆)
210209adantlr 712 . . . . . . . . . . 11 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ 𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺𝐹)‘𝑥) ∈ 𝑆)
21110adantlr 712 . . . . . . . . . . 11 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ (𝑥𝑆𝑦𝑆)) → (𝑥 + 𝑦) ∈ 𝑆)
212158, 210, 211seqcl 13743 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) ∈ 𝑆)
21359, 77ffvelrnd 6962 . . . . . . . . . . . 12 (𝜑 → ((𝐺𝐹)‘𝐾) ∈ 𝐶)
21414, 213sseldd 3922 . . . . . . . . . . 11 (𝜑 → ((𝐺𝐹)‘𝐾) ∈ 𝑆)
215214adantr 481 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((𝐺𝐹)‘𝐾) ∈ 𝑆)
21694sselda 3921 . . . . . . . . . . . . 13 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ 𝑥 ∈ ((𝐾 + 1)...(𝑁 + 1))) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
217216, 62syldan 591 . . . . . . . . . . . 12 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ 𝑥 ∈ ((𝐾 + 1)...(𝑁 + 1))) → ((𝐺𝐹)‘𝑥) ∈ 𝑆)
21853, 217, 48seqcl 13743 . . . . . . . . . . 11 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) ∈ 𝑆)
219206, 218syldan 591 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) ∈ 𝑆)
220212, 215, 2193jca 1127 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) ∈ 𝑆 ∧ ((𝐺𝐹)‘𝐾) ∈ 𝑆 ∧ (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) ∈ 𝑆))
22112caovassg 7470 . . . . . . . . 9 ((𝜑 ∧ ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) ∈ 𝑆 ∧ ((𝐺𝐹)‘𝐾) ∈ 𝑆 ∧ (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) ∈ 𝑆)) → (((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)))))
222220, 221syldan 591 . . . . . . . 8 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)))))
2231, 14fssd 6618 . . . . . . . . . . . . . . . 16 (𝜑𝐺:(𝑀...(𝑁 + 1))⟶𝑆)
224 fssres 6640 . . . . . . . . . . . . . . . 16 ((𝐺:(𝑀...(𝑁 + 1))⟶𝑆 ∧ (𝑀...𝑁) ⊆ (𝑀...(𝑁 + 1))) → (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝑆)
225223, 3, 224sylancl 586 . . . . . . . . . . . . . . 15 (𝜑 → (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝑆)
226 fco 6624 . . . . . . . . . . . . . . 15 (((𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝑆𝐽:(𝑀...𝑁)⟶(𝑀...𝑁)) → ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽):(𝑀...𝑁)⟶𝑆)
227225, 20, 226syl2anc 584 . . . . . . . . . . . . . 14 (𝜑 → ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽):(𝑀...𝑁)⟶𝑆)
228227ffvelrnda 6961 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
229179, 228syldan 591 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
230229adantlr 712 . . . . . . . . . . 11 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ 𝑥 ∈ (𝑀...(𝐾 − 1))) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
231158, 230, 211seqcl 13743 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) ∈ 𝑆)
232 elfzuz3 13253 . . . . . . . . . . . 12 (𝐾 ∈ ((𝑀 + 1)...𝑁) → 𝑁 ∈ (ℤ𝐾))
233232adantl 482 . . . . . . . . . . 11 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → 𝑁 ∈ (ℤ𝐾))
234100, 228syldan 591 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
235234adantlr 712 . . . . . . . . . . 11 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ 𝑥 ∈ (𝐾...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
236233, 235, 211seqcl 13743 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) ∈ 𝑆)
237223, 75ffvelrnd 6962 . . . . . . . . . . 11 (𝜑 → (𝐺‘(𝑁 + 1)) ∈ 𝑆)
238237adantr 481 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (𝐺‘(𝑁 + 1)) ∈ 𝑆)
239231, 236, 2383jca 1127 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) ∈ 𝑆 ∧ (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) ∈ 𝑆 ∧ (𝐺‘(𝑁 + 1)) ∈ 𝑆))
24012caovassg 7470 . . . . . . . . 9 ((𝜑 ∧ ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) ∈ 𝑆 ∧ (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) ∈ 𝑆 ∧ (𝐺‘(𝑁 + 1)) ∈ 𝑆)) → (((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)) + (𝐺‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1)))))
241239, 240syldan 591 . . . . . . . 8 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)) + (𝐺‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1)))))
242208, 222, 2413eqtr4d 2788 . . . . . . 7 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = (((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)) + (𝐺‘(𝑁 + 1))))
243 seqm1 13740 . . . . . . . . 9 ((𝑀 ∈ ℤ ∧ 𝐾 ∈ (ℤ‘(𝑀 + 1))) → (seq𝑀( + , (𝐺𝐹))‘𝐾) = ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)))
244155, 156, 243syl2an 596 . . . . . . . 8 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , (𝐺𝐹))‘𝐾) = ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)))
245244oveq1d 7290 . . . . . . 7 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = (((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))))
24612adantlr 712 . . . . . . . . . 10 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ (𝑥𝑆𝑦𝑆𝑧𝑆)) → ((𝑥 + 𝑦) + 𝑧) = (𝑥 + (𝑦 + 𝑧)))
247 elfzelz 13256 . . . . . . . . . . . . . . 15 (𝐾 ∈ ((𝑀 + 1)...𝑁) → 𝐾 ∈ ℤ)
248247adantl 482 . . . . . . . . . . . . . 14 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → 𝐾 ∈ ℤ)
249248zcnd 12427 . . . . . . . . . . . . 13 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → 𝐾 ∈ ℂ)
250249, 162, 170sylancl 586 . . . . . . . . . . . 12 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((𝐾 − 1) + 1) = 𝐾)
251250fveq2d 6778 . . . . . . . . . . 11 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (ℤ‘((𝐾 − 1) + 1)) = (ℤ𝐾))
252233, 251eleqtrrd 2842 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → 𝑁 ∈ (ℤ‘((𝐾 − 1) + 1)))
253228adantlr 712 . . . . . . . . . 10 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
254211, 246, 252, 158, 253seqsplit 13756 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq((𝐾 − 1) + 1)( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)))
255250seqeq1d 13727 . . . . . . . . . . 11 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → seq((𝐾 − 1) + 1)( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)) = seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)))
256255fveq1d 6776 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq((𝐾 − 1) + 1)( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁))
257256oveq2d 7291 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq((𝐾 − 1) + 1)( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)))
258254, 257eqtrd 2778 . . . . . . . 8 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)))
259258oveq1d 7290 . . . . . . 7 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))) = (((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)) + (𝐺‘(𝑁 + 1))))
260242, 245, 2593eqtr4d 2788 . . . . . 6 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
261153, 260jaodan 955 . . . . 5 ((𝜑 ∧ (𝐾 = 𝑀𝐾 ∈ ((𝑀 + 1)...𝑁))) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
26266, 261syldan 591 . . . 4 ((𝜑𝐾 ∈ (𝑀...𝑁)) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
26363, 262eqtrd 2778 . . 3 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
26413adantr 481 . . . . 5 ((𝜑𝐾 = (𝑁 + 1)) → 𝑁 ∈ (ℤ𝑀))
265 seqp1 13736 . . . . 5 (𝑁 ∈ (ℤ𝑀) → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , (𝐺𝐹))‘𝑁) + ((𝐺𝐹)‘(𝑁 + 1))))
266264, 265syl 17 . . . 4 ((𝜑𝐾 = (𝑁 + 1)) → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , (𝐺𝐹))‘𝑁) + ((𝐺𝐹)‘(𝑁 + 1))))
267110adantl 482 . . . . . . . . . 10 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐽𝑥) = (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))))
268 elfzelz 13256 . . . . . . . . . . . . . . . 16 (𝑥 ∈ (𝑀...𝑁) → 𝑥 ∈ ℤ)
269268zred 12426 . . . . . . . . . . . . . . 15 (𝑥 ∈ (𝑀...𝑁) → 𝑥 ∈ ℝ)
270269adantl 482 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → 𝑥 ∈ ℝ)
271160zred 12426 . . . . . . . . . . . . . . 15 (𝜑𝑁 ∈ ℝ)
272271adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → 𝑁 ∈ ℝ)
273 peano2re 11148 . . . . . . . . . . . . . . 15 (𝑁 ∈ ℝ → (𝑁 + 1) ∈ ℝ)
274272, 273syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (𝑁 + 1) ∈ ℝ)
275 elfzle2 13260 . . . . . . . . . . . . . . 15 (𝑥 ∈ (𝑀...𝑁) → 𝑥𝑁)
276275adantl 482 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → 𝑥𝑁)
277272ltp1d 11905 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → 𝑁 < (𝑁 + 1))
278270, 272, 274, 276, 277lelttrd 11133 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...𝑁)) → 𝑥 < (𝑁 + 1))
279278adantlr 712 . . . . . . . . . . . 12 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 < (𝑁 + 1))
280 simplr 766 . . . . . . . . . . . 12 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝐾 = (𝑁 + 1))
281279, 280breqtrrd 5102 . . . . . . . . . . 11 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 < 𝐾)
282281, 188syl 17 . . . . . . . . . 10 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) = (𝐹𝑥))
283267, 282eqtrd 2778 . . . . . . . . 9 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐽𝑥) = (𝐹𝑥))
284283fveq2d 6778 . . . . . . . 8 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐹𝑥)))
285269adantl 482 . . . . . . . . . . 11 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 ∈ ℝ)
286285, 281gtned 11110 . . . . . . . . . 10 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝐾𝑥)
28757ad2antrr 723 . . . . . . . . . . . . . . 15 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
288 fzelp1 13308 . . . . . . . . . . . . . . . 16 (𝑥 ∈ (𝑀...𝑁) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
289288adantl 482 . . . . . . . . . . . . . . 15 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
290287, 289ffvelrnd 6962 . . . . . . . . . . . . . 14 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹𝑥) ∈ (𝑀...(𝑁 + 1)))
29113ad2antrr 723 . . . . . . . . . . . . . . 15 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑁 ∈ (ℤ𝑀))
292 elfzp1 13306 . . . . . . . . . . . . . . 15 (𝑁 ∈ (ℤ𝑀) → ((𝐹𝑥) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹𝑥) ∈ (𝑀...𝑁) ∨ (𝐹𝑥) = (𝑁 + 1))))
293291, 292syl 17 . . . . . . . . . . . . . 14 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹𝑥) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹𝑥) ∈ (𝑀...𝑁) ∨ (𝐹𝑥) = (𝑁 + 1))))
294290, 293mpbid 231 . . . . . . . . . . . . 13 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹𝑥) ∈ (𝑀...𝑁) ∨ (𝐹𝑥) = (𝑁 + 1)))
295294ord 861 . . . . . . . . . . . 12 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (¬ (𝐹𝑥) ∈ (𝑀...𝑁) → (𝐹𝑥) = (𝑁 + 1)))
29615ad2antrr 723 . . . . . . . . . . . . . 14 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
297 f1ocnvfv 7150 . . . . . . . . . . . . . 14 ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...(𝑁 + 1))) → ((𝐹𝑥) = (𝑁 + 1) → (𝐹‘(𝑁 + 1)) = 𝑥))
298296, 289, 297syl2anc 584 . . . . . . . . . . . . 13 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹𝑥) = (𝑁 + 1) → (𝐹‘(𝑁 + 1)) = 𝑥))
29917eqeq1i 2743 . . . . . . . . . . . . 13 (𝐾 = 𝑥 ↔ (𝐹‘(𝑁 + 1)) = 𝑥)
300298, 299syl6ibr 251 . . . . . . . . . . . 12 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹𝑥) = (𝑁 + 1) → 𝐾 = 𝑥))
301295, 300syld 47 . . . . . . . . . . 11 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (¬ (𝐹𝑥) ∈ (𝑀...𝑁) → 𝐾 = 𝑥))
302301necon1ad 2960 . . . . . . . . . 10 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐾𝑥 → (𝐹𝑥) ∈ (𝑀...𝑁)))
303286, 302mpd 15 . . . . . . . . 9 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹𝑥) ∈ (𝑀...𝑁))
304303fvresd 6794 . . . . . . . 8 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐺 ↾ (𝑀...𝑁))‘(𝐹𝑥)) = (𝐺‘(𝐹𝑥)))
305284, 304eqtr2d 2779 . . . . . . 7 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐺‘(𝐹𝑥)) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
30657, 288, 197syl2an 596 . . . . . . . 8 ((𝜑𝑥 ∈ (𝑀...𝑁)) → ((𝐺𝐹)‘𝑥) = (𝐺‘(𝐹𝑥)))
307306adantlr 712 . . . . . . 7 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐺𝐹)‘𝑥) = (𝐺‘(𝐹𝑥)))
308128adantlr 712 . . . . . . 7 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
309305, 307, 3083eqtr4d 2788 . . . . . 6 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐺𝐹)‘𝑥) = (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥))
310264, 309seqfveq 13747 . . . . 5 ((𝜑𝐾 = (𝑁 + 1)) → (seq𝑀( + , (𝐺𝐹))‘𝑁) = (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁))
311 fvco3 6867 . . . . . . . 8 ((𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)) ∧ (𝑁 + 1) ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘(𝑁 + 1)) = (𝐺‘(𝐹‘(𝑁 + 1))))
31257, 75, 311syl2anc 584 . . . . . . 7 (𝜑 → ((𝐺𝐹)‘(𝑁 + 1)) = (𝐺‘(𝐹‘(𝑁 + 1))))
313312adantr 481 . . . . . 6 ((𝜑𝐾 = (𝑁 + 1)) → ((𝐺𝐹)‘(𝑁 + 1)) = (𝐺‘(𝐹‘(𝑁 + 1))))
314 simpr 485 . . . . . . . . . 10 ((𝜑𝐾 = (𝑁 + 1)) → 𝐾 = (𝑁 + 1))
31517, 314eqtr3id 2792 . . . . . . . . 9 ((𝜑𝐾 = (𝑁 + 1)) → (𝐹‘(𝑁 + 1)) = (𝑁 + 1))
316315fveq2d 6778 . . . . . . . 8 ((𝜑𝐾 = (𝑁 + 1)) → (𝐹‘(𝐹‘(𝑁 + 1))) = (𝐹‘(𝑁 + 1)))
317142adantr 481 . . . . . . . 8 ((𝜑𝐾 = (𝑁 + 1)) → (𝐹‘(𝐹‘(𝑁 + 1))) = (𝑁 + 1))
318316, 317eqtr3d 2780 . . . . . . 7 ((𝜑𝐾 = (𝑁 + 1)) → (𝐹‘(𝑁 + 1)) = (𝑁 + 1))
319318fveq2d 6778 . . . . . 6 ((𝜑𝐾 = (𝑁 + 1)) → (𝐺‘(𝐹‘(𝑁 + 1))) = (𝐺‘(𝑁 + 1)))
320313, 319eqtrd 2778 . . . . 5 ((𝜑𝐾 = (𝑁 + 1)) → ((𝐺𝐹)‘(𝑁 + 1)) = (𝐺‘(𝑁 + 1)))
321310, 320oveq12d 7293 . . . 4 ((𝜑𝐾 = (𝑁 + 1)) → ((seq𝑀( + , (𝐺𝐹))‘𝑁) + ((𝐺𝐹)‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
322266, 321eqtrd 2778 . . 3 ((𝜑𝐾 = (𝑁 + 1)) → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
323 elfzp1 13306 . . . . 5 (𝑁 ∈ (ℤ𝑀) → (𝐾 ∈ (𝑀...(𝑁 + 1)) ↔ (𝐾 ∈ (𝑀...𝑁) ∨ 𝐾 = (𝑁 + 1))))
32413, 323syl 17 . . . 4 (𝜑 → (𝐾 ∈ (𝑀...(𝑁 + 1)) ↔ (𝐾 ∈ (𝑀...𝑁) ∨ 𝐾 = (𝑁 + 1))))
32577, 324mpbid 231 . . 3 (𝜑 → (𝐾 ∈ (𝑀...𝑁) ∨ 𝐾 = (𝑁 + 1)))
326263, 322, 325mpjaodan 956 . 2 (𝜑 → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
327 seqp1 13736 . . 3 (𝑁 ∈ (ℤ𝑀) → (seq𝑀( + , 𝐺)‘(𝑁 + 1)) = ((seq𝑀( + , 𝐺)‘𝑁) + (𝐺‘(𝑁 + 1))))
32813, 327syl 17 . 2 (𝜑 → (seq𝑀( + , 𝐺)‘(𝑁 + 1)) = ((seq𝑀( + , 𝐺)‘𝑁) + (𝐺‘(𝑁 + 1))))
32947, 326, 3283eqtr4d 2788 1 (𝜑 → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = (seq𝑀( + , 𝐺)‘(𝑁 + 1)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 396  wo 844  w3a 1086  wal 1537   = wceq 1539  wcel 2106  wne 2943  Vcvv 3432  wss 3887  ifcif 4459   class class class wbr 5074  cmpt 5157  ccnv 5588  cres 5591  ccom 5593   Fn wfn 6428  wf 6429  1-1-ontowf1o 6432  cfv 6433  (class class class)co 7275  Fincfn 8733  cc 10869  cr 10870  1c1 10872   + caddc 10874   < clt 11009  cle 11010  cmin 11205  cz 12319  cuz 12582  ...cfz 13239  seqcseq 13721
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2709  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7588  ax-cnex 10927  ax-resscn 10928  ax-1cn 10929  ax-icn 10930  ax-addcl 10931  ax-addrcl 10932  ax-mulcl 10933  ax-mulrcl 10934  ax-mulcom 10935  ax-addass 10936  ax-mulass 10937  ax-distr 10938  ax-i2m1 10939  ax-1ne0 10940  ax-1rid 10941  ax-rnegex 10942  ax-rrecex 10943  ax-cnre 10944  ax-pre-lttri 10945  ax-pre-lttrn 10946  ax-pre-ltadd 10947  ax-pre-mulgt0 10948
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-nel 3050  df-ral 3069  df-rex 3070  df-reu 3072  df-rab 3073  df-v 3434  df-sbc 3717  df-csb 3833  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-pss 3906  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4840  df-iun 4926  df-br 5075  df-opab 5137  df-mpt 5158  df-tr 5192  df-id 5489  df-eprel 5495  df-po 5503  df-so 5504  df-fr 5544  df-we 5546  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-pred 6202  df-ord 6269  df-on 6270  df-lim 6271  df-suc 6272  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-riota 7232  df-ov 7278  df-oprab 7279  df-mpo 7280  df-om 7713  df-1st 7831  df-2nd 7832  df-frecs 8097  df-wrecs 8128  df-recs 8202  df-rdg 8241  df-1o 8297  df-er 8498  df-en 8734  df-dom 8735  df-sdom 8736  df-fin 8737  df-pnf 11011  df-mnf 11012  df-xr 11013  df-ltxr 11014  df-le 11015  df-sub 11207  df-neg 11208  df-nn 11974  df-n0 12234  df-z 12320  df-uz 12583  df-fz 13240  df-fzo 13383  df-seq 13722
This theorem is referenced by:  seqf1o  13764
  Copyright terms: Public domain W3C validator