Proof of Theorem ip1cnilem6
| Step | Hyp | Ref
| Expression |
| 1 | | 4nn 6008 |
. 2
⊢ 4 ∈ ℕ |
| 2 | | ip1cni.9 |
. . . 4
⊢ U ∈
NrmCVec |
| 3 | | ip1cni.8 |
. . . . 5
⊢ C = (IndMet ‘U) |
| 4 | 3 | imsmet 8332 |
. . . 4
⊢ (U ∈ NrmCVec →
C ∈
Met) |
| 5 | 2, 4 | ax-mp 7 |
. . 3
⊢ C ∈ Met |
| 6 | | ip1cni.1 |
. . . 4
⊢ X = (Base ‘U) |
| 7 | 6, 3, 2 | imsbai 8330 |
. . 3
⊢ X = dom dom C |
| 8 | | ip1cni.d |
. . 3
⊢ D = (abs ∘
− ) |
| 9 | | ip1cni.j |
. . 3
⊢ J = (Open ‘C) |
| 10 | | ip1cni.k |
. . 3
⊢ K = (Open ‘D) |
| 11 | | ip1cni.2 |
. . . 4
⊢ G = ( +v ‘U) |
| 12 | | ip1cni.7 |
. . . 4
⊢ P = ( ·i
‘U) |
| 13 | | ip1cni.f |
. . . 4
⊢ F = {〈w, v〉∣(w ∈ X ⋀ v = (wPA))} |
| 14 | | ip1cni.a |
. . . 4
⊢ A ∈ X |
| 15 | | ip1cnilem.4 |
. . . 4
⊢ S = ( ·s
‘U) |
| 16 | | ip1cnilem.6 |
. . . 4
⊢ N = (norm ‘U) |
| 17 | | ip1cnilem.16 |
. . . 4
⊢ H = {〈u, t〉∣(u ∈ X ⋀ t = (((i↑k) · ((N
‘(uG((i↑k)SA)))↑2)) · (1 / 4)))} |
| 18 | 6, 11, 12, 3, 8, 9, 10, 13, 2, 14, 15, 16,
17 | ip1cnilem5 8385 |
. . 3
⊢ (k ∈ ℕ → H
∈ (J Cn
K)) |
| 19 | | axmulcl 5286 |
. . . . . . . . . . . . 13
⊢ (((i↑k) ∈ ℂ ⋀ ((N ‘(wG((i↑k)SA)))↑2) ∈
ℂ) → ((i↑k) · ((N
‘(wG((i↑k)SA)))↑2)) ∈
ℂ) |
| 20 | | nnnn0t 6112 |
. . . . . . . . . . . . . . 15
⊢ (k ∈ ℕ → k
∈ ℕ0) |
| 21 | | axicn 5283 |
. . . . . . . . . . . . . . . 16
⊢ i ∈ ℂ |
| 22 | | expclt 6594 |
. . . . . . . . . . . . . . . 16
⊢ ((i ∈ ℂ ⋀ k ∈ ℕ0)
→ (i↑k) ∈ ℂ) |
| 23 | 21, 22 | mpan 699 |
. . . . . . . . . . . . . . 15
⊢ (k ∈ ℕ0 → (i↑k) ∈ ℂ) |
| 24 | 20, 23 | syl 10 |
. . . . . . . . . . . . . 14
⊢ (k ∈ ℕ → (i↑k) ∈ ℂ) |
| 25 | 24 | adantl 390 |
. . . . . . . . . . . . 13
⊢ ((w ∈ X ⋀ k ∈ ℕ) → (i↑k) ∈ ℂ) |
| 26 | 6, 11 | nvgcl 8247 |
. . . . . . . . . . . . . . . . . 18
⊢ ((U ∈ NrmCVec ⋀ w ∈ X ⋀ ((i↑k)SA) ∈ X) → (wG((i↑k)SA)) ∈ X) |
| 27 | 2, 26 | mp3an1 907 |
. . . . . . . . . . . . . . . . 17
⊢ ((w ∈ X ⋀
((i↑k)SA) ∈ X) →
(wG((i↑k)SA)) ∈ X) |
| 28 | 6, 15 | nvscl 8255 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((U ∈ NrmCVec ⋀ (i↑k) ∈ ℂ ⋀ A ∈ X) → ((i↑k)SA) ∈ X) |
| 29 | 2, 14, 28 | mp3an13 911 |
. . . . . . . . . . . . . . . . . 18
⊢ ((i↑k) ∈ ℂ → ((i↑k)SA) ∈ X) |
| 30 | 24, 29 | syl 10 |
. . . . . . . . . . . . . . . . 17
⊢ (k ∈ ℕ → ((i↑k)SA) ∈ X) |
| 31 | 27, 30 | sylan2 454 |
. . . . . . . . . . . . . . . 16
⊢ ((w ∈ X ⋀ k ∈ ℕ) → (wG((i↑k)SA)) ∈ X) |
| 32 | 6, 16 | nvcl 8295 |
. . . . . . . . . . . . . . . . 17
⊢ ((U ∈ NrmCVec ⋀ (wG((i↑k)SA)) ∈ X) → (N
‘(wG((i↑k)SA))) ∈ ℝ) |
| 33 | 2, 32 | mpan 699 |
. . . . . . . . . . . . . . . 16
⊢ ((wG((i↑k)SA)) ∈ X → (N
‘(wG((i↑k)SA))) ∈ ℝ) |
| 34 | 31, 33 | syl 10 |
. . . . . . . . . . . . . . 15
⊢ ((w ∈ X ⋀ k ∈ ℕ) → (N
‘(wG((i↑k)SA))) ∈ ℝ) |
| 35 | 34 | recnd 5328 |
. . . . . . . . . . . . . 14
⊢ ((w ∈ X ⋀ k ∈ ℕ) → (N
‘(wG((i↑k)SA))) ∈ ℂ) |
| 36 | | sqclt 6624 |
. . . . . . . . . . . . . 14
⊢ ((N ‘(wG((i↑k)SA))) ∈ ℂ → ((N
‘(wG((i↑k)SA)))↑2) ∈
ℂ) |
| 37 | 35, 36 | syl 10 |
. . . . . . . . . . . . 13
⊢ ((w ∈ X ⋀ k ∈ ℕ) → ((N
‘(wG((i↑k)SA)))↑2) ∈
ℂ) |
| 38 | 19, 25, 37 | sylanc 474 |
. . . . . . . . . . . 12
⊢ ((w ∈ X ⋀ k ∈ ℕ) → ((i↑k) · ((N
‘(wG((i↑k)SA)))↑2)) ∈
ℂ) |
| 39 | | elfznnt 6444 |
. . . . . . . . . . . 12
⊢ (k ∈ (1...4) →
k ∈ ℕ) |
| 40 | 38, 39 | sylan2 454 |
. . . . . . . . . . 11
⊢ ((w ∈ X ⋀ k ∈ (1...4))
→ ((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) ∈
ℂ) |
| 41 | 40 | r19.21aiva 1721 |
. . . . . . . . . 10
⊢ (w ∈ X → ∀k ∈ (1...4)((i↑k) · ((N
‘(wG((i↑k)SA)))↑2)) ∈
ℂ) |
| 42 | | elnnuz 6390 |
. . . . . . . . . . . 12
⊢ (4 ∈ ℕ ↔ 4
∈ (ℤ≥ ‘1)) |
| 43 | 1, 42 | mpbi 189 |
. . . . . . . . . . 11
⊢ 4 ∈ (ℤ≥ ‘1) |
| 44 | | fsumclt 7029 |
. . . . . . . . . . 11
⊢ ((4 ∈ (ℤ≥ ‘1) ⋀ ∀k ∈
(1...4)((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) ∈
ℂ) → Σk ∈
(1...4)((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) ∈
ℂ) |
| 45 | 43, 44 | mpan 699 |
. . . . . . . . . 10
⊢ (∀k ∈ (1...4)((i↑k) · ((N
‘(wG((i↑k)SA)))↑2)) ∈
ℂ → Σk ∈
(1...4)((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) ∈
ℂ) |
| 46 | 41, 45 | syl 10 |
. . . . . . . . 9
⊢ (w ∈ X → Σk ∈
(1...4)((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) ∈
ℂ) |
| 47 | | 4re 5988 |
. . . . . . . . . . 11
⊢ 4 ∈ ℝ |
| 48 | 47 | recn 5327 |
. . . . . . . . . 10
⊢ 4 ∈ ℂ |
| 49 | | 4pos 5998 |
. . . . . . . . . . 11
⊢ 0 < 4 |
| 50 | 47, 49 | gt0ne0i 5630 |
. . . . . . . . . 10
⊢ 4 ≠ 0 |
| 51 | | divrect 5747 |
. . . . . . . . . 10
⊢ ((Σk ∈
(1...4)((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) ∈
ℂ ⋀ 4
∈ ℂ ⋀ 4 ≠ 0) → (Σk ∈
(1...4)((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) / 4) = (Σk ∈
(1...4)((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) · (1 / 4))) |
| 52 | 48, 50, 51 | mp3an23 912 |
. . . . . . . . 9
⊢ (Σk ∈
(1...4)((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) ∈
ℂ → (Σk ∈
(1...4)((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) / 4) = (Σk ∈
(1...4)((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) · (1 / 4))) |
| 53 | 46, 52 | syl 10 |
. . . . . . . 8
⊢ (w ∈ X → (Σk ∈
(1...4)((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) / 4) = (Σk ∈
(1...4)((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) · (1 / 4))) |
| 54 | 6, 11, 15, 16, 12 | ipval 8361 |
. . . . . . . . 9
⊢ ((U ∈ NrmCVec ⋀ w ∈ X ⋀ A ∈ X) →
(wPA) =
(Σk ∈ (1...4)((i↑k) · ((N
‘(wG((i↑k)SA)))↑2)) / 4)) |
| 55 | 2, 14, 54 | mp3an13 911 |
. . . . . . . 8
⊢ (w ∈ X → (wPA) = (Σk
∈ (1...4)((i↑k) · ((N
‘(wG((i↑k)SA)))↑2)) / 4)) |
| 56 | | opreq1 3982 |
. . . . . . . . . . . . . . 15
⊢ (u = w →
(uG((i↑k)SA)) = (wG((i↑k)SA))) |
| 57 | 56 | fveq2d 3742 |
. . . . . . . . . . . . . 14
⊢ (u = w →
(N ‘(uG((i↑k)SA))) = (N
‘(wG((i↑k)SA)))) |
| 58 | 57 | opreq1d 3989 |
. . . . . . . . . . . . 13
⊢ (u = w →
((N ‘(uG((i↑k)SA)))↑2) = ((N ‘(wG((i↑k)SA)))↑2)) |
| 59 | 58 | opreq2d 3990 |
. . . . . . . . . . . 12
⊢ (u = w →
((i↑k) · ((N ‘(uG((i↑k)SA)))↑2)) = ((i↑k) · ((N
‘(wG((i↑k)SA)))↑2))) |
| 60 | 59 | opreq1d 3989 |
. . . . . . . . . . 11
⊢ (u = w →
(((i↑k) · ((N ‘(uG((i↑k)SA)))↑2)) · (1 / 4)) =
(((i↑k) · ((N ‘(wG((i↑k)SA)))↑2)) · (1 / 4))) |
| 61 | | oprex 3997 |
. . . . . . . . . . 11
⊢ (((i↑k) · ((N
‘(wG((i↑k)SA)))↑2)) · (1 / 4)) ∈ V |
| 62 | 60, 17, 61 | fvopab4 3794 |
. . . . . . . . . 10
⊢ (w ∈ X → (H
‘w) = (((i↑k) · ((N
‘(wG((i↑k)SA)))↑2)) · (1 / 4))) |
| 63 | 62 | sumeq2sdv 7007 |
. . . . . . . . 9
⊢ (w ∈ X → Σk ∈
(1...4)(H ‘w) = Σk
∈ (1...4)(((i↑k) · ((N
‘(wG((i↑k)SA)))↑2)) · (1 / 4))) |
| 64 | 48, 50 | reccl 5726 |
. . . . . . . . . . 11
⊢ (1 / 4) ∈ ℂ |
| 65 | | fsummulc2 7048 |
. . . . . . . . . . 11
⊢ ((4 ∈ (ℤ≥ ‘1) ⋀ (1 / 4) ∈
ℂ ⋀ ∀k ∈ (1...4)((i↑k) · ((N
‘(wG((i↑k)SA)))↑2)) ∈
ℂ) → (Σk ∈
(1...4)((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) · (1 / 4)) = Σk ∈
(1...4)(((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) · (1 / 4))) |
| 66 | 43, 64, 65 | mp3an12 910 |
. . . . . . . . . 10
⊢ (∀k ∈ (1...4)((i↑k) · ((N
‘(wG((i↑k)SA)))↑2)) ∈
ℂ → (Σk ∈
(1...4)((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) · (1 / 4)) = Σk ∈
(1...4)(((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) · (1 / 4))) |
| 67 | 41, 66 | syl 10 |
. . . . . . . . 9
⊢ (w ∈ X → (Σk ∈
(1...4)((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) · (1 / 4)) = Σk ∈
(1...4)(((i↑k) ·
((N ‘(wG((i↑k)SA)))↑2)) · (1 / 4))) |
| 68 | 63, 67 | eqtr4d 1517 |
. . . . . . . 8
⊢ (w ∈ X → Σk ∈
(1...4)(H ‘w) = (Σk
∈ (1...4)((i↑k) · ((N
‘(wG((i↑k)SA)))↑2)) · (1 / 4))) |
| 69 | 53, 55, 68 | 3eqtr4rd 1525 |
. . . . . . 7
⊢ (w ∈ X → Σk ∈
(1...4)(H ‘w) = (wPA)) |
| 70 | 69 | eqeq2d 1493 |
. . . . . 6
⊢ (w ∈ X → (v =
Σk ∈ (1...4)(H
‘w) ↔ v = (wPA))) |
| 71 | 70 | pm5.32i 648 |
. . . . 5
⊢ ((w ∈ X ⋀ v = Σk
∈ (1...4)(H ‘w))
↔ (w ∈ X ⋀ v =
(wPA))) |
| 72 | 71 | opabbii 2684 |
. . . 4
⊢ {〈w, v〉∣(w ∈ X ⋀ v =
Σk ∈ (1...4)(H
‘w))} = {〈w, v〉∣(w ∈ X ⋀ v =
(wPA))} |
| 73 | 13, 72 | eqtr4 1505 |
. . 3
⊢ F = {〈w, v〉∣(w ∈ X ⋀ v = Σk
∈ (1...4)(H ‘w))} |
| 74 | 5, 7, 8, 9, 10, 18, 73 | fsumcn 7999 |
. 2
⊢ (4 ∈ ℕ →
F ∈
(J Cn K)) |
| 75 | 1, 74 | ax-mp 7 |
1
⊢ F ∈ (J Cn K) |