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

Theorem seqf1olem2 13413
Description: Lemma for seqf1o 13414. (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 6517 . . . . . . . . 9 (𝜑𝐺 Fn (𝑀...(𝑁 + 1)))
3 fzssp1 12953 . . . . . . . . 9 (𝑀...𝑁) ⊆ (𝑀...(𝑁 + 1))
4 fnssres 6472 . . . . . . . . 9 ((𝐺 Fn (𝑀...(𝑁 + 1)) ∧ (𝑀...𝑁) ⊆ (𝑀...(𝑁 + 1))) → (𝐺 ↾ (𝑀...𝑁)) Fn (𝑀...𝑁))
52, 3, 4sylancl 588 . . . . . . . 8 (𝜑 → (𝐺 ↾ (𝑀...𝑁)) Fn (𝑀...𝑁))
6 fzfid 13344 . . . . . . . 8 (𝜑 → (𝑀...𝑁) ∈ Fin)
7 fnfi 8798 . . . . . . . 8 (((𝐺 ↾ (𝑀...𝑁)) Fn (𝑀...𝑁) ∧ (𝑀...𝑁) ∈ Fin) → (𝐺 ↾ (𝑀...𝑁)) ∈ Fin)
85, 6, 7syl2anc 586 . . . . . . 7 (𝜑 → (𝐺 ↾ (𝑀...𝑁)) ∈ Fin)
98elexd 3516 . . . . . 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 13412 . . . . . . . 8 (𝜑𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁))
19 f1of 6617 . . . . . . . 8 (𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) → 𝐽:(𝑀...𝑁)⟶(𝑀...𝑁))
2018, 19syl 17 . . . . . . 7 (𝜑𝐽:(𝑀...𝑁)⟶(𝑀...𝑁))
21 fex2 7640 . . . . . . 7 ((𝐽:(𝑀...𝑁)⟶(𝑀...𝑁) ∧ (𝑀...𝑁) ∈ Fin ∧ (𝑀...𝑁) ∈ Fin) → 𝐽 ∈ V)
2220, 6, 6, 21syl3anc 1367 . . . . . 6 (𝜑𝐽 ∈ V)
239, 22jca 514 . . . . 5 (𝜑 → ((𝐺 ↾ (𝑀...𝑁)) ∈ V ∧ 𝐽 ∈ V))
24 seqf1olem.9 . . . . 5 (𝜑 → ∀𝑔𝑓((𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ 𝑔:(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , 𝑔)‘𝑁)))
25 fssres 6546 . . . . . . 7 ((𝐺:(𝑀...(𝑁 + 1))⟶𝐶 ∧ (𝑀...𝑁) ⊆ (𝑀...(𝑁 + 1))) → (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶)
261, 3, 25sylancl 588 . . . . . 6 (𝜑 → (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶)
2718, 26jca 514 . . . . 5 (𝜑 → (𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶))
28 f1oeq1 6606 . . . . . . . 8 (𝑓 = 𝐽 → (𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ↔ 𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁)))
29 feq1 6497 . . . . . . . 8 (𝑔 = (𝐺 ↾ (𝑀...𝑁)) → (𝑔:(𝑀...𝑁)⟶𝐶 ↔ (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶))
3028, 29bi2anan9r 638 . . . . . . 7 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → ((𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ 𝑔:(𝑀...𝑁)⟶𝐶) ↔ (𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶)))
31 coeq1 5730 . . . . . . . . . . 11 (𝑔 = (𝐺 ↾ (𝑀...𝑁)) → (𝑔𝑓) = ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝑓))
32 coeq2 5731 . . . . . . . . . . 11 (𝑓 = 𝐽 → ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝑓) = ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))
3331, 32sylan9eq 2878 . . . . . . . . . 10 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → (𝑔𝑓) = ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))
3433seqeq3d 13380 . . . . . . . . 9 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → seq𝑀( + , (𝑔𝑓)) = seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)))
3534fveq1d 6674 . . . . . . . 8 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → (seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁))
36 simpl 485 . . . . . . . . . 10 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → 𝑔 = (𝐺 ↾ (𝑀...𝑁)))
3736seqeq3d 13380 . . . . . . . . 9 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → seq𝑀( + , 𝑔) = seq𝑀( + , (𝐺 ↾ (𝑀...𝑁))))
3837fveq1d 6674 . . . . . . . 8 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → (seq𝑀( + , 𝑔)‘𝑁) = (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁))
3935, 38eqeq12d 2839 . . . . . . 7 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → ((seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , 𝑔)‘𝑁) ↔ (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁)))
4030, 39imbi12d 347 . . . . . 6 ((𝑔 = (𝐺 ↾ (𝑀...𝑁)) ∧ 𝑓 = 𝐽) → (((𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ 𝑔:(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , 𝑔)‘𝑁)) ↔ ((𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁))))
4140spc2gv 3603 . . . . 5 (((𝐺 ↾ (𝑀...𝑁)) ∈ V ∧ 𝐽 ∈ V) → (∀𝑔𝑓((𝑓:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ 𝑔:(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , (𝑔𝑓))‘𝑁) = (seq𝑀( + , 𝑔)‘𝑁)) → ((𝐽:(𝑀...𝑁)–1-1-onto→(𝑀...𝑁) ∧ (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝐶) → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁))))
4223, 24, 27, 41syl3c 66 . . . 4 (𝜑 → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁))
43 fvres 6691 . . . . . 6 (𝑥 ∈ (𝑀...𝑁) → ((𝐺 ↾ (𝑀...𝑁))‘𝑥) = (𝐺𝑥))
4443adantl 484 . . . . 5 ((𝜑𝑥 ∈ (𝑀...𝑁)) → ((𝐺 ↾ (𝑀...𝑁))‘𝑥) = (𝐺𝑥))
4513, 44seqfveq 13397 . . . 4 (𝜑 → (seq𝑀( + , (𝐺 ↾ (𝑀...𝑁)))‘𝑁) = (seq𝑀( + , 𝐺)‘𝑁))
4642, 45eqtrd 2858 . . 3 (𝜑 → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , 𝐺)‘𝑁))
4746oveq1d 7173 . 2 (𝜑 → ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))) = ((seq𝑀( + , 𝐺)‘𝑁) + (𝐺‘(𝑁 + 1))))
4810adantlr 713 . . . . 5 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ (𝑥𝑆𝑦𝑆)) → (𝑥 + 𝑦) ∈ 𝑆)
4912adantlr 713 . . . . 5 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ (𝑥𝑆𝑦𝑆𝑧𝑆)) → ((𝑥 + 𝑦) + 𝑧) = (𝑥 + (𝑦 + 𝑧)))
50 elfzuz3 12908 . . . . . . 7 (𝐾 ∈ (𝑀...𝑁) → 𝑁 ∈ (ℤ𝐾))
5150adantl 484 . . . . . 6 ((𝜑𝐾 ∈ (𝑀...𝑁)) → 𝑁 ∈ (ℤ𝐾))
52 eluzp1p1 12273 . . . . . 6 (𝑁 ∈ (ℤ𝐾) → (𝑁 + 1) ∈ (ℤ‘(𝐾 + 1)))
5351, 52syl 17 . . . . 5 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (𝑁 + 1) ∈ (ℤ‘(𝐾 + 1)))
54 elfzuz 12907 . . . . . 6 (𝐾 ∈ (𝑀...𝑁) → 𝐾 ∈ (ℤ𝑀))
5554adantl 484 . . . . 5 ((𝜑𝐾 ∈ (𝑀...𝑁)) → 𝐾 ∈ (ℤ𝑀))
56 f1of 6617 . . . . . . . . . 10 (𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
5715, 56syl 17 . . . . . . . . 9 (𝜑𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
58 fco 6533 . . . . . . . . 9 ((𝐺:(𝑀...(𝑁 + 1))⟶𝐶𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1))) → (𝐺𝐹):(𝑀...(𝑁 + 1))⟶𝐶)
591, 57, 58syl2anc 586 . . . . . . . 8 (𝜑 → (𝐺𝐹):(𝑀...(𝑁 + 1))⟶𝐶)
6059, 14fssd 6530 . . . . . . 7 (𝜑 → (𝐺𝐹):(𝑀...(𝑁 + 1))⟶𝑆)
6160ffvelrnda 6853 . . . . . 6 ((𝜑𝑥 ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘𝑥) ∈ 𝑆)
6261adantlr 713 . . . . 5 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ 𝑥 ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘𝑥) ∈ 𝑆)
6348, 49, 53, 55, 62seqsplit 13406 . . . 4 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))))
64 elfzp12 12989 . . . . . . 7 (𝑁 ∈ (ℤ𝑀) → (𝐾 ∈ (𝑀...𝑁) ↔ (𝐾 = 𝑀𝐾 ∈ ((𝑀 + 1)...𝑁))))
6564biimpa 479 . . . . . 6 ((𝑁 ∈ (ℤ𝑀) ∧ 𝐾 ∈ (𝑀...𝑁)) → (𝐾 = 𝑀𝐾 ∈ ((𝑀 + 1)...𝑁)))
6613, 65sylan 582 . . . . 5 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (𝐾 = 𝑀𝐾 ∈ ((𝑀 + 1)...𝑁)))
67 seqeq1 13375 . . . . . . . . . . 11 (𝐾 = 𝑀 → seq𝐾( + , (𝐺𝐹)) = seq𝑀( + , (𝐺𝐹)))
6867eqcomd 2829 . . . . . . . . . 10 (𝐾 = 𝑀 → seq𝑀( + , (𝐺𝐹)) = seq𝐾( + , (𝐺𝐹)))
6968fveq1d 6674 . . . . . . . . 9 (𝐾 = 𝑀 → (seq𝑀( + , (𝐺𝐹))‘𝐾) = (seq𝐾( + , (𝐺𝐹))‘𝐾))
70 f1ocnv 6629 . . . . . . . . . . . . 13 (𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
71 f1of 6617 . . . . . . . . . . . . 13 (𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
7215, 70, 713syl 18 . . . . . . . . . . . 12 (𝜑𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
73 peano2uz 12304 . . . . . . . . . . . . 13 (𝑁 ∈ (ℤ𝑀) → (𝑁 + 1) ∈ (ℤ𝑀))
74 eluzfz2 12918 . . . . . . . . . . . . 13 ((𝑁 + 1) ∈ (ℤ𝑀) → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
7513, 73, 743syl 18 . . . . . . . . . . . 12 (𝜑 → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
7672, 75ffvelrnd 6854 . . . . . . . . . . 11 (𝜑 → (𝐹‘(𝑁 + 1)) ∈ (𝑀...(𝑁 + 1)))
7717, 76eqeltrid 2919 . . . . . . . . . 10 (𝜑𝐾 ∈ (𝑀...(𝑁 + 1)))
78 elfzelz 12911 . . . . . . . . . 10 (𝐾 ∈ (𝑀...(𝑁 + 1)) → 𝐾 ∈ ℤ)
79 seq1 13385 . . . . . . . . . 10 (𝐾 ∈ ℤ → (seq𝐾( + , (𝐺𝐹))‘𝐾) = ((𝐺𝐹)‘𝐾))
8077, 78, 793syl 18 . . . . . . . . 9 (𝜑 → (seq𝐾( + , (𝐺𝐹))‘𝐾) = ((𝐺𝐹)‘𝐾))
8169, 80sylan9eqr 2880 . . . . . . . 8 ((𝜑𝐾 = 𝑀) → (seq𝑀( + , (𝐺𝐹))‘𝐾) = ((𝐺𝐹)‘𝐾))
8281oveq1d 7173 . . . . . . 7 ((𝜑𝐾 = 𝑀) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))))
83 simpr 487 . . . . . . . . 9 ((𝜑𝐾 = 𝑀) → 𝐾 = 𝑀)
84 eluzfz1 12917 . . . . . . . . . . 11 (𝑁 ∈ (ℤ𝑀) → 𝑀 ∈ (𝑀...𝑁))
8513, 84syl 17 . . . . . . . . . 10 (𝜑𝑀 ∈ (𝑀...𝑁))
8685adantr 483 . . . . . . . . 9 ((𝜑𝐾 = 𝑀) → 𝑀 ∈ (𝑀...𝑁))
8783, 86eqeltrd 2915 . . . . . . . 8 ((𝜑𝐾 = 𝑀) → 𝐾 ∈ (𝑀...𝑁))
8811adantlr 713 . . . . . . . . . 10 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ (𝑥𝐶𝑦𝐶)) → (𝑥 + 𝑦) = (𝑦 + 𝑥))
8914adantr 483 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → 𝐶𝑆)
9059adantr 483 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (𝐺𝐹):(𝑀...(𝑁 + 1))⟶𝐶)
9177adantr 483 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → 𝐾 ∈ (𝑀...(𝑁 + 1)))
92 peano2uz 12304 . . . . . . . . . . 11 (𝐾 ∈ (ℤ𝑀) → (𝐾 + 1) ∈ (ℤ𝑀))
93 fzss1 12949 . . . . . . . . . . 11 ((𝐾 + 1) ∈ (ℤ𝑀) → ((𝐾 + 1)...(𝑁 + 1)) ⊆ (𝑀...(𝑁 + 1)))
9455, 92, 933syl 18 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → ((𝐾 + 1)...(𝑁 + 1)) ⊆ (𝑀...(𝑁 + 1)))
9548, 88, 49, 53, 89, 90, 91, 94seqf1olem2a 13411 . . . . . . . . 9 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) + ((𝐺𝐹)‘𝐾)))
96 1zzd 12016 . . . . . . . . . . 11 ((𝜑𝐾 ∈ (𝑀...𝑁)) → 1 ∈ ℤ)
97 elfzuz 12907 . . . . . . . . . . . . . . . . . 18 (𝐾 ∈ (𝑀...(𝑁 + 1)) → 𝐾 ∈ (ℤ𝑀))
98 fzss1 12949 . . . . . . . . . . . . . . . . . 18 (𝐾 ∈ (ℤ𝑀) → (𝐾...𝑁) ⊆ (𝑀...𝑁))
9977, 97, 983syl 18 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐾...𝑁) ⊆ (𝑀...𝑁))
10099sselda 3969 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝐾...𝑁)) → 𝑥 ∈ (𝑀...𝑁))
10120ffvelrnda 6853 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (𝐽𝑥) ∈ (𝑀...𝑁))
102100, 101syldan 593 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝐽𝑥) ∈ (𝑀...𝑁))
103102fvresd 6692 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝐾...𝑁)) → ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)) = (𝐺‘(𝐽𝑥)))
104 breq1 5071 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 𝑥 → (𝑘 < 𝐾𝑥 < 𝐾))
105 id 22 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 𝑥𝑘 = 𝑥)
106 oveq1 7165 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 𝑥 → (𝑘 + 1) = (𝑥 + 1))
107104, 105, 106ifbieq12d 4496 . . . . . . . . . . . . . . . . . . 19 (𝑘 = 𝑥 → if(𝑘 < 𝐾, 𝑘, (𝑘 + 1)) = if(𝑥 < 𝐾, 𝑥, (𝑥 + 1)))
108107fveq2d 6676 . . . . . . . . . . . . . . . . . 18 (𝑘 = 𝑥 → (𝐹‘if(𝑘 < 𝐾, 𝑘, (𝑘 + 1))) = (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))))
109 fvex 6685 . . . . . . . . . . . . . . . . . 18 (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) ∈ V
110108, 16, 109fvmpt 6770 . . . . . . . . . . . . . . . . 17 (𝑥 ∈ (𝑀...𝑁) → (𝐽𝑥) = (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))))
111100, 110syl 17 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝐽𝑥) = (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))))
11277, 78syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝐾 ∈ ℤ)
113112zred 12090 . . . . . . . . . . . . . . . . . . 19 (𝜑𝐾 ∈ ℝ)
114113adantr 483 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ (𝐾...𝑁)) → 𝐾 ∈ ℝ)
115 elfzelz 12911 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ (𝐾...𝑁) → 𝑥 ∈ ℤ)
116115adantl 484 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑥 ∈ (𝐾...𝑁)) → 𝑥 ∈ ℤ)
117116zred 12090 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ (𝐾...𝑁)) → 𝑥 ∈ ℝ)
118 elfzle1 12913 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ (𝐾...𝑁) → 𝐾𝑥)
119118adantl 484 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ (𝐾...𝑁)) → 𝐾𝑥)
120114, 117, 119lensymd 10793 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ (𝐾...𝑁)) → ¬ 𝑥 < 𝐾)
121 iffalse 4478 . . . . . . . . . . . . . . . . . 18 𝑥 < 𝐾 → if(𝑥 < 𝐾, 𝑥, (𝑥 + 1)) = (𝑥 + 1))
122121fveq2d 6676 . . . . . . . . . . . . . . . . 17 𝑥 < 𝐾 → (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) = (𝐹‘(𝑥 + 1)))
123120, 122syl 17 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) = (𝐹‘(𝑥 + 1)))
124111, 123eqtrd 2858 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝐽𝑥) = (𝐹‘(𝑥 + 1)))
125124fveq2d 6676 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝐺‘(𝐽𝑥)) = (𝐺‘(𝐹‘(𝑥 + 1))))
126103, 125eqtrd 2858 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝐾...𝑁)) → ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)) = (𝐺‘(𝐹‘(𝑥 + 1))))
127 fvco3 6762 . . . . . . . . . . . . . . 15 ((𝐽:(𝑀...𝑁)⟶(𝑀...𝑁) ∧ 𝑥 ∈ (𝑀...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
12820, 127sylan 582 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
129100, 128syldan 593 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
130 fzp1elp1 12963 . . . . . . . . . . . . . . 15 (𝑥 ∈ (𝑀...𝑁) → (𝑥 + 1) ∈ (𝑀...(𝑁 + 1)))
131100, 130syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (𝑥 + 1) ∈ (𝑀...(𝑁 + 1)))
132 fvco3 6762 . . . . . . . . . . . . . . 15 ((𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)) ∧ (𝑥 + 1) ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘(𝑥 + 1)) = (𝐺‘(𝐹‘(𝑥 + 1))))
13357, 132sylan 582 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑥 + 1) ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘(𝑥 + 1)) = (𝐺‘(𝐹‘(𝑥 + 1))))
134131, 133syldan 593 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝐾...𝑁)) → ((𝐺𝐹)‘(𝑥 + 1)) = (𝐺‘(𝐹‘(𝑥 + 1))))
135126, 129, 1343eqtr4d 2868 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺𝐹)‘(𝑥 + 1)))
136135adantlr 713 . . . . . . . . . . 11 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ 𝑥 ∈ (𝐾...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺𝐹)‘(𝑥 + 1)))
13751, 96, 136seqshft2 13399 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)))
138 fvco3 6762 . . . . . . . . . . . . 13 ((𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)) ∧ 𝐾 ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘𝐾) = (𝐺‘(𝐹𝐾)))
13957, 77, 138syl2anc 586 . . . . . . . . . . . 12 (𝜑 → ((𝐺𝐹)‘𝐾) = (𝐺‘(𝐹𝐾)))
14017fveq2i 6675 . . . . . . . . . . . . . 14 (𝐹𝐾) = (𝐹‘(𝐹‘(𝑁 + 1)))
141 f1ocnvfv2 7036 . . . . . . . . . . . . . . 15 ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ (𝑁 + 1) ∈ (𝑀...(𝑁 + 1))) → (𝐹‘(𝐹‘(𝑁 + 1))) = (𝑁 + 1))
14215, 75, 141syl2anc 586 . . . . . . . . . . . . . 14 (𝜑 → (𝐹‘(𝐹‘(𝑁 + 1))) = (𝑁 + 1))
143140, 142syl5eq 2870 . . . . . . . . . . . . 13 (𝜑 → (𝐹𝐾) = (𝑁 + 1))
144143fveq2d 6676 . . . . . . . . . . . 12 (𝜑 → (𝐺‘(𝐹𝐾)) = (𝐺‘(𝑁 + 1)))
145139, 144eqtr2d 2859 . . . . . . . . . . 11 (𝜑 → (𝐺‘(𝑁 + 1)) = ((𝐺𝐹)‘𝐾))
146145adantr 483 . . . . . . . . . 10 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (𝐺‘(𝑁 + 1)) = ((𝐺𝐹)‘𝐾))
147137, 146oveq12d 7176 . . . . . . . . 9 ((𝜑𝐾 ∈ (𝑀...𝑁)) → ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))) = ((seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) + ((𝐺𝐹)‘𝐾)))
14895, 147eqtr4d 2861 . . . . . . . 8 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
14987, 148syldan 593 . . . . . . 7 ((𝜑𝐾 = 𝑀) → (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
15083seqeq1d 13378 . . . . . . . . 9 ((𝜑𝐾 = 𝑀) → seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)) = seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)))
151150fveq1d 6674 . . . . . . . 8 ((𝜑𝐾 = 𝑀) → (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁))
152151oveq1d 7173 . . . . . . 7 ((𝜑𝐾 = 𝑀) → ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
15382, 149, 1523eqtrd 2862 . . . . . 6 ((𝜑𝐾 = 𝑀) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
154 eluzel2 12251 . . . . . . . . . . . 12 (𝑁 ∈ (ℤ𝑀) → 𝑀 ∈ ℤ)
15513, 154syl 17 . . . . . . . . . . 11 (𝜑𝑀 ∈ ℤ)
156 elfzuz 12907 . . . . . . . . . . 11 (𝐾 ∈ ((𝑀 + 1)...𝑁) → 𝐾 ∈ (ℤ‘(𝑀 + 1)))
157 eluzp1m1 12271 . . . . . . . . . . 11 ((𝑀 ∈ ℤ ∧ 𝐾 ∈ (ℤ‘(𝑀 + 1))) → (𝐾 − 1) ∈ (ℤ𝑀))
158155, 156, 157syl2an 597 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (𝐾 − 1) ∈ (ℤ𝑀))
159 eluzelz 12256 . . . . . . . . . . . . . . . . . . . . 21 (𝑁 ∈ (ℤ𝑀) → 𝑁 ∈ ℤ)
16013, 159syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝑁 ∈ ℤ)
161160zcnd 12091 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑁 ∈ ℂ)
162 ax-1cn 10597 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℂ
163 pncan 10894 . . . . . . . . . . . . . . . . . . 19 ((𝑁 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝑁 + 1) − 1) = 𝑁)
164161, 162, 163sylancl 588 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑁 + 1) − 1) = 𝑁)
165 peano2zm 12028 . . . . . . . . . . . . . . . . . . . 20 (𝐾 ∈ ℤ → (𝐾 − 1) ∈ ℤ)
16677, 78, 1653syl 18 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝐾 − 1) ∈ ℤ)
167 elfzuz3 12908 . . . . . . . . . . . . . . . . . . . . 21 (𝐾 ∈ (𝑀...(𝑁 + 1)) → (𝑁 + 1) ∈ (ℤ𝐾))
16877, 167syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝑁 + 1) ∈ (ℤ𝐾))
169112zcnd 12091 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑𝐾 ∈ ℂ)
170 npcan 10897 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐾 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝐾 − 1) + 1) = 𝐾)
171169, 162, 170sylancl 588 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝐾 − 1) + 1) = 𝐾)
172171fveq2d 6676 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (ℤ‘((𝐾 − 1) + 1)) = (ℤ𝐾))
173168, 172eleqtrrd 2918 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑁 + 1) ∈ (ℤ‘((𝐾 − 1) + 1)))
174 eluzp1m1 12271 . . . . . . . . . . . . . . . . . . 19 (((𝐾 − 1) ∈ ℤ ∧ (𝑁 + 1) ∈ (ℤ‘((𝐾 − 1) + 1))) → ((𝑁 + 1) − 1) ∈ (ℤ‘(𝐾 − 1)))
175166, 173, 174syl2anc 586 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑁 + 1) − 1) ∈ (ℤ‘(𝐾 − 1)))
176164, 175eqeltrrd 2916 . . . . . . . . . . . . . . . . 17 (𝜑𝑁 ∈ (ℤ‘(𝐾 − 1)))
177 fzss2 12950 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ (ℤ‘(𝐾 − 1)) → (𝑀...(𝐾 − 1)) ⊆ (𝑀...𝑁))
178176, 177syl 17 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑀...(𝐾 − 1)) ⊆ (𝑀...𝑁))
179178sselda 3969 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → 𝑥 ∈ (𝑀...𝑁))
180179, 101syldan 593 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐽𝑥) ∈ (𝑀...𝑁))
181180fvresd 6692 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)) = (𝐺‘(𝐽𝑥)))
182179, 110syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐽𝑥) = (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))))
183 elfzm11 12981 . . . . . . . . . . . . . . . . . . 19 ((𝑀 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑥 ∈ (𝑀...(𝐾 − 1)) ↔ (𝑥 ∈ ℤ ∧ 𝑀𝑥𝑥 < 𝐾)))
184155, 112, 183syl2anc 586 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑥 ∈ (𝑀...(𝐾 − 1)) ↔ (𝑥 ∈ ℤ ∧ 𝑀𝑥𝑥 < 𝐾)))
185184biimpa 479 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝑥 ∈ ℤ ∧ 𝑀𝑥𝑥 < 𝐾))
186185simp3d 1140 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → 𝑥 < 𝐾)
187 iftrue 4475 . . . . . . . . . . . . . . . . 17 (𝑥 < 𝐾 → if(𝑥 < 𝐾, 𝑥, (𝑥 + 1)) = 𝑥)
188187fveq2d 6676 . . . . . . . . . . . . . . . 16 (𝑥 < 𝐾 → (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) = (𝐹𝑥))
189186, 188syl 17 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) = (𝐹𝑥))
190182, 189eqtrd 2858 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐽𝑥) = (𝐹𝑥))
191190fveq2d 6676 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐺‘(𝐽𝑥)) = (𝐺‘(𝐹𝑥)))
192181, 191eqtr2d 2859 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (𝐺‘(𝐹𝑥)) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
193 peano2uz 12304 . . . . . . . . . . . . . . 15 (𝑁 ∈ (ℤ‘(𝐾 − 1)) → (𝑁 + 1) ∈ (ℤ‘(𝐾 − 1)))
194 fzss2 12950 . . . . . . . . . . . . . . 15 ((𝑁 + 1) ∈ (ℤ‘(𝐾 − 1)) → (𝑀...(𝐾 − 1)) ⊆ (𝑀...(𝑁 + 1)))
195176, 193, 1943syl 18 . . . . . . . . . . . . . 14 (𝜑 → (𝑀...(𝐾 − 1)) ⊆ (𝑀...(𝑁 + 1)))
196195sselda 3969 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
197 fvco3 6762 . . . . . . . . . . . . . 14 ((𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘𝑥) = (𝐺‘(𝐹𝑥)))
19857, 197sylan 582 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘𝑥) = (𝐺‘(𝐹𝑥)))
199196, 198syldan 593 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺𝐹)‘𝑥) = (𝐺‘(𝐹𝑥)))
200179, 128syldan 593 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
201192, 199, 2003eqtr4d 2868 . . . . . . . . . . 11 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺𝐹)‘𝑥) = (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥))
202201adantlr 713 . . . . . . . . . 10 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ 𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺𝐹)‘𝑥) = (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥))
203158, 202seqfveq 13397 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) = (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)))
204 fzp1ss 12961 . . . . . . . . . . . 12 (𝑀 ∈ ℤ → ((𝑀 + 1)...𝑁) ⊆ (𝑀...𝑁))
20513, 154, 2043syl 18 . . . . . . . . . . 11 (𝜑 → ((𝑀 + 1)...𝑁) ⊆ (𝑀...𝑁))
206205sselda 3969 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → 𝐾 ∈ (𝑀...𝑁))
207206, 148syldan 593 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
208203, 207oveq12d 7176 . . . . . . . 8 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1)))))
209196, 61syldan 593 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺𝐹)‘𝑥) ∈ 𝑆)
210209adantlr 713 . . . . . . . . . . 11 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ 𝑥 ∈ (𝑀...(𝐾 − 1))) → ((𝐺𝐹)‘𝑥) ∈ 𝑆)
21110adantlr 713 . . . . . . . . . . 11 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ (𝑥𝑆𝑦𝑆)) → (𝑥 + 𝑦) ∈ 𝑆)
212158, 210, 211seqcl 13393 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) ∈ 𝑆)
21359, 77ffvelrnd 6854 . . . . . . . . . . . 12 (𝜑 → ((𝐺𝐹)‘𝐾) ∈ 𝐶)
21414, 213sseldd 3970 . . . . . . . . . . 11 (𝜑 → ((𝐺𝐹)‘𝐾) ∈ 𝑆)
215214adantr 483 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((𝐺𝐹)‘𝐾) ∈ 𝑆)
21694sselda 3969 . . . . . . . . . . . . 13 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ 𝑥 ∈ ((𝐾 + 1)...(𝑁 + 1))) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
217216, 62syldan 593 . . . . . . . . . . . 12 (((𝜑𝐾 ∈ (𝑀...𝑁)) ∧ 𝑥 ∈ ((𝐾 + 1)...(𝑁 + 1))) → ((𝐺𝐹)‘𝑥) ∈ 𝑆)
21853, 217, 48seqcl 13393 . . . . . . . . . . 11 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) ∈ 𝑆)
219206, 218syldan 593 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) ∈ 𝑆)
220212, 215, 2193jca 1124 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) ∈ 𝑆 ∧ ((𝐺𝐹)‘𝐾) ∈ 𝑆 ∧ (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) ∈ 𝑆))
22112caovassg 7348 . . . . . . . . 9 ((𝜑 ∧ ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) ∈ 𝑆 ∧ ((𝐺𝐹)‘𝐾) ∈ 𝑆 ∧ (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)) ∈ 𝑆)) → (((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)))))
222220, 221syldan 593 . . . . . . . 8 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + (((𝐺𝐹)‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1)))))
2231, 14fssd 6530 . . . . . . . . . . . . . . . 16 (𝜑𝐺:(𝑀...(𝑁 + 1))⟶𝑆)
224 fssres 6546 . . . . . . . . . . . . . . . 16 ((𝐺:(𝑀...(𝑁 + 1))⟶𝑆 ∧ (𝑀...𝑁) ⊆ (𝑀...(𝑁 + 1))) → (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝑆)
225223, 3, 224sylancl 588 . . . . . . . . . . . . . . 15 (𝜑 → (𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝑆)
226 fco 6533 . . . . . . . . . . . . . . 15 (((𝐺 ↾ (𝑀...𝑁)):(𝑀...𝑁)⟶𝑆𝐽:(𝑀...𝑁)⟶(𝑀...𝑁)) → ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽):(𝑀...𝑁)⟶𝑆)
227225, 20, 226syl2anc 586 . . . . . . . . . . . . . 14 (𝜑 → ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽):(𝑀...𝑁)⟶𝑆)
228227ffvelrnda 6853 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
229179, 228syldan 593 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝑀...(𝐾 − 1))) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
230229adantlr 713 . . . . . . . . . . 11 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ 𝑥 ∈ (𝑀...(𝐾 − 1))) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
231158, 230, 211seqcl 13393 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) ∈ 𝑆)
232 elfzuz3 12908 . . . . . . . . . . . 12 (𝐾 ∈ ((𝑀 + 1)...𝑁) → 𝑁 ∈ (ℤ𝐾))
233232adantl 484 . . . . . . . . . . 11 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → 𝑁 ∈ (ℤ𝐾))
234100, 228syldan 593 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ (𝐾...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
235234adantlr 713 . . . . . . . . . . 11 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ 𝑥 ∈ (𝐾...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
236233, 235, 211seqcl 13393 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) ∈ 𝑆)
237223, 75ffvelrnd 6854 . . . . . . . . . . 11 (𝜑 → (𝐺‘(𝑁 + 1)) ∈ 𝑆)
238237adantr 483 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (𝐺‘(𝑁 + 1)) ∈ 𝑆)
239231, 236, 2383jca 1124 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) ∈ 𝑆 ∧ (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) ∈ 𝑆 ∧ (𝐺‘(𝑁 + 1)) ∈ 𝑆))
24012caovassg 7348 . . . . . . . . 9 ((𝜑 ∧ ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) ∈ 𝑆 ∧ (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) ∈ 𝑆 ∧ (𝐺‘(𝑁 + 1)) ∈ 𝑆)) → (((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)) + (𝐺‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1)))))
241239, 240syldan 593 . . . . . . . 8 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)) + (𝐺‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + ((seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1)))))
242208, 222, 2413eqtr4d 2868 . . . . . . 7 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = (((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)) + (𝐺‘(𝑁 + 1))))
243 seqm1 13390 . . . . . . . . 9 ((𝑀 ∈ ℤ ∧ 𝐾 ∈ (ℤ‘(𝑀 + 1))) → (seq𝑀( + , (𝐺𝐹))‘𝐾) = ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)))
244155, 156, 243syl2an 597 . . . . . . . 8 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , (𝐺𝐹))‘𝐾) = ((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)))
245244oveq1d 7173 . . . . . . 7 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = (((seq𝑀( + , (𝐺𝐹))‘(𝐾 − 1)) + ((𝐺𝐹)‘𝐾)) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))))
24612adantlr 713 . . . . . . . . . 10 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ (𝑥𝑆𝑦𝑆𝑧𝑆)) → ((𝑥 + 𝑦) + 𝑧) = (𝑥 + (𝑦 + 𝑧)))
247 elfzelz 12911 . . . . . . . . . . . . . . 15 (𝐾 ∈ ((𝑀 + 1)...𝑁) → 𝐾 ∈ ℤ)
248247adantl 484 . . . . . . . . . . . . . 14 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → 𝐾 ∈ ℤ)
249248zcnd 12091 . . . . . . . . . . . . 13 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → 𝐾 ∈ ℂ)
250249, 162, 170sylancl 588 . . . . . . . . . . . 12 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((𝐾 − 1) + 1) = 𝐾)
251250fveq2d 6676 . . . . . . . . . . 11 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (ℤ‘((𝐾 − 1) + 1)) = (ℤ𝐾))
252233, 251eleqtrrd 2918 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → 𝑁 ∈ (ℤ‘((𝐾 − 1) + 1)))
253228adantlr 713 . . . . . . . . . 10 (((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) ∈ 𝑆)
254211, 246, 252, 158, 253seqsplit 13406 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq((𝐾 − 1) + 1)( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)))
255250seqeq1d 13378 . . . . . . . . . . 11 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → seq((𝐾 − 1) + 1)( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)) = seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)))
256255fveq1d 6674 . . . . . . . . . 10 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq((𝐾 − 1) + 1)( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁))
257256oveq2d 7174 . . . . . . . . 9 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq((𝐾 − 1) + 1)( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)))
258254, 257eqtrd 2858 . . . . . . . 8 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)))
259258oveq1d 7173 . . . . . . 7 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))) = (((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘(𝐾 − 1)) + (seq𝐾( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁)) + (𝐺‘(𝑁 + 1))))
260242, 245, 2593eqtr4d 2868 . . . . . 6 ((𝜑𝐾 ∈ ((𝑀 + 1)...𝑁)) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
261153, 260jaodan 954 . . . . 5 ((𝜑 ∧ (𝐾 = 𝑀𝐾 ∈ ((𝑀 + 1)...𝑁))) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
26266, 261syldan 593 . . . 4 ((𝜑𝐾 ∈ (𝑀...𝑁)) → ((seq𝑀( + , (𝐺𝐹))‘𝐾) + (seq(𝐾 + 1)( + , (𝐺𝐹))‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
26363, 262eqtrd 2858 . . 3 ((𝜑𝐾 ∈ (𝑀...𝑁)) → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
26413adantr 483 . . . . 5 ((𝜑𝐾 = (𝑁 + 1)) → 𝑁 ∈ (ℤ𝑀))
265 seqp1 13387 . . . . 5 (𝑁 ∈ (ℤ𝑀) → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , (𝐺𝐹))‘𝑁) + ((𝐺𝐹)‘(𝑁 + 1))))
266264, 265syl 17 . . . 4 ((𝜑𝐾 = (𝑁 + 1)) → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , (𝐺𝐹))‘𝑁) + ((𝐺𝐹)‘(𝑁 + 1))))
267110adantl 484 . . . . . . . . . 10 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐽𝑥) = (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))))
268 elfzelz 12911 . . . . . . . . . . . . . . . 16 (𝑥 ∈ (𝑀...𝑁) → 𝑥 ∈ ℤ)
269268zred 12090 . . . . . . . . . . . . . . 15 (𝑥 ∈ (𝑀...𝑁) → 𝑥 ∈ ℝ)
270269adantl 484 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → 𝑥 ∈ ℝ)
271160zred 12090 . . . . . . . . . . . . . . 15 (𝜑𝑁 ∈ ℝ)
272271adantr 483 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → 𝑁 ∈ ℝ)
273 peano2re 10815 . . . . . . . . . . . . . . 15 (𝑁 ∈ ℝ → (𝑁 + 1) ∈ ℝ)
274272, 273syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → (𝑁 + 1) ∈ ℝ)
275 elfzle2 12914 . . . . . . . . . . . . . . 15 (𝑥 ∈ (𝑀...𝑁) → 𝑥𝑁)
276275adantl 484 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → 𝑥𝑁)
277272ltp1d 11572 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝑀...𝑁)) → 𝑁 < (𝑁 + 1))
278270, 272, 274, 276, 277lelttrd 10800 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝑀...𝑁)) → 𝑥 < (𝑁 + 1))
279278adantlr 713 . . . . . . . . . . . 12 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 < (𝑁 + 1))
280 simplr 767 . . . . . . . . . . . 12 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝐾 = (𝑁 + 1))
281279, 280breqtrrd 5096 . . . . . . . . . . 11 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 < 𝐾)
282281, 188syl 17 . . . . . . . . . 10 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘if(𝑥 < 𝐾, 𝑥, (𝑥 + 1))) = (𝐹𝑥))
283267, 282eqtrd 2858 . . . . . . . . 9 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐽𝑥) = (𝐹𝑥))
284283fveq2d 6676 . . . . . . . 8 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐹𝑥)))
285269adantl 484 . . . . . . . . . . 11 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 ∈ ℝ)
286285, 281gtned 10777 . . . . . . . . . 10 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝐾𝑥)
28757ad2antrr 724 . . . . . . . . . . . . . . 15 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)))
288 fzelp1 12962 . . . . . . . . . . . . . . . 16 (𝑥 ∈ (𝑀...𝑁) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
289288adantl 484 . . . . . . . . . . . . . . 15 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑥 ∈ (𝑀...(𝑁 + 1)))
290287, 289ffvelrnd 6854 . . . . . . . . . . . . . 14 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹𝑥) ∈ (𝑀...(𝑁 + 1)))
29113ad2antrr 724 . . . . . . . . . . . . . . 15 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑁 ∈ (ℤ𝑀))
292 elfzp1 12960 . . . . . . . . . . . . . . 15 (𝑁 ∈ (ℤ𝑀) → ((𝐹𝑥) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹𝑥) ∈ (𝑀...𝑁) ∨ (𝐹𝑥) = (𝑁 + 1))))
293291, 292syl 17 . . . . . . . . . . . . . 14 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹𝑥) ∈ (𝑀...(𝑁 + 1)) ↔ ((𝐹𝑥) ∈ (𝑀...𝑁) ∨ (𝐹𝑥) = (𝑁 + 1))))
294290, 293mpbid 234 . . . . . . . . . . . . 13 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹𝑥) ∈ (𝑀...𝑁) ∨ (𝐹𝑥) = (𝑁 + 1)))
295294ord 860 . . . . . . . . . . . 12 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (¬ (𝐹𝑥) ∈ (𝑀...𝑁) → (𝐹𝑥) = (𝑁 + 1)))
29615ad2antrr 724 . . . . . . . . . . . . . 14 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)))
297 f1ocnvfv 7037 . . . . . . . . . . . . . 14 ((𝐹:(𝑀...(𝑁 + 1))–1-1-onto→(𝑀...(𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...(𝑁 + 1))) → ((𝐹𝑥) = (𝑁 + 1) → (𝐹‘(𝑁 + 1)) = 𝑥))
298296, 289, 297syl2anc 586 . . . . . . . . . . . . 13 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹𝑥) = (𝑁 + 1) → (𝐹‘(𝑁 + 1)) = 𝑥))
29917eqeq1i 2828 . . . . . . . . . . . . 13 (𝐾 = 𝑥 ↔ (𝐹‘(𝑁 + 1)) = 𝑥)
300298, 299syl6ibr 254 . . . . . . . . . . . 12 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹𝑥) = (𝑁 + 1) → 𝐾 = 𝑥))
301295, 300syld 47 . . . . . . . . . . 11 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (¬ (𝐹𝑥) ∈ (𝑀...𝑁) → 𝐾 = 𝑥))
302301necon1ad 3035 . . . . . . . . . 10 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐾𝑥 → (𝐹𝑥) ∈ (𝑀...𝑁)))
303286, 302mpd 15 . . . . . . . . 9 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹𝑥) ∈ (𝑀...𝑁))
304303fvresd 6692 . . . . . . . 8 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐺 ↾ (𝑀...𝑁))‘(𝐹𝑥)) = (𝐺‘(𝐹𝑥)))
305284, 304eqtr2d 2859 . . . . . . 7 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐺‘(𝐹𝑥)) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
30657, 288, 197syl2an 597 . . . . . . . 8 ((𝜑𝑥 ∈ (𝑀...𝑁)) → ((𝐺𝐹)‘𝑥) = (𝐺‘(𝐹𝑥)))
307306adantlr 713 . . . . . . 7 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐺𝐹)‘𝑥) = (𝐺‘(𝐹𝑥)))
308128adantlr 713 . . . . . . 7 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥) = ((𝐺 ↾ (𝑀...𝑁))‘(𝐽𝑥)))
309305, 307, 3083eqtr4d 2868 . . . . . 6 (((𝜑𝐾 = (𝑁 + 1)) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐺𝐹)‘𝑥) = (((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽)‘𝑥))
310264, 309seqfveq 13397 . . . . 5 ((𝜑𝐾 = (𝑁 + 1)) → (seq𝑀( + , (𝐺𝐹))‘𝑁) = (seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁))
311 fvco3 6762 . . . . . . . 8 ((𝐹:(𝑀...(𝑁 + 1))⟶(𝑀...(𝑁 + 1)) ∧ (𝑁 + 1) ∈ (𝑀...(𝑁 + 1))) → ((𝐺𝐹)‘(𝑁 + 1)) = (𝐺‘(𝐹‘(𝑁 + 1))))
31257, 75, 311syl2anc 586 . . . . . . 7 (𝜑 → ((𝐺𝐹)‘(𝑁 + 1)) = (𝐺‘(𝐹‘(𝑁 + 1))))
313312adantr 483 . . . . . 6 ((𝜑𝐾 = (𝑁 + 1)) → ((𝐺𝐹)‘(𝑁 + 1)) = (𝐺‘(𝐹‘(𝑁 + 1))))
314 simpr 487 . . . . . . . . . 10 ((𝜑𝐾 = (𝑁 + 1)) → 𝐾 = (𝑁 + 1))
31517, 314syl5eqr 2872 . . . . . . . . 9 ((𝜑𝐾 = (𝑁 + 1)) → (𝐹‘(𝑁 + 1)) = (𝑁 + 1))
316315fveq2d 6676 . . . . . . . 8 ((𝜑𝐾 = (𝑁 + 1)) → (𝐹‘(𝐹‘(𝑁 + 1))) = (𝐹‘(𝑁 + 1)))
317142adantr 483 . . . . . . . 8 ((𝜑𝐾 = (𝑁 + 1)) → (𝐹‘(𝐹‘(𝑁 + 1))) = (𝑁 + 1))
318316, 317eqtr3d 2860 . . . . . . 7 ((𝜑𝐾 = (𝑁 + 1)) → (𝐹‘(𝑁 + 1)) = (𝑁 + 1))
319318fveq2d 6676 . . . . . 6 ((𝜑𝐾 = (𝑁 + 1)) → (𝐺‘(𝐹‘(𝑁 + 1))) = (𝐺‘(𝑁 + 1)))
320313, 319eqtrd 2858 . . . . 5 ((𝜑𝐾 = (𝑁 + 1)) → ((𝐺𝐹)‘(𝑁 + 1)) = (𝐺‘(𝑁 + 1)))
321310, 320oveq12d 7176 . . . 4 ((𝜑𝐾 = (𝑁 + 1)) → ((seq𝑀( + , (𝐺𝐹))‘𝑁) + ((𝐺𝐹)‘(𝑁 + 1))) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
322266, 321eqtrd 2858 . . 3 ((𝜑𝐾 = (𝑁 + 1)) → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
323 elfzp1 12960 . . . . 5 (𝑁 ∈ (ℤ𝑀) → (𝐾 ∈ (𝑀...(𝑁 + 1)) ↔ (𝐾 ∈ (𝑀...𝑁) ∨ 𝐾 = (𝑁 + 1))))
32413, 323syl 17 . . . 4 (𝜑 → (𝐾 ∈ (𝑀...(𝑁 + 1)) ↔ (𝐾 ∈ (𝑀...𝑁) ∨ 𝐾 = (𝑁 + 1))))
32577, 324mpbid 234 . . 3 (𝜑 → (𝐾 ∈ (𝑀...𝑁) ∨ 𝐾 = (𝑁 + 1)))
326263, 322, 325mpjaodan 955 . 2 (𝜑 → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = ((seq𝑀( + , ((𝐺 ↾ (𝑀...𝑁)) ∘ 𝐽))‘𝑁) + (𝐺‘(𝑁 + 1))))
327 seqp1 13387 . . 3 (𝑁 ∈ (ℤ𝑀) → (seq𝑀( + , 𝐺)‘(𝑁 + 1)) = ((seq𝑀( + , 𝐺)‘𝑁) + (𝐺‘(𝑁 + 1))))
32813, 327syl 17 . 2 (𝜑 → (seq𝑀( + , 𝐺)‘(𝑁 + 1)) = ((seq𝑀( + , 𝐺)‘𝑁) + (𝐺‘(𝑁 + 1))))
32947, 326, 3283eqtr4d 2868 1 (𝜑 → (seq𝑀( + , (𝐺𝐹))‘(𝑁 + 1)) = (seq𝑀( + , 𝐺)‘(𝑁 + 1)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398  wo 843  w3a 1083  wal 1535   = wceq 1537  wcel 2114  wne 3018  Vcvv 3496  wss 3938  ifcif 4469   class class class wbr 5068  cmpt 5148  ccnv 5556  cres 5559  ccom 5561   Fn wfn 6352  wf 6353  1-1-ontowf1o 6356  cfv 6357  (class class class)co 7158  Fincfn 8511  cc 10537  cr 10538  1c1 10540   + caddc 10542   < clt 10677  cle 10678  cmin 10872  cz 11984  cuz 12246  ...cfz 12895  seqcseq 13372
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2795  ax-sep 5205  ax-nul 5212  ax-pow 5268  ax-pr 5332  ax-un 7463  ax-cnex 10595  ax-resscn 10596  ax-1cn 10597  ax-icn 10598  ax-addcl 10599  ax-addrcl 10600  ax-mulcl 10601  ax-mulrcl 10602  ax-mulcom 10603  ax-addass 10604  ax-mulass 10605  ax-distr 10606  ax-i2m1 10607  ax-1ne0 10608  ax-1rid 10609  ax-rnegex 10610  ax-rrecex 10611  ax-cnre 10612  ax-pre-lttri 10613  ax-pre-lttrn 10614  ax-pre-ltadd 10615  ax-pre-mulgt0 10616
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2802  df-cleq 2816  df-clel 2895  df-nfc 2965  df-ne 3019  df-nel 3126  df-ral 3145  df-rex 3146  df-reu 3147  df-rab 3149  df-v 3498  df-sbc 3775  df-csb 3886  df-dif 3941  df-un 3943  df-in 3945  df-ss 3954  df-pss 3956  df-nul 4294  df-if 4470  df-pw 4543  df-sn 4570  df-pr 4572  df-tp 4574  df-op 4576  df-uni 4841  df-int 4879  df-iun 4923  df-br 5069  df-opab 5131  df-mpt 5149  df-tr 5175  df-id 5462  df-eprel 5467  df-po 5476  df-so 5477  df-fr 5516  df-we 5518  df-xp 5563  df-rel 5564  df-cnv 5565  df-co 5566  df-dm 5567  df-rn 5568  df-res 5569  df-ima 5570  df-pred 6150  df-ord 6196  df-on 6197  df-lim 6198  df-suc 6199  df-iota 6316  df-fun 6359  df-fn 6360  df-f 6361  df-f1 6362  df-fo 6363  df-f1o 6364  df-fv 6365  df-riota 7116  df-ov 7161  df-oprab 7162  df-mpo 7163  df-om 7583  df-1st 7691  df-2nd 7692  df-wrecs 7949  df-recs 8010  df-rdg 8048  df-1o 8104  df-oadd 8108  df-er 8291  df-en 8512  df-dom 8513  df-sdom 8514  df-fin 8515  df-pnf 10679  df-mnf 10680  df-xr 10681  df-ltxr 10682  df-le 10683  df-sub 10874  df-neg 10875  df-nn 11641  df-n0 11901  df-z 11985  df-uz 12247  df-fz 12896  df-fzo 13037  df-seq 13373
This theorem is referenced by:  seqf1o  13414
  Copyright terms: Public domain W3C validator