Proof of Theorem fsummulc1
| Step | Hyp | Ref
| Expression |
| 1 | | csbopr2g 3974 |
. . . . . 6
⊢ (M
∈ ℤ → [M / k](C
· A) = (C · [M / k]A)) |
| 2 | 1 | adantr 389 |
. . . . 5
⊢ ((M
∈ ℤ ⋀ (C ∈ ℂ
⋀ ∀k ∈ (M...M)A ∈ ℂ)) → [M / k](C
· A) = (C · [M / k]A)) |
| 3 | | fsum1s 6947 |
. . . . . 6
⊢ ((M
∈ ℤ ⋀ ∀k ∈
(M...M)(C ·
A) ∈ ℂ) → Σk ∈ (M...M)(C · A) =
[M / k](C
· A)) |
| 4 | | r19.28av 1747 |
. . . . . . 7
⊢ ((C
∈ ℂ ⋀ ∀k ∈
(M...M)A ∈
ℂ) → ∀k ∈ (M...M)(C ∈ ℂ ⋀ A ∈ ℂ)) |
| 5 | | axmulcl 5245 |
. . . . . . . 8
⊢ ((C
∈ ℂ ⋀ A ∈ ℂ)
→ (C · A) ∈ ℂ) |
| 6 | 5 | r19.20si 1698 |
. . . . . . 7
⊢ (∀k ∈ (M...M)(C ∈ ℂ ⋀ A ∈ ℂ) → ∀k ∈ (M...M)(C · A)
∈ ℂ) |
| 7 | 4, 6 | syl 10 |
. . . . . 6
⊢ ((C
∈ ℂ ⋀ ∀k ∈
(M...M)A ∈
ℂ) → ∀k ∈ (M...M)(C · A)
∈ ℂ) |
| 8 | 3, 7 | sylan2 451 |
. . . . 5
⊢ ((M
∈ ℤ ⋀ (C ∈ ℂ
⋀ ∀k ∈ (M...M)A ∈ ℂ)) → Σk ∈ (M...M)(C · A) =
[M / k](C
· A)) |
| 9 | | fsum1s 6947 |
. . . . . . 7
⊢ ((M
∈ ℤ ⋀ ∀k ∈
(M...M)A ∈
ℂ) → Σk ∈ (M...M)A = [M /
k]A) |
| 10 | 9 | adantrl 394 |
. . . . . 6
⊢ ((M
∈ ℤ ⋀ (C ∈ ℂ
⋀ ∀k ∈ (M...M)A ∈ ℂ)) → Σk ∈ (M...M)A = [M /
k]A) |
| 11 | 10 | opreq2d 3961 |
. . . . 5
⊢ ((M
∈ ℤ ⋀ (C ∈ ℂ
⋀ ∀k ∈ (M...M)A ∈ ℂ)) → (C · Σk ∈ (M...M)A) = (C ·
[M / k]A)) |
| 12 | 2, 8, 11 | 3eqtr4rd 1510 |
. . . 4
⊢ ((M
∈ ℤ ⋀ (C ∈ ℂ
⋀ ∀k ∈ (M...M)A ∈ ℂ)) → (C · Σk ∈ (M...M)A) = Σk
∈ (M...M)(C ·
A)) |
| 13 | 12 | ex 373 |
. . 3
⊢ (M
∈ ℤ → ((C ∈ ℂ
⋀ ∀k ∈ (M...M)A ∈ ℂ) → (C · Σk ∈ (M...M)A) = Σk
∈ (M...M)(C ·
A))) |
| 14 | | fzssp1t 6438 |
. . . . . . . . . 10
⊢ ((M
∈ ℤ ⋀ m ∈ ℤ)
→ (M...m) ⊆ (M...(m +
1))) |
| 15 | | eluzel2 6356 |
. . . . . . . . . 10
⊢ (m
∈ (ℤ≥ ‘M)
→ M ∈ ℤ) |
| 16 | | eluzelz 6355 |
. . . . . . . . . 10
⊢ (m
∈ (ℤ≥ ‘M)
→ m ∈ ℤ) |
| 17 | 14, 15, 16 | sylanc 471 |
. . . . . . . . 9
⊢ (m
∈ (ℤ≥ ‘M)
→ (M...m) ⊆ (M...(m +
1))) |
| 18 | 17 | sseld 2057 |
. . . . . . . 8
⊢ (m
∈ (ℤ≥ ‘M)
→ (k ∈ (M...m) →
k ∈ (M...(m +
1)))) |
| 19 | 18 | imim1d 28 |
. . . . . . 7
⊢ (m
∈ (ℤ≥ ‘M)
→ ((k ∈ (M...(m + 1))
→ A ∈ ℂ) → (k ∈ (M...m) →
A ∈ ℂ))) |
| 20 | 19 | r19.20dv2 1703 |
. . . . . 6
⊢ (m
∈ (ℤ≥ ‘M)
→ (∀k ∈ (M...(m +
1))A ∈ ℂ → ∀k ∈ (M...m)A ∈ ℂ)) |
| 21 | 20 | anim2d 559 |
. . . . 5
⊢ (m
∈ (ℤ≥ ‘M)
→ ((C ∈ ℂ ⋀
∀k ∈ (M...(m +
1))A ∈ ℂ) → (C ∈ ℂ ⋀ ∀k ∈ (M...m)A ∈ ℂ))) |
| 22 | 21 | imim1d 28 |
. . . 4
⊢ (m
∈ (ℤ≥ ‘M)
→ (((C ∈ ℂ ⋀
∀k ∈ (M...m)A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A)) → ((C ∈ ℂ ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A)))) |
| 23 | | axdistr 5251 |
. . . . . . . . 9
⊢ ((C
∈ ℂ ⋀ Σk ∈
(M...m)A ∈
ℂ ⋀ [(m + 1) / k]A
∈ ℂ) → (C ·
(Σk ∈ (M...m)A + [(m +
1) / k]A)) = ((C
· Σk ∈ (M...m)A) + (C ·
[(m + 1) / k]A))) |
| 24 | | simprl 414 |
. . . . . . . . 9
⊢ ((m
∈ (ℤ≥ ‘M)
⋀ (C ∈ ℂ ⋀
∀k ∈ (M...(m +
1))A ∈ ℂ)) → C ∈ ℂ) |
| 25 | 20 | imp 350 |
. . . . . . . . . . 11
⊢ ((m
∈ (ℤ≥ ‘M)
⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ) →
∀k ∈ (M...m)A ∈ ℂ) |
| 26 | | fsumclt 6953 |
. . . . . . . . . . 11
⊢ ((m
∈ (ℤ≥ ‘M)
⋀ ∀k ∈ (M...m)A ∈ ℂ) → Σk ∈ (M...m)A ∈ ℂ) |
| 27 | 25, 26 | syldan 467 |
. . . . . . . . . 10
⊢ ((m
∈ (ℤ≥ ‘M)
⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ) → Σk ∈ (M...m)A ∈ ℂ) |
| 28 | 27 | adantrl 394 |
. . . . . . . . 9
⊢ ((m
∈ (ℤ≥ ‘M)
⋀ (C ∈ ℂ ⋀
∀k ∈ (M...(m +
1))A ∈ ℂ)) →
Σk ∈ (M...m)A ∈ ℂ) |
| 29 | | ra4csbela 2032 |
. . . . . . . . . . 11
⊢ (((m +
1) ∈ (M...(m + 1)) ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ) →
[(m + 1) / k]A
∈ ℂ) |
| 30 | | peano2uz 6379 |
. . . . . . . . . . . 12
⊢ (m
∈ (ℤ≥ ‘M)
→ (m + 1) ∈
(ℤ≥ ‘M)) |
| 31 | | eluzfz2t 6421 |
. . . . . . . . . . . 12
⊢ ((m +
1) ∈ (ℤ≥ ‘M)
→ (m + 1) ∈ (M...(m +
1))) |
| 32 | 30, 31 | syl 10 |
. . . . . . . . . . 11
⊢ (m
∈ (ℤ≥ ‘M)
→ (m + 1) ∈ (M...(m +
1))) |
| 33 | 29, 32 | sylan 448 |
. . . . . . . . . 10
⊢ ((m
∈ (ℤ≥ ‘M)
⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ) →
[(m + 1) / k]A
∈ ℂ) |
| 34 | 33 | adantrl 394 |
. . . . . . . . 9
⊢ ((m
∈ (ℤ≥ ‘M)
⋀ (C ∈ ℂ ⋀
∀k ∈ (M...(m +
1))A ∈ ℂ)) →
[(m + 1) / k]A
∈ ℂ) |
| 35 | 23, 24, 28, 34 | syl3anc 856 |
. . . . . . . 8
⊢ ((m
∈ (ℤ≥ ‘M)
⋀ (C ∈ ℂ ⋀
∀k ∈ (M...(m +
1))A ∈ ℂ)) → (C · (Σk ∈ (M...m)A + [(m +
1) / k]A)) = ((C
· Σk ∈ (M...m)A) + (C ·
[(m + 1) / k]A))) |
| 36 | 35 | adantlr 393 |
. . . . . . 7
⊢ (((m
∈ (ℤ≥ ‘M)
⋀ ((C ∈ ℂ ⋀
∀k ∈ (M...(m +
1))A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A))) ⋀ (C ∈ ℂ ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ)) → (C · (Σk ∈ (M...m)A + [(m +
1) / k]A)) = ((C
· Σk ∈ (M...m)A) + (C ·
[(m + 1) / k]A))) |
| 37 | | id 59 |
. . . . . . . . . 10
⊢ (((C
∈ ℂ ⋀ ∀k ∈
(M...(m
+ 1))A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A)) → ((C ∈ ℂ ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A))) |
| 38 | 37 | imp 350 |
. . . . . . . . 9
⊢ ((((C
∈ ℂ ⋀ ∀k ∈
(M...(m
+ 1))A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A)) ⋀ (C ∈ ℂ ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ)) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A)) |
| 39 | | oprex 3968 |
. . . . . . . . . . . 12
⊢ (m +
1) ∈ V |
| 40 | | csbopr2g 3974 |
. . . . . . . . . . . 12
⊢ ((m +
1) ∈ V → [(m + 1) /
k](C · A) =
(C · [(m + 1) / k]A)) |
| 41 | 39, 40 | ax-mp 7 |
. . . . . . . . . . 11
⊢ [(m + 1) / k](C
· A) = (C · [(m + 1) / k]A) |
| 42 | 41 | eqcomi 1471 |
. . . . . . . . . 10
⊢ (C
· [(m + 1) / k]A) =
[(m + 1) / k](C
· A) |
| 43 | 42 | a1i 8 |
. . . . . . . . 9
⊢ ((((C
∈ ℂ ⋀ ∀k ∈
(M...(m
+ 1))A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A)) ⋀ (C ∈ ℂ ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ)) → (C · [(m + 1) / k]A) =
[(m + 1) / k](C
· A)) |
| 44 | 38, 43 | opreq12d 3963 |
. . . . . . . 8
⊢ ((((C
∈ ℂ ⋀ ∀k ∈
(M...(m
+ 1))A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A)) ⋀ (C ∈ ℂ ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ)) → ((C · Σk ∈ (M...m)A) + (C ·
[(m + 1) / k]A)) =
(Σk ∈ (M...m)(C · A) +
[(m + 1) / k](C
· A))) |
| 45 | 44 | adantll 392 |
. . . . . . 7
⊢ (((m
∈ (ℤ≥ ‘M)
⋀ ((C ∈ ℂ ⋀
∀k ∈ (M...(m +
1))A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A))) ⋀ (C ∈ ℂ ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ)) → ((C · Σk ∈ (M...m)A) + (C ·
[(m + 1) / k]A)) =
(Σk ∈ (M...m)(C · A) +
[(m + 1) / k](C
· A))) |
| 46 | 36, 45 | eqtrd 1499 |
. . . . . 6
⊢ (((m
∈ (ℤ≥ ‘M)
⋀ ((C ∈ ℂ ⋀
∀k ∈ (M...(m +
1))A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A))) ⋀ (C ∈ ℂ ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ)) → (C · (Σk ∈ (M...m)A + [(m +
1) / k]A)) = (Σk
∈ (M...m)(C ·
A) + [(m + 1) / k](C
· A))) |
| 47 | | fsump1s 6951 |
. . . . . . . . 9
⊢ ((m
∈ (ℤ≥ ‘M)
⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ) → Σk ∈ (M...(m +
1))A = (Σk ∈ (M...m)A + [(m +
1) / k]A)) |
| 48 | 47 | adantrl 394 |
. . . . . . . 8
⊢ ((m
∈ (ℤ≥ ‘M)
⋀ (C ∈ ℂ ⋀
∀k ∈ (M...(m +
1))A ∈ ℂ)) →
Σk ∈ (M...(m +
1))A = (Σk ∈ (M...m)A + [(m +
1) / k]A)) |
| 49 | 48 | opreq2d 3961 |
. . . . . . 7
⊢ ((m
∈ (ℤ≥ ‘M)
⋀ (C ∈ ℂ ⋀
∀k ∈ (M...(m +
1))A ∈ ℂ)) → (C · Σk ∈ (M...(m +
1))A) = (C · (Σk ∈ (M...m)A + [(m +
1) / k]A))) |
| 50 | 49 | adantlr 393 |
. . . . . 6
⊢ (((m
∈ (ℤ≥ ‘M)
⋀ ((C ∈ ℂ ⋀
∀k ∈ (M...(m +
1))A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A))) ⋀ (C ∈ ℂ ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ)) → (C · Σk ∈ (M...(m +
1))A) = (C · (Σk ∈ (M...m)A + [(m +
1) / k]A))) |
| 51 | | fsump1s 6951 |
. . . . . . . 8
⊢ ((m
∈ (ℤ≥ ‘M)
⋀ ∀k ∈ (M...(m +
1))(C · A) ∈ ℂ) → Σk ∈ (M...(m +
1))(C · A) = (Σk
∈ (M...m)(C ·
A) + [(m + 1) / k](C
· A))) |
| 52 | | r19.28av 1747 |
. . . . . . . . 9
⊢ ((C
∈ ℂ ⋀ ∀k ∈
(M...(m
+ 1))A ∈ ℂ) →
∀k ∈ (M...(m +
1))(C ∈ ℂ ⋀ A ∈ ℂ)) |
| 53 | 5 | r19.20si 1698 |
. . . . . . . . 9
⊢ (∀k ∈ (M...(m +
1))(C ∈ ℂ ⋀ A ∈ ℂ) → ∀k ∈ (M...(m +
1))(C · A) ∈ ℂ) |
| 54 | 52, 53 | syl 10 |
. . . . . . . 8
⊢ ((C
∈ ℂ ⋀ ∀k ∈
(M...(m
+ 1))A ∈ ℂ) →
∀k ∈ (M...(m +
1))(C · A) ∈ ℂ) |
| 55 | 51, 54 | sylan2 451 |
. . . . . . 7
⊢ ((m
∈ (ℤ≥ ‘M)
⋀ (C ∈ ℂ ⋀
∀k ∈ (M...(m +
1))A ∈ ℂ)) →
Σk ∈ (M...(m +
1))(C · A) = (Σk
∈ (M...m)(C ·
A) + [(m + 1) / k](C
· A))) |
| 56 | 55 | adantlr 393 |
. . . . . 6
⊢ (((m
∈ (ℤ≥ ‘M)
⋀ ((C ∈ ℂ ⋀
∀k ∈ (M...(m +
1))A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A))) ⋀ (C ∈ ℂ ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ)) →
Σk ∈ (M...(m +
1))(C · A) = (Σk
∈ (M...m)(C ·
A) + [(m + 1) / k](C
· A))) |
| 57 | 46, 50, 56 | 3eqtr4d 1509 |
. . . . 5
⊢ (((m
∈ (ℤ≥ ‘M)
⋀ ((C ∈ ℂ ⋀
∀k ∈ (M...(m +
1))A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A))) ⋀ (C ∈ ℂ ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ)) → (C · Σk ∈ (M...(m +
1))A) = Σk ∈ (M...(m +
1))(C · A)) |
| 58 | 57 | exp31 376 |
. . . 4
⊢ (m
∈ (ℤ≥ ‘M)
→ (((C ∈ ℂ ⋀
∀k ∈ (M...(m +
1))A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A)) → ((C ∈ ℂ ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ) → (C · Σk ∈ (M...(m +
1))A) = Σk ∈ (M...(m +
1))(C · A)))) |
| 59 | 22, 58 | syld 27 |
. . 3
⊢ (m
∈ (ℤ≥ ‘M)
→ (((C ∈ ℂ ⋀
∀k ∈ (M...m)A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A)) → ((C ∈ ℂ ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ) → (C · Σk ∈ (M...(m +
1))A) = Σk ∈ (M...(m +
1))(C · A)))) |
| 60 | | opreq2 3954 |
. . . . . 6
⊢ (j =
M → (M...j) =
(M...M)) |
| 61 | 60 | raleq1d 1781 |
. . . . 5
⊢ (j =
M → (∀k ∈ (M...j)A ∈ ℂ ↔ ∀k ∈ (M...M)A ∈ ℂ)) |
| 62 | 61 | anbi2d 614 |
. . . 4
⊢ (j =
M → ((C ∈ ℂ ⋀ ∀k ∈ (M...j)A ∈ ℂ) ↔ (C ∈ ℂ ⋀ ∀k ∈ (M...M)A ∈ ℂ))) |
| 63 | 60 | sumeq1d 6928 |
. . . . . 6
⊢ (j =
M → Σk ∈ (M...j)A = Σk
∈ (M...M)A) |
| 64 | 63 | opreq2d 3961 |
. . . . 5
⊢ (j =
M → (C · Σk ∈ (M...j)A) = (C ·
Σk ∈ (M...M)A)) |
| 65 | 60 | sumeq1d 6928 |
. . . . 5
⊢ (j =
M → Σk ∈ (M...j)(C · A) =
Σk ∈ (M...M)(C · A)) |
| 66 | 64, 65 | eqeq12d 1481 |
. . . 4
⊢ (j =
M → ((C · Σk ∈ (M...j)A) = Σk
∈ (M...j)(C ·
A) ↔ (C · Σk ∈ (M...M)A) = Σk
∈ (M...M)(C ·
A))) |
| 67 | 62, 66 | imbi12d 624 |
. . 3
⊢ (j =
M → (((C ∈ ℂ ⋀ ∀k ∈ (M...j)A ∈ ℂ) → (C · Σk ∈ (M...j)A) = Σk
∈ (M...j)(C ·
A)) ↔ ((C ∈ ℂ ⋀ ∀k ∈ (M...M)A ∈ ℂ) → (C · Σk ∈ (M...M)A) = Σk
∈ (M...M)(C ·
A)))) |
| 68 | | opreq2 3954 |
. . . . . 6
⊢ (j =
m → (M...j) =
(M...m)) |
| 69 | 68 | raleq1d 1781 |
. . . . 5
⊢ (j =
m → (∀k ∈ (M...j)A ∈ ℂ ↔ ∀k ∈ (M...m)A ∈ ℂ)) |
| 70 | 69 | anbi2d 614 |
. . . 4
⊢ (j =
m → ((C ∈ ℂ ⋀ ∀k ∈ (M...j)A ∈ ℂ) ↔ (C ∈ ℂ ⋀ ∀k ∈ (M...m)A ∈ ℂ))) |
| 71 | 68 | sumeq1d 6928 |
. . . . . 6
⊢ (j =
m → Σk ∈ (M...j)A = Σk
∈ (M...m)A) |
| 72 | 71 | opreq2d 3961 |
. . . . 5
⊢ (j =
m → (C · Σk ∈ (M...j)A) = (C ·
Σk ∈ (M...m)A)) |
| 73 | 68 | sumeq1d 6928 |
. . . . 5
⊢ (j =
m → Σk ∈ (M...j)(C · A) =
Σk ∈ (M...m)(C · A)) |
| 74 | 72, 73 | eqeq12d 1481 |
. . . 4
⊢ (j =
m → ((C · Σk ∈ (M...j)A) = Σk
∈ (M...j)(C ·
A) ↔ (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A))) |
| 75 | 70, 74 | imbi12d 624 |
. . 3
⊢ (j =
m → (((C ∈ ℂ ⋀ ∀k ∈ (M...j)A ∈ ℂ) → (C · Σk ∈ (M...j)A) = Σk
∈ (M...j)(C ·
A)) ↔ ((C ∈ ℂ ⋀ ∀k ∈ (M...m)A ∈ ℂ) → (C · Σk ∈ (M...m)A) = Σk
∈ (M...m)(C ·
A)))) |
| 76 | | opreq2 3954 |
. . . . . 6
⊢ (j =
(m + 1) → (M...j) =
(M...(m
+ 1))) |
| 77 | 76 | raleq1d 1781 |
. . . . 5
⊢ (j =
(m + 1) → (∀k ∈ (M...j)A ∈ ℂ ↔ ∀k ∈ (M...(m +
1))A ∈ ℂ)) |
| 78 | 77 | anbi2d 614 |
. . . 4
⊢ (j =
(m + 1) → ((C ∈ ℂ ⋀ ∀k ∈ (M...j)A ∈ ℂ) ↔ (C ∈ ℂ ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ))) |
| 79 | 76 | sumeq1d 6928 |
. . . . . 6
⊢ (j =
(m + 1) → Σk ∈ (M...j)A = Σk
∈ (M...(m + 1))A) |
| 80 | 79 | opreq2d 3961 |
. . . . 5
⊢ (j =
(m + 1) → (C · Σk ∈ (M...j)A) = (C ·
Σk ∈ (M...(m +
1))A)) |
| 81 | 76 | sumeq1d 6928 |
. . . . 5
⊢ (j =
(m + 1) → Σk ∈ (M...j)(C · A) =
Σk ∈ (M...(m +
1))(C · A)) |
| 82 | 80, 81 | eqeq12d 1481 |
. . . 4
⊢ (j =
(m + 1) → ((C · Σk ∈ (M...j)A) = Σk
∈ (M...j)(C ·
A) ↔ (C · Σk ∈ (M...(m +
1))A) = Σk ∈ (M...(m +
1))(C · A))) |
| 83 | 78, 82 | imbi12d 624 |
. . 3
⊢ (j =
(m + 1) → (((C ∈ ℂ ⋀ ∀k ∈ (M...j)A ∈ ℂ) → (C · Σk ∈ (M...j)A) = Σk
∈ (M...j)(C ·
A)) ↔ ((C ∈ ℂ ⋀ ∀k ∈ (M...(m +
1))A ∈ ℂ) → (C · Σk ∈ (M...(m +
1))A) = Σk ∈ (M...(m +
1))(C · A)))) |
| 84 | | opreq2 3954 |
. . . . . 6
⊢ (j =
N → (M...j) =
(M...N)) |
| 85 | 84 | raleq1d 1781 |
. . . . 5
⊢ (j =
N → (∀k ∈ (M...j)A ∈ ℂ ↔ ∀k ∈ (M...N)A ∈ ℂ)) |
| 86 | 85 | anbi2d 614 |
. . . 4
⊢ (j =
N → ((C ∈ ℂ ⋀ ∀k ∈ (M...j)A ∈ ℂ) ↔ (C ∈ ℂ ⋀ ∀k ∈ (M...N)A ∈ ℂ))) |
| 87 | 84 | sumeq1d 6928 |
. . . . . 6
⊢ (j =
N → Σk ∈ (M...j)A = Σk
∈ (M...N)A) |
| 88 | 87 | opreq2d 3961 |
. . . . 5
⊢ (j =
N → (C · Σk ∈ (M...j)A) = (C ·
Σk ∈ (M...N)A)) |
| 89 | 84 | sumeq1d 6928 |
. . . . 5
⊢ (j =
N → Σk ∈ (M...j)(C · A) =
Σk ∈ (M...N)(C · A)) |
| 90 | 88, 89 | eqeq12d 1481 |
. . . 4
⊢ (j =
N → ((C · Σk ∈ (M...j)A) = Σk
∈ (M...j)(C ·
A) ↔ (C · Σk ∈ (M...N)A) = Σk
∈ (M...N)(C ·
A))) |
| 91 | 86, 90 | imbi12d 624 |
. . 3
⊢ (j =
N → (((C ∈ ℂ ⋀ ∀k ∈ (M...j)A ∈ ℂ) → (C · Σk ∈ (M...j)A) = Σk
∈ (M...j)(C ·
A)) ↔ ((C ∈ ℂ ⋀ ∀k ∈ (M...N)A ∈ ℂ) → (C · Σk ∈ (M...N)A) = Σk
∈ (M...N)(C ·
A)))) |
| 92 | 13, 59, 67, 75, 83, 91 | uzind4ALT 6383 |
. 2
⊢ (N
∈ (ℤ≥ ‘M)
→ ((C ∈ ℂ ⋀
∀k ∈ (M...N)A ∈ ℂ) → (C · Σk ∈ (M...N)A) = Σk
∈ (M...N)(C ·
A))) |
| 93 | 92 | 3impib 829 |
1
⊢ ((N
∈ (ℤ≥ ‘M)
⋀ C ∈ ℂ ⋀
∀k ∈ (M...N)A ∈ ℂ) → (C · Σk ∈ (M...N)A) = Σk
∈ (M...N)(C ·
A)) |