Step | Hyp | Ref
| Expression |
1 | | seqhomo.3 |
. . 3
⊢ (𝜑 → 𝑁 ∈ (ℤ≥‘𝑀)) |
2 | | eluzfz2 10088 |
. . 3
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → 𝑁 ∈ (𝑀...𝑁)) |
3 | 1, 2 | syl 14 |
. 2
⊢ (𝜑 → 𝑁 ∈ (𝑀...𝑁)) |
4 | | eleq1 2256 |
. . . . . 6
⊢ (𝑥 = 𝑀 → (𝑥 ∈ (𝑀...𝑁) ↔ 𝑀 ∈ (𝑀...𝑁))) |
5 | | 2fveq3 5551 |
. . . . . . 7
⊢ (𝑥 = 𝑀 → (𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (𝐻‘(seq𝑀( + , 𝐹)‘𝑀))) |
6 | | fveq2 5546 |
. . . . . . 7
⊢ (𝑥 = 𝑀 → (seq𝑀(𝑄, 𝐺)‘𝑥) = (seq𝑀(𝑄, 𝐺)‘𝑀)) |
7 | 5, 6 | eqeq12d 2208 |
. . . . . 6
⊢ (𝑥 = 𝑀 → ((𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (seq𝑀(𝑄, 𝐺)‘𝑥) ↔ (𝐻‘(seq𝑀( + , 𝐹)‘𝑀)) = (seq𝑀(𝑄, 𝐺)‘𝑀))) |
8 | 4, 7 | imbi12d 234 |
. . . . 5
⊢ (𝑥 = 𝑀 → ((𝑥 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (seq𝑀(𝑄, 𝐺)‘𝑥)) ↔ (𝑀 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑀)) = (seq𝑀(𝑄, 𝐺)‘𝑀)))) |
9 | 8 | imbi2d 230 |
. . . 4
⊢ (𝑥 = 𝑀 → ((𝜑 → (𝑥 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (seq𝑀(𝑄, 𝐺)‘𝑥))) ↔ (𝜑 → (𝑀 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑀)) = (seq𝑀(𝑄, 𝐺)‘𝑀))))) |
10 | | eleq1 2256 |
. . . . . 6
⊢ (𝑥 = 𝑛 → (𝑥 ∈ (𝑀...𝑁) ↔ 𝑛 ∈ (𝑀...𝑁))) |
11 | | 2fveq3 5551 |
. . . . . . 7
⊢ (𝑥 = 𝑛 → (𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (𝐻‘(seq𝑀( + , 𝐹)‘𝑛))) |
12 | | fveq2 5546 |
. . . . . . 7
⊢ (𝑥 = 𝑛 → (seq𝑀(𝑄, 𝐺)‘𝑥) = (seq𝑀(𝑄, 𝐺)‘𝑛)) |
13 | 11, 12 | eqeq12d 2208 |
. . . . . 6
⊢ (𝑥 = 𝑛 → ((𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (seq𝑀(𝑄, 𝐺)‘𝑥) ↔ (𝐻‘(seq𝑀( + , 𝐹)‘𝑛)) = (seq𝑀(𝑄, 𝐺)‘𝑛))) |
14 | 10, 13 | imbi12d 234 |
. . . . 5
⊢ (𝑥 = 𝑛 → ((𝑥 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (seq𝑀(𝑄, 𝐺)‘𝑥)) ↔ (𝑛 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑛)) = (seq𝑀(𝑄, 𝐺)‘𝑛)))) |
15 | 14 | imbi2d 230 |
. . . 4
⊢ (𝑥 = 𝑛 → ((𝜑 → (𝑥 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (seq𝑀(𝑄, 𝐺)‘𝑥))) ↔ (𝜑 → (𝑛 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑛)) = (seq𝑀(𝑄, 𝐺)‘𝑛))))) |
16 | | eleq1 2256 |
. . . . . 6
⊢ (𝑥 = (𝑛 + 1) → (𝑥 ∈ (𝑀...𝑁) ↔ (𝑛 + 1) ∈ (𝑀...𝑁))) |
17 | | 2fveq3 5551 |
. . . . . . 7
⊢ (𝑥 = (𝑛 + 1) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (𝐻‘(seq𝑀( + , 𝐹)‘(𝑛 + 1)))) |
18 | | fveq2 5546 |
. . . . . . 7
⊢ (𝑥 = (𝑛 + 1) → (seq𝑀(𝑄, 𝐺)‘𝑥) = (seq𝑀(𝑄, 𝐺)‘(𝑛 + 1))) |
19 | 17, 18 | eqeq12d 2208 |
. . . . . 6
⊢ (𝑥 = (𝑛 + 1) → ((𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (seq𝑀(𝑄, 𝐺)‘𝑥) ↔ (𝐻‘(seq𝑀( + , 𝐹)‘(𝑛 + 1))) = (seq𝑀(𝑄, 𝐺)‘(𝑛 + 1)))) |
20 | 16, 19 | imbi12d 234 |
. . . . 5
⊢ (𝑥 = (𝑛 + 1) → ((𝑥 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (seq𝑀(𝑄, 𝐺)‘𝑥)) ↔ ((𝑛 + 1) ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘(𝑛 + 1))) = (seq𝑀(𝑄, 𝐺)‘(𝑛 + 1))))) |
21 | 20 | imbi2d 230 |
. . . 4
⊢ (𝑥 = (𝑛 + 1) → ((𝜑 → (𝑥 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (seq𝑀(𝑄, 𝐺)‘𝑥))) ↔ (𝜑 → ((𝑛 + 1) ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘(𝑛 + 1))) = (seq𝑀(𝑄, 𝐺)‘(𝑛 + 1)))))) |
22 | | eleq1 2256 |
. . . . . 6
⊢ (𝑥 = 𝑁 → (𝑥 ∈ (𝑀...𝑁) ↔ 𝑁 ∈ (𝑀...𝑁))) |
23 | | 2fveq3 5551 |
. . . . . . 7
⊢ (𝑥 = 𝑁 → (𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (𝐻‘(seq𝑀( + , 𝐹)‘𝑁))) |
24 | | fveq2 5546 |
. . . . . . 7
⊢ (𝑥 = 𝑁 → (seq𝑀(𝑄, 𝐺)‘𝑥) = (seq𝑀(𝑄, 𝐺)‘𝑁)) |
25 | 23, 24 | eqeq12d 2208 |
. . . . . 6
⊢ (𝑥 = 𝑁 → ((𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (seq𝑀(𝑄, 𝐺)‘𝑥) ↔ (𝐻‘(seq𝑀( + , 𝐹)‘𝑁)) = (seq𝑀(𝑄, 𝐺)‘𝑁))) |
26 | 22, 25 | imbi12d 234 |
. . . . 5
⊢ (𝑥 = 𝑁 → ((𝑥 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (seq𝑀(𝑄, 𝐺)‘𝑥)) ↔ (𝑁 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑁)) = (seq𝑀(𝑄, 𝐺)‘𝑁)))) |
27 | 26 | imbi2d 230 |
. . . 4
⊢ (𝑥 = 𝑁 → ((𝜑 → (𝑥 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑥)) = (seq𝑀(𝑄, 𝐺)‘𝑥))) ↔ (𝜑 → (𝑁 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑁)) = (seq𝑀(𝑄, 𝐺)‘𝑁))))) |
28 | | 2fveq3 5551 |
. . . . . . . 8
⊢ (𝑥 = 𝑀 → (𝐻‘(𝐹‘𝑥)) = (𝐻‘(𝐹‘𝑀))) |
29 | | fveq2 5546 |
. . . . . . . 8
⊢ (𝑥 = 𝑀 → (𝐺‘𝑥) = (𝐺‘𝑀)) |
30 | 28, 29 | eqeq12d 2208 |
. . . . . . 7
⊢ (𝑥 = 𝑀 → ((𝐻‘(𝐹‘𝑥)) = (𝐺‘𝑥) ↔ (𝐻‘(𝐹‘𝑀)) = (𝐺‘𝑀))) |
31 | | seqhomo.5 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐻‘(𝐹‘𝑥)) = (𝐺‘𝑥)) |
32 | 31 | ralrimiva 2567 |
. . . . . . 7
⊢ (𝜑 → ∀𝑥 ∈ (𝑀...𝑁)(𝐻‘(𝐹‘𝑥)) = (𝐺‘𝑥)) |
33 | | eluzfz1 10087 |
. . . . . . . 8
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → 𝑀 ∈ (𝑀...𝑁)) |
34 | 1, 33 | syl 14 |
. . . . . . 7
⊢ (𝜑 → 𝑀 ∈ (𝑀...𝑁)) |
35 | 30, 32, 34 | rspcdva 2869 |
. . . . . 6
⊢ (𝜑 → (𝐻‘(𝐹‘𝑀)) = (𝐺‘𝑀)) |
36 | | eluzel2 9587 |
. . . . . . . . 9
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → 𝑀 ∈ ℤ) |
37 | 1, 36 | syl 14 |
. . . . . . . 8
⊢ (𝜑 → 𝑀 ∈ ℤ) |
38 | | seqhomog.f |
. . . . . . . 8
⊢ (𝜑 → 𝐹 ∈ 𝑉) |
39 | | seqhomog.p |
. . . . . . . 8
⊢ (𝜑 → + ∈ 𝑋) |
40 | | seq1g 10524 |
. . . . . . . 8
⊢ ((𝑀 ∈ ℤ ∧ 𝐹 ∈ 𝑉 ∧ + ∈ 𝑋) → (seq𝑀( + , 𝐹)‘𝑀) = (𝐹‘𝑀)) |
41 | 37, 38, 39, 40 | syl3anc 1249 |
. . . . . . 7
⊢ (𝜑 → (seq𝑀( + , 𝐹)‘𝑀) = (𝐹‘𝑀)) |
42 | 41 | fveq2d 5550 |
. . . . . 6
⊢ (𝜑 → (𝐻‘(seq𝑀( + , 𝐹)‘𝑀)) = (𝐻‘(𝐹‘𝑀))) |
43 | | seqhomog.g |
. . . . . . 7
⊢ (𝜑 → 𝐺 ∈ 𝑊) |
44 | | seqhomog.q |
. . . . . . 7
⊢ (𝜑 → 𝑄 ∈ 𝑌) |
45 | | seq1g 10524 |
. . . . . . 7
⊢ ((𝑀 ∈ ℤ ∧ 𝐺 ∈ 𝑊 ∧ 𝑄 ∈ 𝑌) → (seq𝑀(𝑄, 𝐺)‘𝑀) = (𝐺‘𝑀)) |
46 | 37, 43, 44, 45 | syl3anc 1249 |
. . . . . 6
⊢ (𝜑 → (seq𝑀(𝑄, 𝐺)‘𝑀) = (𝐺‘𝑀)) |
47 | 35, 42, 46 | 3eqtr4d 2236 |
. . . . 5
⊢ (𝜑 → (𝐻‘(seq𝑀( + , 𝐹)‘𝑀)) = (seq𝑀(𝑄, 𝐺)‘𝑀)) |
48 | 47 | a1d 22 |
. . . 4
⊢ (𝜑 → (𝑀 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑀)) = (seq𝑀(𝑄, 𝐺)‘𝑀))) |
49 | | peano2fzr 10093 |
. . . . . . . 8
⊢ ((𝑛 ∈
(ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁)) → 𝑛 ∈ (𝑀...𝑁)) |
50 | 49 | adantl 277 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → 𝑛 ∈ (𝑀...𝑁)) |
51 | 50 | expr 375 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘𝑀)) → ((𝑛 + 1) ∈ (𝑀...𝑁) → 𝑛 ∈ (𝑀...𝑁))) |
52 | 51 | imim1d 75 |
. . . . 5
⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘𝑀)) → ((𝑛 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑛)) = (seq𝑀(𝑄, 𝐺)‘𝑛)) → ((𝑛 + 1) ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑛)) = (seq𝑀(𝑄, 𝐺)‘𝑛)))) |
53 | | oveq1 5917 |
. . . . . 6
⊢ ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛)) = (seq𝑀(𝑄, 𝐺)‘𝑛) → ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛))𝑄(𝐺‘(𝑛 + 1))) = ((seq𝑀(𝑄, 𝐺)‘𝑛)𝑄(𝐺‘(𝑛 + 1)))) |
54 | | simprl 529 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → 𝑛 ∈ (ℤ≥‘𝑀)) |
55 | 38 | adantr 276 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → 𝐹 ∈ 𝑉) |
56 | 39 | adantr 276 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → + ∈ 𝑋) |
57 | | seqp1g 10527 |
. . . . . . . . . 10
⊢ ((𝑛 ∈
(ℤ≥‘𝑀) ∧ 𝐹 ∈ 𝑉 ∧ + ∈ 𝑋) → (seq𝑀( + , 𝐹)‘(𝑛 + 1)) = ((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1)))) |
58 | 54, 55, 56, 57 | syl3anc 1249 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (seq𝑀( + , 𝐹)‘(𝑛 + 1)) = ((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1)))) |
59 | 58 | fveq2d 5550 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (𝐻‘(seq𝑀( + , 𝐹)‘(𝑛 + 1))) = (𝐻‘((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1))))) |
60 | | seqhomo.4 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆)) → (𝐻‘(𝑥 + 𝑦)) = ((𝐻‘𝑥)𝑄(𝐻‘𝑦))) |
61 | 60 | ralrimivva 2576 |
. . . . . . . . . 10
⊢ (𝜑 → ∀𝑥 ∈ 𝑆 ∀𝑦 ∈ 𝑆 (𝐻‘(𝑥 + 𝑦)) = ((𝐻‘𝑥)𝑄(𝐻‘𝑦))) |
62 | 61 | adantr 276 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → ∀𝑥 ∈ 𝑆 ∀𝑦 ∈ 𝑆 (𝐻‘(𝑥 + 𝑦)) = ((𝐻‘𝑥)𝑄(𝐻‘𝑦))) |
63 | | elfzuz3 10078 |
. . . . . . . . . . . . . 14
⊢ (𝑛 ∈ (𝑀...𝑁) → 𝑁 ∈ (ℤ≥‘𝑛)) |
64 | | fzss2 10120 |
. . . . . . . . . . . . . 14
⊢ (𝑁 ∈
(ℤ≥‘𝑛) → (𝑀...𝑛) ⊆ (𝑀...𝑁)) |
65 | 50, 63, 64 | 3syl 17 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (𝑀...𝑛) ⊆ (𝑀...𝑁)) |
66 | 65 | sselda 3179 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) ∧ 𝑥 ∈ (𝑀...𝑛)) → 𝑥 ∈ (𝑀...𝑁)) |
67 | | seqhomo.2 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘𝑥) ∈ 𝑆) |
68 | 67 | adantlr 477 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘𝑥) ∈ 𝑆) |
69 | 66, 68 | syldan 282 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) ∧ 𝑥 ∈ (𝑀...𝑛)) → (𝐹‘𝑥) ∈ 𝑆) |
70 | | seqhomo.1 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆)) → (𝑥 + 𝑦) ∈ 𝑆) |
71 | 70 | adantlr 477 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) ∧ (𝑥 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆)) → (𝑥 + 𝑦) ∈ 𝑆) |
72 | 54, 69, 71, 55, 56 | seqclg 10533 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (seq𝑀( + , 𝐹)‘𝑛) ∈ 𝑆) |
73 | | fveq2 5546 |
. . . . . . . . . . . 12
⊢ (𝑥 = (𝑛 + 1) → (𝐹‘𝑥) = (𝐹‘(𝑛 + 1))) |
74 | 73 | eleq1d 2262 |
. . . . . . . . . . 11
⊢ (𝑥 = (𝑛 + 1) → ((𝐹‘𝑥) ∈ 𝑆 ↔ (𝐹‘(𝑛 + 1)) ∈ 𝑆)) |
75 | 67 | ralrimiva 2567 |
. . . . . . . . . . . 12
⊢ (𝜑 → ∀𝑥 ∈ (𝑀...𝑁)(𝐹‘𝑥) ∈ 𝑆) |
76 | 75 | adantr 276 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → ∀𝑥 ∈ (𝑀...𝑁)(𝐹‘𝑥) ∈ 𝑆) |
77 | | simprr 531 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (𝑛 + 1) ∈ (𝑀...𝑁)) |
78 | 74, 76, 77 | rspcdva 2869 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (𝐹‘(𝑛 + 1)) ∈ 𝑆) |
79 | | fvoveq1 5933 |
. . . . . . . . . . . 12
⊢ (𝑥 = (seq𝑀( + , 𝐹)‘𝑛) → (𝐻‘(𝑥 + 𝑦)) = (𝐻‘((seq𝑀( + , 𝐹)‘𝑛) + 𝑦))) |
80 | | fveq2 5546 |
. . . . . . . . . . . . 13
⊢ (𝑥 = (seq𝑀( + , 𝐹)‘𝑛) → (𝐻‘𝑥) = (𝐻‘(seq𝑀( + , 𝐹)‘𝑛))) |
81 | 80 | oveq1d 5925 |
. . . . . . . . . . . 12
⊢ (𝑥 = (seq𝑀( + , 𝐹)‘𝑛) → ((𝐻‘𝑥)𝑄(𝐻‘𝑦)) = ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛))𝑄(𝐻‘𝑦))) |
82 | 79, 81 | eqeq12d 2208 |
. . . . . . . . . . 11
⊢ (𝑥 = (seq𝑀( + , 𝐹)‘𝑛) → ((𝐻‘(𝑥 + 𝑦)) = ((𝐻‘𝑥)𝑄(𝐻‘𝑦)) ↔ (𝐻‘((seq𝑀( + , 𝐹)‘𝑛) + 𝑦)) = ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛))𝑄(𝐻‘𝑦)))) |
83 | | oveq2 5918 |
. . . . . . . . . . . . 13
⊢ (𝑦 = (𝐹‘(𝑛 + 1)) → ((seq𝑀( + , 𝐹)‘𝑛) + 𝑦) = ((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1)))) |
84 | 83 | fveq2d 5550 |
. . . . . . . . . . . 12
⊢ (𝑦 = (𝐹‘(𝑛 + 1)) → (𝐻‘((seq𝑀( + , 𝐹)‘𝑛) + 𝑦)) = (𝐻‘((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1))))) |
85 | | fveq2 5546 |
. . . . . . . . . . . . 13
⊢ (𝑦 = (𝐹‘(𝑛 + 1)) → (𝐻‘𝑦) = (𝐻‘(𝐹‘(𝑛 + 1)))) |
86 | 85 | oveq2d 5926 |
. . . . . . . . . . . 12
⊢ (𝑦 = (𝐹‘(𝑛 + 1)) → ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛))𝑄(𝐻‘𝑦)) = ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛))𝑄(𝐻‘(𝐹‘(𝑛 + 1))))) |
87 | 84, 86 | eqeq12d 2208 |
. . . . . . . . . . 11
⊢ (𝑦 = (𝐹‘(𝑛 + 1)) → ((𝐻‘((seq𝑀( + , 𝐹)‘𝑛) + 𝑦)) = ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛))𝑄(𝐻‘𝑦)) ↔ (𝐻‘((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1)))) = ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛))𝑄(𝐻‘(𝐹‘(𝑛 + 1)))))) |
88 | 82, 87 | rspc2v 2877 |
. . . . . . . . . 10
⊢
(((seq𝑀( + , 𝐹)‘𝑛) ∈ 𝑆 ∧ (𝐹‘(𝑛 + 1)) ∈ 𝑆) → (∀𝑥 ∈ 𝑆 ∀𝑦 ∈ 𝑆 (𝐻‘(𝑥 + 𝑦)) = ((𝐻‘𝑥)𝑄(𝐻‘𝑦)) → (𝐻‘((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1)))) = ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛))𝑄(𝐻‘(𝐹‘(𝑛 + 1)))))) |
89 | 72, 78, 88 | syl2anc 411 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (∀𝑥 ∈ 𝑆 ∀𝑦 ∈ 𝑆 (𝐻‘(𝑥 + 𝑦)) = ((𝐻‘𝑥)𝑄(𝐻‘𝑦)) → (𝐻‘((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1)))) = ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛))𝑄(𝐻‘(𝐹‘(𝑛 + 1)))))) |
90 | 62, 89 | mpd 13 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (𝐻‘((seq𝑀( + , 𝐹)‘𝑛) + (𝐹‘(𝑛 + 1)))) = ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛))𝑄(𝐻‘(𝐹‘(𝑛 + 1))))) |
91 | | 2fveq3 5551 |
. . . . . . . . . . 11
⊢ (𝑥 = (𝑛 + 1) → (𝐻‘(𝐹‘𝑥)) = (𝐻‘(𝐹‘(𝑛 + 1)))) |
92 | | fveq2 5546 |
. . . . . . . . . . 11
⊢ (𝑥 = (𝑛 + 1) → (𝐺‘𝑥) = (𝐺‘(𝑛 + 1))) |
93 | 91, 92 | eqeq12d 2208 |
. . . . . . . . . 10
⊢ (𝑥 = (𝑛 + 1) → ((𝐻‘(𝐹‘𝑥)) = (𝐺‘𝑥) ↔ (𝐻‘(𝐹‘(𝑛 + 1))) = (𝐺‘(𝑛 + 1)))) |
94 | 32 | adantr 276 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → ∀𝑥 ∈ (𝑀...𝑁)(𝐻‘(𝐹‘𝑥)) = (𝐺‘𝑥)) |
95 | 93, 94, 77 | rspcdva 2869 |
. . . . . . . . 9
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (𝐻‘(𝐹‘(𝑛 + 1))) = (𝐺‘(𝑛 + 1))) |
96 | 95 | oveq2d 5926 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛))𝑄(𝐻‘(𝐹‘(𝑛 + 1)))) = ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛))𝑄(𝐺‘(𝑛 + 1)))) |
97 | 59, 90, 96 | 3eqtrd 2230 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (𝐻‘(seq𝑀( + , 𝐹)‘(𝑛 + 1))) = ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛))𝑄(𝐺‘(𝑛 + 1)))) |
98 | 43 | adantr 276 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → 𝐺 ∈ 𝑊) |
99 | 44 | adantr 276 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → 𝑄 ∈ 𝑌) |
100 | | seqp1g 10527 |
. . . . . . . 8
⊢ ((𝑛 ∈
(ℤ≥‘𝑀) ∧ 𝐺 ∈ 𝑊 ∧ 𝑄 ∈ 𝑌) → (seq𝑀(𝑄, 𝐺)‘(𝑛 + 1)) = ((seq𝑀(𝑄, 𝐺)‘𝑛)𝑄(𝐺‘(𝑛 + 1)))) |
101 | 54, 98, 99, 100 | syl3anc 1249 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → (seq𝑀(𝑄, 𝐺)‘(𝑛 + 1)) = ((seq𝑀(𝑄, 𝐺)‘𝑛)𝑄(𝐺‘(𝑛 + 1)))) |
102 | 97, 101 | eqeq12d 2208 |
. . . . . 6
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → ((𝐻‘(seq𝑀( + , 𝐹)‘(𝑛 + 1))) = (seq𝑀(𝑄, 𝐺)‘(𝑛 + 1)) ↔ ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛))𝑄(𝐺‘(𝑛 + 1))) = ((seq𝑀(𝑄, 𝐺)‘𝑛)𝑄(𝐺‘(𝑛 + 1))))) |
103 | 53, 102 | imbitrrid 156 |
. . . . 5
⊢ ((𝜑 ∧ (𝑛 ∈ (ℤ≥‘𝑀) ∧ (𝑛 + 1) ∈ (𝑀...𝑁))) → ((𝐻‘(seq𝑀( + , 𝐹)‘𝑛)) = (seq𝑀(𝑄, 𝐺)‘𝑛) → (𝐻‘(seq𝑀( + , 𝐹)‘(𝑛 + 1))) = (seq𝑀(𝑄, 𝐺)‘(𝑛 + 1)))) |
104 | 52, 103 | animpimp2impd 559 |
. . . 4
⊢ (𝑛 ∈
(ℤ≥‘𝑀) → ((𝜑 → (𝑛 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑛)) = (seq𝑀(𝑄, 𝐺)‘𝑛))) → (𝜑 → ((𝑛 + 1) ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘(𝑛 + 1))) = (seq𝑀(𝑄, 𝐺)‘(𝑛 + 1)))))) |
105 | 9, 15, 21, 27, 48, 104 | uzind4i 9647 |
. . 3
⊢ (𝑁 ∈
(ℤ≥‘𝑀) → (𝜑 → (𝑁 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑁)) = (seq𝑀(𝑄, 𝐺)‘𝑁)))) |
106 | 1, 105 | mpcom 36 |
. 2
⊢ (𝜑 → (𝑁 ∈ (𝑀...𝑁) → (𝐻‘(seq𝑀( + , 𝐹)‘𝑁)) = (seq𝑀(𝑄, 𝐺)‘𝑁))) |
107 | 3, 106 | mpd 13 |
1
⊢ (𝜑 → (𝐻‘(seq𝑀( + , 𝐹)‘𝑁)) = (seq𝑀(𝑄, 𝐺)‘𝑁)) |