Proof of Theorem siii
| Step | Hyp | Ref
| Expression |
| 1 | | opreq2 3975 |
. . . . . 6
⊢ (B = (0v ‘U) → (APB) = (AP(0v ‘U))) |
| 2 | | siii.9 |
. . . . . . . 8
⊢ U ∈
CPreHil |
| 3 | 2 | phnvi 8471 |
. . . . . . 7
⊢ U ∈
NrmCVec |
| 4 | | siii.a |
. . . . . . 7
⊢ A ∈ X |
| 5 | | siii.1 |
. . . . . . . 8
⊢ X = (Base ‘U) |
| 6 | | eqid 1478 |
. . . . . . . 8
⊢ (0v
‘U) = (0v
‘U) |
| 7 | | siii.7 |
. . . . . . . 8
⊢ P = ( ·i
‘U) |
| 8 | 5, 6, 7 | ip0r 8366 |
. . . . . . 7
⊢ ((U ∈ NrmCVec ⋀ A ∈ X) →
(AP(0v ‘U)) = 0) |
| 9 | 3, 4, 8 | mp2an 699 |
. . . . . 6
⊢ (AP(0v ‘U)) = 0 |
| 10 | 1, 9 | syl6eq 1526 |
. . . . 5
⊢ (B = (0v ‘U) → (APB) = 0) |
| 11 | 10 | fveq2d 3734 |
. . . 4
⊢ (B = (0v ‘U) → (abs ‘(APB)) = (abs ‘0)) |
| 12 | | abs0 6877 |
. . . 4
⊢ (abs ‘0) =
0 |
| 13 | 11, 12 | syl6eq 1526 |
. . 3
⊢ (B = (0v ‘U) → (abs ‘(APB)) = 0) |
| 14 | | siii.6 |
. . . . . 6
⊢ N = (norm ‘U) |
| 15 | 5, 14 | nvge0 8298 |
. . . . 5
⊢ ((U ∈ NrmCVec ⋀ A ∈ X) → 0
≤ (N ‘A)) |
| 16 | 3, 4, 15 | mp2an 699 |
. . . 4
⊢ 0 ≤ (N ‘A) |
| 17 | | siii.b |
. . . . 5
⊢ B ∈ X |
| 18 | 5, 14 | nvge0 8298 |
. . . . 5
⊢ ((U ∈ NrmCVec ⋀ B ∈ X) → 0
≤ (N ‘B)) |
| 19 | 3, 17, 18 | mp2an 699 |
. . . 4
⊢ 0 ≤ (N ‘B) |
| 20 | 5, 14, 3, 4 | nvcli 8284 |
. . . . 5
⊢ (N ‘A)
∈ ℝ |
| 21 | 5, 14, 3, 17 | nvcli 8284 |
. . . . 5
⊢ (N ‘B)
∈ ℝ |
| 22 | 20, 21 | mulge0 5619 |
. . . 4
⊢ ((0 ≤ (N ‘A)
⋀ 0 ≤ (N ‘B))
→ 0 ≤ ((N ‘A) · (N
‘B))) |
| 23 | 16, 19, 22 | mp2an 699 |
. . 3
⊢ 0 ≤ ((N ‘A)
· (N ‘B)) |
| 24 | 13, 23 | syl6eqbr 2657 |
. 2
⊢ (B = (0v ‘U) → (abs ‘(APB)) ≤ ((N
‘A) · (N ‘B))) |
| 25 | 21 | recn 5326 |
. . . . . . . . . . 11
⊢ (N ‘B)
∈ ℂ |
| 26 | 25 | sqeq0 6617 |
. . . . . . . . . 10
⊢ (((N ‘B)↑2) = 0 ↔ (N ‘B) =
0) |
| 27 | 5, 6, 14 | nvz 8293 |
. . . . . . . . . . 11
⊢ ((U ∈ NrmCVec ⋀ B ∈ X) →
((N ‘B) = 0 ↔ B
= (0v ‘U))) |
| 28 | 3, 17, 27 | mp2an 699 |
. . . . . . . . . 10
⊢ ((N ‘B) = 0
↔ B = (0v
‘U)) |
| 29 | 26, 28 | bitr 173 |
. . . . . . . . 9
⊢ (((N ‘B)↑2) = 0 ↔ B = (0v ‘U)) |
| 30 | 29 | necon3bii 1601 |
. . . . . . . 8
⊢ (((N ‘B)↑2) ≠ 0 ↔ B ≠ (0v ‘U)) |
| 31 | 5, 7 | ipcl 8361 |
. . . . . . . . . 10
⊢ ((U ∈ NrmCVec ⋀ B ∈ X ⋀ A ∈ X) →
(BPA) ∈ ℂ) |
| 32 | 3, 17, 4, 31 | mp3an 918 |
. . . . . . . . 9
⊢ (BPA) ∈ ℂ |
| 33 | 21 | resqcl 6624 |
. . . . . . . . . 10
⊢ ((N ‘B)↑2) ∈ ℝ |
| 34 | 33 | recn 5326 |
. . . . . . . . 9
⊢ ((N ‘B)↑2) ∈ ℂ |
| 35 | 32, 34 | divcan1z 5730 |
. . . . . . . 8
⊢ (((N ‘B)↑2) ≠ 0 → (((BPA) / ((N
‘B)↑2)) · ((N ‘B)↑2)) = (BPA)) |
| 36 | 30, 35 | sylbir 201 |
. . . . . . 7
⊢ (B ≠ (0v ‘U) → (((BPA) / ((N
‘B)↑2)) · ((N ‘B)↑2)) = (BPA)) |
| 37 | 5, 7 | ipcj 8363 |
. . . . . . . 8
⊢ ((U ∈ NrmCVec ⋀ A ∈ X ⋀ B ∈ X) →
(∗ ‘(APB)) = (BPA)) |
| 38 | 3, 4, 17, 37 | mp3an 918 |
. . . . . . 7
⊢ (∗ ‘(APB)) = (BPA) |
| 39 | 36, 38 | syl6eqr 1528 |
. . . . . 6
⊢ (B ≠ (0v ‘U) → (((BPA) / ((N
‘B)↑2)) · ((N ‘B)↑2)) = (∗
‘(APB))) |
| 40 | 39 | opreq2d 3982 |
. . . . 5
⊢ (B ≠ (0v ‘U) → ((APB) · (((BPA) / ((N
‘B)↑2)) · ((N ‘B)↑2))) = ((APB) · (∗
‘(APB)))) |
| 41 | 40 | fveq2d 3734 |
. . . 4
⊢ (B ≠ (0v ‘U) → (√ ‘((APB) · (((BPA) / ((N
‘B)↑2)) · ((N ‘B)↑2)))) = (√ ‘((APB) · (∗
‘(APB))))) |
| 42 | 5, 7 | ipcl 8361 |
. . . . . 6
⊢ ((U ∈ NrmCVec ⋀ A ∈ X ⋀ B ∈ X) →
(APB) ∈ ℂ) |
| 43 | 3, 4, 17, 42 | mp3an 918 |
. . . . 5
⊢ (APB) ∈ ℂ |
| 44 | | absvalt 6763 |
. . . . 5
⊢ ((APB) ∈ ℂ → (abs ‘(APB)) = (√ ‘((APB) · (∗
‘(APB))))) |
| 45 | 43, 44 | ax-mp 7 |
. . . 4
⊢ (abs ‘(APB)) = (√ ‘((APB) · (∗
‘(APB)))) |
| 46 | 41, 45 | syl6reqr 1529 |
. . 3
⊢ (B ≠ (0v ‘U) → (abs ‘(APB)) = (√ ‘((APB) · (((BPA) / ((N
‘B)↑2)) · ((N ‘B)↑2))))) |
| 47 | 36 | eqcomd 1483 |
. . . 4
⊢ (B ≠ (0v ‘U) → (BPA) = (((BPA) / ((N
‘B)↑2)) · ((N ‘B)↑2))) |
| 48 | | eqid 1478 |
. . . . . 6
⊢ (
−v ‘U) = (
−v ‘U) |
| 49 | | eqid 1478 |
. . . . . 6
⊢ (
·s ‘U) = ( ·s
‘U) |
| 50 | 5, 14, 7, 2, 4, 17, 48, 49 | siilem2 8508 |
. . . . 5
⊢ ((((BPA) / ((N
‘B)↑2)) ∈ ℂ ⋀ (((BPA) / ((N ‘B)↑2)) · (APB)) ∈ ℝ ⋀ 0 ≤
(((BPA) / ((N ‘B)↑2)) · (APB))) → ((BPA) = (((BPA) / ((N
‘B)↑2)) · ((N ‘B)↑2)) → (√ ‘((APB) · (((BPA) / ((N
‘B)↑2)) · ((N ‘B)↑2)))) ≤ ((N ‘A)
· (N ‘B)))) |
| 51 | 32, 34 | divclz 5723 |
. . . . . 6
⊢ (((N ‘B)↑2) ≠ 0 → ((BPA) / ((N
‘B)↑2)) ∈ ℂ) |
| 52 | 30, 51 | sylbir 201 |
. . . . 5
⊢ (B ≠ (0v ‘U) → ((BPA) / ((N
‘B)↑2)) ∈ ℂ) |
| 53 | 32, 43, 34 | 3pm3.2i 820 |
. . . . . . . . 9
⊢ ((BPA) ∈ ℂ ⋀ (APB) ∈ ℂ ⋀ ((N ‘B)↑2) ∈ ℂ) |
| 54 | | div23t 5749 |
. . . . . . . . 9
⊢ ((((BPA) ∈ ℂ ⋀ (APB) ∈ ℂ ⋀ ((N ‘B)↑2) ∈ ℂ) ⋀ ((N ‘B)↑2) ≠ 0) → (((BPA) · (APB)) / ((N
‘B)↑2)) = (((BPA) / ((N
‘B)↑2)) · (APB))) |
| 55 | 53, 54 | mpan 697 |
. . . . . . . 8
⊢ (((N ‘B)↑2) ≠ 0 → (((BPA) · (APB)) / ((N
‘B)↑2)) = (((BPA) / ((N
‘B)↑2)) · (APB))) |
| 56 | 30, 55 | sylbir 201 |
. . . . . . 7
⊢ (B ≠ (0v ‘U) → (((BPA) · (APB)) / ((N
‘B)↑2)) = (((BPA) / ((N
‘B)↑2)) · (APB))) |
| 57 | 32, 43 | mulcom 5335 |
. . . . . . . . 9
⊢ ((BPA) · (APB)) = ((APB) · (BPA)) |
| 58 | 5, 7 | ipipcj 8364 |
. . . . . . . . . 10
⊢ ((U ∈ NrmCVec ⋀ A ∈ X ⋀ B ∈ X) →
((APB) ·
(BPA)) = ((abs
‘(APB))↑2)) |
| 59 | 3, 4, 17, 58 | mp3an 918 |
. . . . . . . . 9
⊢ ((APB) · (BPA)) = ((abs ‘(APB))↑2) |
| 60 | 57, 59 | eqtr 1498 |
. . . . . . . 8
⊢ ((BPA) · (APB)) = ((abs ‘(APB))↑2) |
| 61 | 60 | opreq1i 3977 |
. . . . . . 7
⊢ (((BPA) · (APB)) / ((N
‘B)↑2)) = (((abs
‘(APB))↑2) /
((N ‘B)↑2)) |
| 62 | 56, 61 | syl5reqr 1525 |
. . . . . 6
⊢ (B ≠ (0v ‘U) → (((BPA) / ((N
‘B)↑2)) · (APB)) = (((abs ‘(APB))↑2) / ((N ‘B)↑2))) |
| 63 | 43 | abscl 6839 |
. . . . . . . . 9
⊢ (abs ‘(APB)) ∈ ℝ |
| 64 | 63 | resqcl 6624 |
. . . . . . . 8
⊢ ((abs ‘(APB))↑2) ∈
ℝ |
| 65 | 64, 33 | redivclz 5801 |
. . . . . . 7
⊢ (((N ‘B)↑2) ≠ 0 → (((abs ‘(APB))↑2) / ((N ‘B)↑2)) ∈
ℝ) |
| 66 | 30, 65 | sylbir 201 |
. . . . . 6
⊢ (B ≠ (0v ‘U) → (((abs ‘(APB))↑2) / ((N ‘B)↑2)) ∈
ℝ) |
| 67 | 62, 66 | eqeltrd 1551 |
. . . . 5
⊢ (B ≠ (0v ‘U) → (((BPA) / ((N
‘B)↑2)) · (APB)) ∈ ℝ) |
| 68 | 28 | necon3bii 1601 |
. . . . . . . 8
⊢ ((N ‘B) ≠
0 ↔ B ≠ (0v
‘U)) |
| 69 | 21 | sqgt0 6628 |
. . . . . . . 8
⊢ ((N ‘B) ≠
0 → 0 < ((N ‘B)↑2)) |
| 70 | 68, 69 | sylbir 201 |
. . . . . . 7
⊢ (B ≠ (0v ‘U) → 0 < ((N ‘B)↑2)) |
| 71 | 63 | sqge0 6629 |
. . . . . . . . 9
⊢ 0 ≤ ((abs
‘(APB))↑2) |
| 72 | | divge0t 5858 |
. . . . . . . . 9
⊢ (((((abs ‘(APB))↑2) ∈
ℝ ⋀ 0
≤ ((abs ‘(APB))↑2))
⋀ (((N
‘B)↑2) ∈ ℝ ⋀ 0 < ((N
‘B)↑2))) → 0 ≤ (((abs
‘(APB))↑2) /
((N ‘B)↑2))) |
| 73 | 64, 71, 72 | mpanl12 710 |
. . . . . . . 8
⊢ ((((N ‘B)↑2) ∈ ℝ ⋀ 0 <
((N ‘B)↑2)) → 0 ≤ (((abs ‘(APB))↑2) / ((N ‘B)↑2))) |
| 74 | 33, 73 | mpan 697 |
. . . . . . 7
⊢ (0 < ((N ‘B)↑2) → 0 ≤ (((abs ‘(APB))↑2) / ((N ‘B)↑2))) |
| 75 | 70, 74 | syl 10 |
. . . . . 6
⊢ (B ≠ (0v ‘U) → 0 ≤ (((abs ‘(APB))↑2) / ((N ‘B)↑2))) |
| 76 | 75, 62 | breqtrrd 2646 |
. . . . 5
⊢ (B ≠ (0v ‘U) → 0 ≤ (((BPA) / ((N
‘B)↑2)) · (APB))) |
| 77 | 50, 52, 67, 76 | syl3anc 860 |
. . . 4
⊢ (B ≠ (0v ‘U) → ((BPA) = (((BPA) / ((N
‘B)↑2)) · ((N ‘B)↑2)) → (√ ‘((APB) · (((BPA) / ((N
‘B)↑2)) · ((N ‘B)↑2)))) ≤ ((N ‘A)
· (N ‘B)))) |
| 78 | 47, 77 | mpd 26 |
. . 3
⊢ (B ≠ (0v ‘U) → (√ ‘((APB) · (((BPA) / ((N
‘B)↑2)) · ((N ‘B)↑2)))) ≤ ((N ‘A)
· (N ‘B))) |
| 79 | 46, 78 | eqbrtrd 2640 |
. 2
⊢ (B ≠ (0v ‘U) → (abs ‘(APB)) ≤ ((N
‘A) · (N ‘B))) |
| 80 | 24, 79 | pm2.61ine 1637 |
1
⊢ (abs ‘(APB)) ≤ ((N
‘A) · (N ‘B)) |