Metamath Proof Explorer


Theorem bcsiALT

Description: Bunjakovaskij-Cauchy-Schwarz inequality. Remark 3.4 of Beran p. 98. (Contributed by NM, 11-Oct-1999) (New usage is discouraged.) (Proof modification is discouraged.)

Ref Expression
Hypotheses bcs.1 ⊢ A ∈ ℋ
bcs.2 ⊢ B ∈ ℋ
Assertion bcsiALT ⊢ A ⋅ ih B ≤ norm ℎ ⁡ A ⁢ norm ℎ ⁡ B

Proof

Step Hyp Ref Expression
1 bcs.1 ⊢ A ∈ ℋ
2 bcs.2 ⊢ B ∈ ℋ
3 fveq2 ⊢ A ⋅ ih B = 0 → A ⋅ ih B = 0
4 abs0 ⊢ 0 = 0
5 normge0 ⊢ A ∈ ℋ → 0 ≤ norm ℎ ⁡ A
6 1 5 ax-mp ⊢ 0 ≤ norm ℎ ⁡ A
7 normge0 ⊢ B ∈ ℋ → 0 ≤ norm ℎ ⁡ B
8 2 7 ax-mp ⊢ 0 ≤ norm ℎ ⁡ B
9 1 normcli ⊢ norm ℎ ⁡ A ∈ ℝ
10 2 normcli ⊢ norm ℎ ⁡ B ∈ ℝ
11 9 10 mulge0i ⊢ 0 ≤ norm ℎ ⁡ A ∧ 0 ≤ norm ℎ ⁡ B → 0 ≤ norm ℎ ⁡ A ⁢ norm ℎ ⁡ B
12 6 8 11 mp2an ⊢ 0 ≤ norm ℎ ⁡ A ⁢ norm ℎ ⁡ B
13 4 12 eqbrtri ⊢ 0 ≤ norm ℎ ⁡ A ⁢ norm ℎ ⁡ B
14 3 13 eqbrtrdi ⊢ A ⋅ ih B = 0 → A ⋅ ih B ≤ norm ℎ ⁡ A ⁢ norm ℎ ⁡ B
15 df-ne ⊢ A ⋅ ih B ≠ 0 ↔ ¬ A ⋅ ih B = 0
16 2 1 his1i ⊢ B ⋅ ih A = A ⋅ ih B ‾
17 16 oveq2i ⊢ A ⋅ ih B A ⋅ ih B ⁢ B ⋅ ih A = A ⋅ ih B A ⋅ ih B ⁢ A ⋅ ih B ‾
18 17 oveq2i ⊢ A ⋅ ih B A ⋅ ih B ‾ ⁢ A ⋅ ih B + A ⋅ ih B A ⋅ ih B ⁢ B ⋅ ih A = A ⋅ ih B A ⋅ ih B ‾ ⁢ A ⋅ ih B + A ⋅ ih B A ⋅ ih B ⁢ A ⋅ ih B ‾
19 1 2 hicli ⊢ A ⋅ ih B ∈ ℂ
20 abslem2 ⊢ A ⋅ ih B ∈ ℂ ∧ A ⋅ ih B ≠ 0 → A ⋅ ih B A ⋅ ih B ‾ ⁢ A ⋅ ih B + A ⋅ ih B A ⋅ ih B ⁢ A ⋅ ih B ‾ = 2 ⁢ A ⋅ ih B
21 19 20 mpan ⊢ A ⋅ ih B ≠ 0 → A ⋅ ih B A ⋅ ih B ‾ ⁢ A ⋅ ih B + A ⋅ ih B A ⋅ ih B ⁢ A ⋅ ih B ‾ = 2 ⁢ A ⋅ ih B
22 18 21 eqtr2id ⊢ A ⋅ ih B ≠ 0 → 2 ⁢ A ⋅ ih B = A ⋅ ih B A ⋅ ih B ‾ ⁢ A ⋅ ih B + A ⋅ ih B A ⋅ ih B ⁢ B ⋅ ih A
23 19 abs00i ⊢ A ⋅ ih B = 0 ↔ A ⋅ ih B = 0
24 23 necon3bii ⊢ A ⋅ ih B ≠ 0 ↔ A ⋅ ih B ≠ 0
25 19 abscli ⊢ A ⋅ ih B ∈ ℝ
26 25 recni ⊢ A ⋅ ih B ∈ ℂ
27 19 26 divclzi ⊢ A ⋅ ih B ≠ 0 → A ⋅ ih B A ⋅ ih B ∈ ℂ
28 19 26 divreczi ⊢ A ⋅ ih B ≠ 0 → A ⋅ ih B A ⋅ ih B = A ⋅ ih B ⁢ 1 A ⋅ ih B
29 28 fveq2d ⊢ A ⋅ ih B ≠ 0 → A ⋅ ih B A ⋅ ih B = A ⋅ ih B ⁢ 1 A ⋅ ih B
30 26 recclzi ⊢ A ⋅ ih B ≠ 0 → 1 A ⋅ ih B ∈ ℂ
31 absmul ⊢ A ⋅ ih B ∈ ℂ ∧ 1 A ⋅ ih B ∈ ℂ → A ⋅ ih B ⁢ 1 A ⋅ ih B = A ⋅ ih B ⁢ 1 A ⋅ ih B
32 19 30 31 sylancr ⊢ A ⋅ ih B ≠ 0 → A ⋅ ih B ⁢ 1 A ⋅ ih B = A ⋅ ih B ⁢ 1 A ⋅ ih B
33 25 rerecclzi ⊢ A ⋅ ih B ≠ 0 → 1 A ⋅ ih B ∈ ℝ
34 0re ⊢ 0 ∈ ℝ
35 33 34 jctil ⊢ A ⋅ ih B ≠ 0 → 0 ∈ ℝ ∧ 1 A ⋅ ih B ∈ ℝ
36 19 absgt0i ⊢ A ⋅ ih B ≠ 0 ↔ 0 < A ⋅ ih B
37 24 36 bitri ⊢ A ⋅ ih B ≠ 0 ↔ 0 < A ⋅ ih B
38 25 recgt0i ⊢ 0 < A ⋅ ih B → 0 < 1 A ⋅ ih B
39 37 38 sylbi ⊢ A ⋅ ih B ≠ 0 → 0 < 1 A ⋅ ih B
40 ltle ⊢ 0 ∈ ℝ ∧ 1 A ⋅ ih B ∈ ℝ → 0 < 1 A ⋅ ih B → 0 ≤ 1 A ⋅ ih B
41 35 39 40 sylc ⊢ A ⋅ ih B ≠ 0 → 0 ≤ 1 A ⋅ ih B
42 33 41 absidd ⊢ A ⋅ ih B ≠ 0 → 1 A ⋅ ih B = 1 A ⋅ ih B
43 42 oveq2d ⊢ A ⋅ ih B ≠ 0 → A ⋅ ih B ⁢ 1 A ⋅ ih B = A ⋅ ih B ⁢ 1 A ⋅ ih B
44 32 43 eqtrd ⊢ A ⋅ ih B ≠ 0 → A ⋅ ih B ⁢ 1 A ⋅ ih B = A ⋅ ih B ⁢ 1 A ⋅ ih B
45 26 recidzi ⊢ A ⋅ ih B ≠ 0 → A ⋅ ih B ⁢ 1 A ⋅ ih B = 1
46 29 44 45 3eqtrd ⊢ A ⋅ ih B ≠ 0 → A ⋅ ih B A ⋅ ih B = 1
47 27 46 jca ⊢ A ⋅ ih B ≠ 0 → A ⋅ ih B A ⋅ ih B ∈ ℂ ∧ A ⋅ ih B A ⋅ ih B = 1
48 24 47 sylbir ⊢ A ⋅ ih B ≠ 0 → A ⋅ ih B A ⋅ ih B ∈ ℂ ∧ A ⋅ ih B A ⋅ ih B = 1
49 1 2 normlem7tALT ⊢ A ⋅ ih B A ⋅ ih B ∈ ℂ ∧ A ⋅ ih B A ⋅ ih B = 1 → A ⋅ ih B A ⋅ ih B ‾ ⁢ A ⋅ ih B + A ⋅ ih B A ⋅ ih B ⁢ B ⋅ ih A ≤ 2 ⁢ B ⋅ ih B ⁢ A ⋅ ih A
50 48 49 syl ⊢ A ⋅ ih B ≠ 0 → A ⋅ ih B A ⋅ ih B ‾ ⁢ A ⋅ ih B + A ⋅ ih B A ⋅ ih B ⁢ B ⋅ ih A ≤ 2 ⁢ B ⋅ ih B ⁢ A ⋅ ih A
51 22 50 eqbrtrd ⊢ A ⋅ ih B ≠ 0 → 2 ⁢ A ⋅ ih B ≤ 2 ⁢ B ⋅ ih B ⁢ A ⋅ ih A
52 15 51 sylbir ⊢ ¬ A ⋅ ih B = 0 → 2 ⁢ A ⋅ ih B ≤ 2 ⁢ B ⋅ ih B ⁢ A ⋅ ih A
53 10 recni ⊢ norm ℎ ⁡ B ∈ ℂ
54 9 recni ⊢ norm ℎ ⁡ A ∈ ℂ
55 normval ⊢ B ∈ ℋ → norm ℎ ⁡ B = B ⋅ ih B
56 2 55 ax-mp ⊢ norm ℎ ⁡ B = B ⋅ ih B
57 normval ⊢ A ∈ ℋ → norm ℎ ⁡ A = A ⋅ ih A
58 1 57 ax-mp ⊢ norm ℎ ⁡ A = A ⋅ ih A
59 56 58 oveq12i ⊢ norm ℎ ⁡ B ⁢ norm ℎ ⁡ A = B ⋅ ih B ⁢ A ⋅ ih A
60 53 54 59 mulcomli ⊢ norm ℎ ⁡ A ⁢ norm ℎ ⁡ B = B ⋅ ih B ⁢ A ⋅ ih A
61 60 breq2i ⊢ A ⋅ ih B ≤ norm ℎ ⁡ A ⁢ norm ℎ ⁡ B ↔ A ⋅ ih B ≤ B ⋅ ih B ⁢ A ⋅ ih A
62 2pos ⊢ 0 < 2
63 hiidge0 ⊢ B ∈ ℋ → 0 ≤ B ⋅ ih B
64 hiidrcl ⊢ B ∈ ℋ → B ⋅ ih B ∈ ℝ
65 2 64 ax-mp ⊢ B ⋅ ih B ∈ ℝ
66 65 sqrtcli ⊢ 0 ≤ B ⋅ ih B → B ⋅ ih B ∈ ℝ
67 2 63 66 mp2b ⊢ B ⋅ ih B ∈ ℝ
68 hiidge0 ⊢ A ∈ ℋ → 0 ≤ A ⋅ ih A
69 hiidrcl ⊢ A ∈ ℋ → A ⋅ ih A ∈ ℝ
70 1 69 ax-mp ⊢ A ⋅ ih A ∈ ℝ
71 70 sqrtcli ⊢ 0 ≤ A ⋅ ih A → A ⋅ ih A ∈ ℝ
72 1 68 71 mp2b ⊢ A ⋅ ih A ∈ ℝ
73 67 72 remulcli ⊢ B ⋅ ih B ⁢ A ⋅ ih A ∈ ℝ
74 2re ⊢ 2 ∈ ℝ
75 25 73 74 lemul2i ⊢ 0 < 2 → A ⋅ ih B ≤ B ⋅ ih B ⁢ A ⋅ ih A ↔ 2 ⁢ A ⋅ ih B ≤ 2 ⁢ B ⋅ ih B ⁢ A ⋅ ih A
76 62 75 ax-mp ⊢ A ⋅ ih B ≤ B ⋅ ih B ⁢ A ⋅ ih A ↔ 2 ⁢ A ⋅ ih B ≤ 2 ⁢ B ⋅ ih B ⁢ A ⋅ ih A
77 61 76 bitri ⊢ A ⋅ ih B ≤ norm ℎ ⁡ A ⁢ norm ℎ ⁡ B ↔ 2 ⁢ A ⋅ ih B ≤ 2 ⁢ B ⋅ ih B ⁢ A ⋅ ih A
78 52 77 sylibr ⊢ ¬ A ⋅ ih B = 0 → A ⋅ ih B ≤ norm ℎ ⁡ A ⁢ norm ℎ ⁡ B
79 14 78 pm2.61i ⊢ A ⋅ ih B ≤ norm ℎ ⁡ A ⁢ norm ℎ ⁡ B