| Step | Hyp | Ref | Expression | 
|---|
| 1 |  | seqfveq2.3 | . . 3
⊢ (𝜑 → 𝑁 ∈ (ℤ≥‘𝐾)) | 
| 2 |  | eluzfz2 13573 | . . 3
⊢ (𝑁 ∈
(ℤ≥‘𝐾) → 𝑁 ∈ (𝐾...𝑁)) | 
| 3 | 1, 2 | syl 17 | . 2
⊢ (𝜑 → 𝑁 ∈ (𝐾...𝑁)) | 
| 4 |  | eleq1 2828 | . . . . . 6
⊢ (𝑥 = 𝐾 → (𝑥 ∈ (𝐾...𝑁) ↔ 𝐾 ∈ (𝐾...𝑁))) | 
| 5 |  | fveq2 6905 | . . . . . . 7
⊢ (𝑥 = 𝐾 → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝑀( + , 𝐹)‘𝐾)) | 
| 6 |  | fveq2 6905 | . . . . . . 7
⊢ (𝑥 = 𝐾 → (seq𝐾( + , 𝐺)‘𝑥) = (seq𝐾( + , 𝐺)‘𝐾)) | 
| 7 | 5, 6 | eqeq12d 2752 | . . . . . 6
⊢ (𝑥 = 𝐾 → ((seq𝑀( + , 𝐹)‘𝑥) = (seq𝐾( + , 𝐺)‘𝑥) ↔ (seq𝑀( + , 𝐹)‘𝐾) = (seq𝐾( + , 𝐺)‘𝐾))) | 
| 8 | 4, 7 | imbi12d 344 | . . . . 5
⊢ (𝑥 = 𝐾 → ((𝑥 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝐾( + , 𝐺)‘𝑥)) ↔ (𝐾 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝐾) = (seq𝐾( + , 𝐺)‘𝐾)))) | 
| 9 | 8 | imbi2d 340 | . . . 4
⊢ (𝑥 = 𝐾 → ((𝜑 → (𝑥 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝐾( + , 𝐺)‘𝑥))) ↔ (𝜑 → (𝐾 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝐾) = (seq𝐾( + , 𝐺)‘𝐾))))) | 
| 10 |  | eleq1 2828 | . . . . . 6
⊢ (𝑥 = 𝑛 → (𝑥 ∈ (𝐾...𝑁) ↔ 𝑛 ∈ (𝐾...𝑁))) | 
| 11 |  | fveq2 6905 | . . . . . . 7
⊢ (𝑥 = 𝑛 → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝑀( + , 𝐹)‘𝑛)) | 
| 12 |  | fveq2 6905 | . . . . . . 7
⊢ (𝑥 = 𝑛 → (seq𝐾( + , 𝐺)‘𝑥) = (seq𝐾( + , 𝐺)‘𝑛)) | 
| 13 | 11, 12 | eqeq12d 2752 | . . . . . 6
⊢ (𝑥 = 𝑛 → ((seq𝑀( + , 𝐹)‘𝑥) = (seq𝐾( + , 𝐺)‘𝑥) ↔ (seq𝑀( + , 𝐹)‘𝑛) = (seq𝐾( + , 𝐺)‘𝑛))) | 
| 14 | 10, 13 | imbi12d 344 | . . . . 5
⊢ (𝑥 = 𝑛 → ((𝑥 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝐾( + , 𝐺)‘𝑥)) ↔ (𝑛 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑛) = (seq𝐾( + , 𝐺)‘𝑛)))) | 
| 15 | 14 | imbi2d 340 | . . . 4
⊢ (𝑥 = 𝑛 → ((𝜑 → (𝑥 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝐾( + , 𝐺)‘𝑥))) ↔ (𝜑 → (𝑛 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑛) = (seq𝐾( + , 𝐺)‘𝑛))))) | 
| 16 |  | eleq1 2828 | . . . . . 6
⊢ (𝑥 = (𝑛 + 1) → (𝑥 ∈ (𝐾...𝑁) ↔ (𝑛 + 1) ∈ (𝐾...𝑁))) | 
| 17 |  | fveq2 6905 | . . . . . . 7
⊢ (𝑥 = (𝑛 + 1) → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝑀( + , 𝐹)‘(𝑛 + 1))) | 
| 18 |  | fveq2 6905 | . . . . . . 7
⊢ (𝑥 = (𝑛 + 1) → (seq𝐾( + , 𝐺)‘𝑥) = (seq𝐾( + , 𝐺)‘(𝑛 + 1))) | 
| 19 | 17, 18 | eqeq12d 2752 | . . . . . 6
⊢ (𝑥 = (𝑛 + 1) → ((seq𝑀( + , 𝐹)‘𝑥) = (seq𝐾( + , 𝐺)‘𝑥) ↔ (seq𝑀( + , 𝐹)‘(𝑛 + 1)) = (seq𝐾( + , 𝐺)‘(𝑛 + 1)))) | 
| 20 | 16, 19 | imbi12d 344 | . . . . 5
⊢ (𝑥 = (𝑛 + 1) → ((𝑥 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝐾( + , 𝐺)‘𝑥)) ↔ ((𝑛 + 1) ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘(𝑛 + 1)) = (seq𝐾( + , 𝐺)‘(𝑛 + 1))))) | 
| 21 | 20 | imbi2d 340 | . . . 4
⊢ (𝑥 = (𝑛 + 1) → ((𝜑 → (𝑥 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝐾( + , 𝐺)‘𝑥))) ↔ (𝜑 → ((𝑛 + 1) ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘(𝑛 + 1)) = (seq𝐾( + , 𝐺)‘(𝑛 + 1)))))) | 
| 22 |  | eleq1 2828 | . . . . . 6
⊢ (𝑥 = 𝑁 → (𝑥 ∈ (𝐾...𝑁) ↔ 𝑁 ∈ (𝐾...𝑁))) | 
| 23 |  | fveq2 6905 | . . . . . . 7
⊢ (𝑥 = 𝑁 → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝑀( + , 𝐹)‘𝑁)) | 
| 24 |  | fveq2 6905 | . . . . . . 7
⊢ (𝑥 = 𝑁 → (seq𝐾( + , 𝐺)‘𝑥) = (seq𝐾( + , 𝐺)‘𝑁)) | 
| 25 | 23, 24 | eqeq12d 2752 | . . . . . 6
⊢ (𝑥 = 𝑁 → ((seq𝑀( + , 𝐹)‘𝑥) = (seq𝐾( + , 𝐺)‘𝑥) ↔ (seq𝑀( + , 𝐹)‘𝑁) = (seq𝐾( + , 𝐺)‘𝑁))) | 
| 26 | 22, 25 | imbi12d 344 | . . . . 5
⊢ (𝑥 = 𝑁 → ((𝑥 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝐾( + , 𝐺)‘𝑥)) ↔ (𝑁 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑁) = (seq𝐾( + , 𝐺)‘𝑁)))) | 
| 27 | 26 | imbi2d 340 | . . . 4
⊢ (𝑥 = 𝑁 → ((𝜑 → (𝑥 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑥) = (seq𝐾( + , 𝐺)‘𝑥))) ↔ (𝜑 → (𝑁 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑁) = (seq𝐾( + , 𝐺)‘𝑁))))) | 
| 28 |  | seqfveq2.2 | . . . . . 6
⊢ (𝜑 → (seq𝑀( + , 𝐹)‘𝐾) = (𝐺‘𝐾)) | 
| 29 |  | seqfveq2.1 | . . . . . . 7
⊢ (𝜑 → 𝐾 ∈ (ℤ≥‘𝑀)) | 
| 30 |  | eluzelz 12889 | . . . . . . 7
⊢ (𝐾 ∈
(ℤ≥‘𝑀) → 𝐾 ∈ ℤ) | 
| 31 |  | seq1 14056 | . . . . . . 7
⊢ (𝐾 ∈ ℤ → (seq𝐾( + , 𝐺)‘𝐾) = (𝐺‘𝐾)) | 
| 32 | 29, 30, 31 | 3syl 18 | . . . . . 6
⊢ (𝜑 → (seq𝐾( + , 𝐺)‘𝐾) = (𝐺‘𝐾)) | 
| 33 | 28, 32 | eqtr4d 2779 | . . . . 5
⊢ (𝜑 → (seq𝑀( + , 𝐹)‘𝐾) = (seq𝐾( + , 𝐺)‘𝐾)) | 
| 34 | 33 | a1d 25 | . . . 4
⊢ (𝜑 → (𝐾 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝐾) = (seq𝐾( + , 𝐺)‘𝐾))) | 
| 35 |  | peano2fzr 13578 | . . . . . . . 8
⊢ ((𝑛 ∈
(ℤ≥‘𝐾) ∧ (𝑛 + 1) ∈ (𝐾...𝑁)) → 𝑛 ∈ (𝐾...𝑁)) | 
| 36 | 35 | adantl 481 | . . . . . . 7
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝐾) ∧ (𝑛 + 1) ∈ (𝐾...𝑁))) → 𝑛 ∈ (𝐾...𝑁)) | 
| 37 | 36 | expr 456 | . . . . . 6
⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘𝐾)) → ((𝑛 + 1) ∈ (𝐾...𝑁) → 𝑛 ∈ (𝐾...𝑁))) | 
| 38 | 37 | imim1d 82 | . . . . 5
⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘𝐾)) → ((𝑛 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑛) = (seq𝐾( + , 𝐺)‘𝑛)) → ((𝑛 + 1) ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑛) = (seq𝐾( + , 𝐺)‘𝑛)))) | 
| 39 |  | oveq1 7439 | . . . . . 6
⊢
((seq𝑀( + , 𝐹)‘𝑛) = (seq𝐾( + , 𝐺)‘𝑛) → ((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1))) = ((seq𝐾( + , 𝐺)‘𝑛) + (𝐹‘(𝑛 + 1)))) | 
| 40 |  | simpl 482 | . . . . . . . . 9
⊢ ((𝑛 ∈
(ℤ≥‘𝐾) ∧ (𝑛 + 1) ∈ (𝐾...𝑁)) → 𝑛 ∈ (ℤ≥‘𝐾)) | 
| 41 |  | uztrn 12897 | . . . . . . . . 9
⊢ ((𝑛 ∈
(ℤ≥‘𝐾) ∧ 𝐾 ∈ (ℤ≥‘𝑀)) → 𝑛 ∈ (ℤ≥‘𝑀)) | 
| 42 | 40, 29, 41 | syl2anr 597 | . . . . . . . 8
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝐾) ∧ (𝑛 + 1) ∈ (𝐾...𝑁))) → 𝑛 ∈ (ℤ≥‘𝑀)) | 
| 43 |  | seqp1 14058 | . . . . . . . 8
⊢ (𝑛 ∈
(ℤ≥‘𝑀) → (seq𝑀( + , 𝐹)‘(𝑛 + 1)) = ((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1)))) | 
| 44 | 42, 43 | syl 17 | . . . . . . 7
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝐾) ∧ (𝑛 + 1) ∈ (𝐾...𝑁))) → (seq𝑀( + , 𝐹)‘(𝑛 + 1)) = ((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1)))) | 
| 45 |  | seqp1 14058 | . . . . . . . . 9
⊢ (𝑛 ∈
(ℤ≥‘𝐾) → (seq𝐾( + , 𝐺)‘(𝑛 + 1)) = ((seq𝐾( + , 𝐺)‘𝑛) + (𝐺‘(𝑛 + 1)))) | 
| 46 | 45 | ad2antrl 728 | . . . . . . . 8
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝐾) ∧ (𝑛 + 1) ∈ (𝐾...𝑁))) → (seq𝐾( + , 𝐺)‘(𝑛 + 1)) = ((seq𝐾( + , 𝐺)‘𝑛) + (𝐺‘(𝑛 + 1)))) | 
| 47 |  | fveq2 6905 | . . . . . . . . . . 11
⊢ (𝑘 = (𝑛 + 1) → (𝐹‘𝑘) = (𝐹‘(𝑛 + 1))) | 
| 48 |  | fveq2 6905 | . . . . . . . . . . 11
⊢ (𝑘 = (𝑛 + 1) → (𝐺‘𝑘) = (𝐺‘(𝑛 + 1))) | 
| 49 | 47, 48 | eqeq12d 2752 | . . . . . . . . . 10
⊢ (𝑘 = (𝑛 + 1) → ((𝐹‘𝑘) = (𝐺‘𝑘) ↔ (𝐹‘(𝑛 + 1)) = (𝐺‘(𝑛 + 1)))) | 
| 50 |  | seqfveq2.4 | . . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑘 ∈ ((𝐾 + 1)...𝑁)) → (𝐹‘𝑘) = (𝐺‘𝑘)) | 
| 51 | 50 | ralrimiva 3145 | . . . . . . . . . . 11
⊢ (𝜑 → ∀𝑘 ∈ ((𝐾 + 1)...𝑁)(𝐹‘𝑘) = (𝐺‘𝑘)) | 
| 52 | 51 | adantr 480 | . . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝐾) ∧ (𝑛 + 1) ∈ (𝐾...𝑁))) → ∀𝑘 ∈ ((𝐾 + 1)...𝑁)(𝐹‘𝑘) = (𝐺‘𝑘)) | 
| 53 |  | eluzp1p1 12907 | . . . . . . . . . . . 12
⊢ (𝑛 ∈
(ℤ≥‘𝐾) → (𝑛 + 1) ∈
(ℤ≥‘(𝐾 + 1))) | 
| 54 | 53 | ad2antrl 728 | . . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝐾) ∧ (𝑛 + 1) ∈ (𝐾...𝑁))) → (𝑛 + 1) ∈
(ℤ≥‘(𝐾 + 1))) | 
| 55 |  | elfzuz3 13562 | . . . . . . . . . . . 12
⊢ ((𝑛 + 1) ∈ (𝐾...𝑁) → 𝑁 ∈ (ℤ≥‘(𝑛 + 1))) | 
| 56 | 55 | ad2antll 729 | . . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝐾) ∧ (𝑛 + 1) ∈ (𝐾...𝑁))) → 𝑁 ∈ (ℤ≥‘(𝑛 + 1))) | 
| 57 |  | elfzuzb 13559 | . . . . . . . . . . 11
⊢ ((𝑛 + 1) ∈ ((𝐾 + 1)...𝑁) ↔ ((𝑛 + 1) ∈
(ℤ≥‘(𝐾 + 1)) ∧ 𝑁 ∈ (ℤ≥‘(𝑛 + 1)))) | 
| 58 | 54, 56, 57 | sylanbrc 583 | . . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝐾) ∧ (𝑛 + 1) ∈ (𝐾...𝑁))) → (𝑛 + 1) ∈ ((𝐾 + 1)...𝑁)) | 
| 59 | 49, 52, 58 | rspcdva 3622 | . . . . . . . . 9
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝐾) ∧ (𝑛 + 1) ∈ (𝐾...𝑁))) → (𝐹‘(𝑛 + 1)) = (𝐺‘(𝑛 + 1))) | 
| 60 | 59 | oveq2d 7448 | . . . . . . . 8
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝐾) ∧ (𝑛 + 1) ∈ (𝐾...𝑁))) → ((seq𝐾( + , 𝐺)‘𝑛) + (𝐹‘(𝑛 + 1))) = ((seq𝐾( + , 𝐺)‘𝑛) + (𝐺‘(𝑛 + 1)))) | 
| 61 | 46, 60 | eqtr4d 2779 | . . . . . . 7
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝐾) ∧ (𝑛 + 1) ∈ (𝐾...𝑁))) → (seq𝐾( + , 𝐺)‘(𝑛 + 1)) = ((seq𝐾( + , 𝐺)‘𝑛) + (𝐹‘(𝑛 + 1)))) | 
| 62 | 44, 61 | eqeq12d 2752 | . . . . . 6
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝐾) ∧ (𝑛 + 1) ∈ (𝐾...𝑁))) → ((seq𝑀( + , 𝐹)‘(𝑛 + 1)) = (seq𝐾( + , 𝐺)‘(𝑛 + 1)) ↔ ((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1))) = ((seq𝐾( + , 𝐺)‘𝑛) + (𝐹‘(𝑛 + 1))))) | 
| 63 | 39, 62 | imbitrrid 246 | . . . . 5
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝐾) ∧ (𝑛 + 1) ∈ (𝐾...𝑁))) → ((seq𝑀( + , 𝐹)‘𝑛) = (seq𝐾( + , 𝐺)‘𝑛) → (seq𝑀( + , 𝐹)‘(𝑛 + 1)) = (seq𝐾( + , 𝐺)‘(𝑛 + 1)))) | 
| 64 | 38, 63 | animpimp2impd 846 | . . . 4
⊢ (𝑛 ∈
(ℤ≥‘𝐾) → ((𝜑 → (𝑛 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑛) = (seq𝐾( + , 𝐺)‘𝑛))) → (𝜑 → ((𝑛 + 1) ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘(𝑛 + 1)) = (seq𝐾( + , 𝐺)‘(𝑛 + 1)))))) | 
| 65 | 9, 15, 21, 27, 34, 64 | uzind4i 12953 | . . 3
⊢ (𝑁 ∈
(ℤ≥‘𝐾) → (𝜑 → (𝑁 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑁) = (seq𝐾( + , 𝐺)‘𝑁)))) | 
| 66 | 1, 65 | mpcom 38 | . 2
⊢ (𝜑 → (𝑁 ∈ (𝐾...𝑁) → (seq𝑀( + , 𝐹)‘𝑁) = (seq𝐾( + , 𝐺)‘𝑁))) | 
| 67 | 3, 66 | mpd 15 | 1
⊢ (𝜑 → (seq𝑀( + , 𝐹)‘𝑁) = (seq𝐾( + , 𝐺)‘𝑁)) |