Step | Hyp | Ref
| Expression |
1 | | fveq2 6889 |
. . . 4
β’ (π΄ = (0vecβπ) β (πβπ΄) = (πβ(0vecβπ))) |
2 | 1 | fveq2d 6893 |
. . 3
β’ (π΄ = (0vecβπ) β (πβ(πβπ΄)) = (πβ(πβ(0vecβπ)))) |
3 | | fveq2 6889 |
. . . 4
β’ (π΄ = (0vecβπ) β (πΏβπ΄) = (πΏβ(0vecβπ))) |
4 | 3 | oveq2d 7422 |
. . 3
β’ (π΄ = (0vecβπ) β ((πβπ) Β· (πΏβπ΄)) = ((πβπ) Β· (πΏβ(0vecβπ)))) |
5 | 2, 4 | breq12d 5161 |
. 2
β’ (π΄ = (0vecβπ) β ((πβ(πβπ΄)) β€ ((πβπ) Β· (πΏβπ΄)) β (πβ(πβ(0vecβπ))) β€ ((πβπ) Β· (πΏβ(0vecβπ))))) |
6 | | nmblolbi.u |
. . . . . . . . 9
β’ π β NrmCVec |
7 | | nmblolbi.1 |
. . . . . . . . . 10
β’ π = (BaseSetβπ) |
8 | | nmblolbi.4 |
. . . . . . . . . 10
β’ πΏ =
(normCVβπ) |
9 | 7, 8 | nvcl 29902 |
. . . . . . . . 9
β’ ((π β NrmCVec β§ π΄ β π) β (πΏβπ΄) β β) |
10 | 6, 9 | mpan 689 |
. . . . . . . 8
β’ (π΄ β π β (πΏβπ΄) β β) |
11 | 10 | adantr 482 |
. . . . . . 7
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (πΏβπ΄) β β) |
12 | | eqid 2733 |
. . . . . . . . . . 11
β’
(0vecβπ) = (0vecβπ) |
13 | 7, 12, 8 | nvz 29910 |
. . . . . . . . . 10
β’ ((π β NrmCVec β§ π΄ β π) β ((πΏβπ΄) = 0 β π΄ = (0vecβπ))) |
14 | 6, 13 | mpan 689 |
. . . . . . . . 9
β’ (π΄ β π β ((πΏβπ΄) = 0 β π΄ = (0vecβπ))) |
15 | 14 | necon3bid 2986 |
. . . . . . . 8
β’ (π΄ β π β ((πΏβπ΄) β 0 β π΄ β (0vecβπ))) |
16 | 15 | biimpar 479 |
. . . . . . 7
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (πΏβπ΄) β 0) |
17 | 11, 16 | rereccld 12038 |
. . . . . 6
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (1 / (πΏβπ΄)) β β) |
18 | 7, 12, 8 | nvgt0 29915 |
. . . . . . . . . 10
β’ ((π β NrmCVec β§ π΄ β π) β (π΄ β (0vecβπ) β 0 < (πΏβπ΄))) |
19 | 6, 18 | mpan 689 |
. . . . . . . . 9
β’ (π΄ β π β (π΄ β (0vecβπ) β 0 < (πΏβπ΄))) |
20 | 19 | biimpa 478 |
. . . . . . . 8
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β 0 < (πΏβπ΄)) |
21 | 11, 20 | recgt0d 12145 |
. . . . . . 7
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β 0 < (1 / (πΏβπ΄))) |
22 | | 0re 11213 |
. . . . . . . 8
β’ 0 β
β |
23 | | ltle 11299 |
. . . . . . . 8
β’ ((0
β β β§ (1 / (πΏβπ΄)) β β) β (0 < (1 /
(πΏβπ΄)) β 0 β€ (1 / (πΏβπ΄)))) |
24 | 22, 17, 23 | sylancr 588 |
. . . . . . 7
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (0 < (1 / (πΏβπ΄)) β 0 β€ (1 / (πΏβπ΄)))) |
25 | 21, 24 | mpd 15 |
. . . . . 6
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β 0 β€ (1 / (πΏβπ΄))) |
26 | | nmblolbi.w |
. . . . . . . . 9
β’ π β NrmCVec |
27 | | nmblolbii.b |
. . . . . . . . 9
β’ π β π΅ |
28 | | eqid 2733 |
. . . . . . . . . 10
β’
(BaseSetβπ) =
(BaseSetβπ) |
29 | | nmblolbi.7 |
. . . . . . . . . 10
β’ π΅ = (π BLnOp π) |
30 | 7, 28, 29 | blof 30026 |
. . . . . . . . 9
β’ ((π β NrmCVec β§ π β NrmCVec β§ π β π΅) β π:πβΆ(BaseSetβπ)) |
31 | 6, 26, 27, 30 | mp3an 1462 |
. . . . . . . 8
β’ π:πβΆ(BaseSetβπ) |
32 | 31 | ffvelcdmi 7083 |
. . . . . . 7
β’ (π΄ β π β (πβπ΄) β (BaseSetβπ)) |
33 | 32 | adantr 482 |
. . . . . 6
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (πβπ΄) β (BaseSetβπ)) |
34 | | eqid 2733 |
. . . . . . . 8
β’ (
Β·π OLD βπ) = ( Β·π OLD
βπ) |
35 | | nmblolbi.5 |
. . . . . . . 8
β’ π =
(normCVβπ) |
36 | 28, 34, 35 | nvsge0 29905 |
. . . . . . 7
β’ ((π β NrmCVec β§ ((1 /
(πΏβπ΄)) β β β§ 0 β€ (1 / (πΏβπ΄))) β§ (πβπ΄) β (BaseSetβπ)) β (πβ((1 / (πΏβπ΄))( Β·π OLD
βπ)(πβπ΄))) = ((1 / (πΏβπ΄)) Β· (πβ(πβπ΄)))) |
37 | 26, 36 | mp3an1 1449 |
. . . . . 6
β’ ((((1 /
(πΏβπ΄)) β β β§ 0 β€ (1 / (πΏβπ΄))) β§ (πβπ΄) β (BaseSetβπ)) β (πβ((1 / (πΏβπ΄))( Β·π OLD
βπ)(πβπ΄))) = ((1 / (πΏβπ΄)) Β· (πβ(πβπ΄)))) |
38 | 17, 25, 33, 37 | syl21anc 837 |
. . . . 5
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (πβ((1 / (πΏβπ΄))( Β·π OLD
βπ)(πβπ΄))) = ((1 / (πΏβπ΄)) Β· (πβ(πβπ΄)))) |
39 | 17 | recnd 11239 |
. . . . . . 7
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (1 / (πΏβπ΄)) β β) |
40 | | simpl 484 |
. . . . . . 7
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β π΄ β π) |
41 | | eqid 2733 |
. . . . . . . . . . 11
β’ (π LnOp π) = (π LnOp π) |
42 | 41, 29 | bloln 30025 |
. . . . . . . . . 10
β’ ((π β NrmCVec β§ π β NrmCVec β§ π β π΅) β π β (π LnOp π)) |
43 | 6, 26, 27, 42 | mp3an 1462 |
. . . . . . . . 9
β’ π β (π LnOp π) |
44 | 6, 26, 43 | 3pm3.2i 1340 |
. . . . . . . 8
β’ (π β NrmCVec β§ π β NrmCVec β§ π β (π LnOp π)) |
45 | | eqid 2733 |
. . . . . . . . 9
β’ (
Β·π OLD βπ) = ( Β·π OLD
βπ) |
46 | 7, 45, 34, 41 | lnomul 30001 |
. . . . . . . 8
β’ (((π β NrmCVec β§ π β NrmCVec β§ π β (π LnOp π)) β§ ((1 / (πΏβπ΄)) β β β§ π΄ β π)) β (πβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄)) = ((1 / (πΏβπ΄))( Β·π OLD
βπ)(πβπ΄))) |
47 | 44, 46 | mpan 689 |
. . . . . . 7
β’ (((1 /
(πΏβπ΄)) β β β§ π΄ β π) β (πβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄)) = ((1 / (πΏβπ΄))( Β·π OLD
βπ)(πβπ΄))) |
48 | 39, 40, 47 | syl2anc 585 |
. . . . . 6
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (πβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄)) = ((1 / (πΏβπ΄))( Β·π OLD
βπ)(πβπ΄))) |
49 | 48 | fveq2d 6893 |
. . . . 5
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (πβ(πβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄))) = (πβ((1 / (πΏβπ΄))( Β·π OLD
βπ)(πβπ΄)))) |
50 | 28, 35 | nvcl 29902 |
. . . . . . . . 9
β’ ((π β NrmCVec β§ (πβπ΄) β (BaseSetβπ)) β (πβ(πβπ΄)) β β) |
51 | 26, 32, 50 | sylancr 588 |
. . . . . . . 8
β’ (π΄ β π β (πβ(πβπ΄)) β β) |
52 | 51 | adantr 482 |
. . . . . . 7
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (πβ(πβπ΄)) β β) |
53 | 52 | recnd 11239 |
. . . . . 6
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (πβ(πβπ΄)) β β) |
54 | 11 | recnd 11239 |
. . . . . 6
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (πΏβπ΄) β β) |
55 | 53, 54, 16 | divrec2d 11991 |
. . . . 5
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β ((πβ(πβπ΄)) / (πΏβπ΄)) = ((1 / (πΏβπ΄)) Β· (πβ(πβπ΄)))) |
56 | 38, 49, 55 | 3eqtr4rd 2784 |
. . . 4
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β ((πβ(πβπ΄)) / (πΏβπ΄)) = (πβ(πβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄)))) |
57 | 7, 45 | nvscl 29867 |
. . . . . . . 8
β’ ((π β NrmCVec β§ (1 /
(πΏβπ΄)) β β β§ π΄ β π) β ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄) β π) |
58 | 6, 57 | mp3an1 1449 |
. . . . . . 7
β’ (((1 /
(πΏβπ΄)) β β β§ π΄ β π) β ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄) β π) |
59 | 58 | ancoms 460 |
. . . . . 6
β’ ((π΄ β π β§ (1 / (πΏβπ΄)) β β) β ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄) β π) |
60 | 39, 59 | syldan 592 |
. . . . 5
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄) β π) |
61 | 7, 8 | nvcl 29902 |
. . . . . . 7
β’ ((π β NrmCVec β§ ((1 /
(πΏβπ΄))( Β·π OLD
βπ)π΄) β π) β (πΏβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄)) β β) |
62 | 6, 60, 61 | sylancr 588 |
. . . . . 6
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (πΏβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄)) β β) |
63 | 7, 45, 12, 8 | nv1 29916 |
. . . . . . 7
β’ ((π β NrmCVec β§ π΄ β π β§ π΄ β (0vecβπ)) β (πΏβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄)) = 1) |
64 | 6, 63 | mp3an1 1449 |
. . . . . 6
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (πΏβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄)) = 1) |
65 | | eqle 11313 |
. . . . . 6
β’ (((πΏβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄)) β β β§ (πΏβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄)) = 1) β (πΏβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄)) β€ 1) |
66 | 62, 64, 65 | syl2anc 585 |
. . . . 5
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (πΏβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄)) β€ 1) |
67 | 6, 26, 31 | 3pm3.2i 1340 |
. . . . . 6
β’ (π β NrmCVec β§ π β NrmCVec β§ π:πβΆ(BaseSetβπ)) |
68 | | nmblolbi.6 |
. . . . . . 7
β’ π = (π normOpOLD π) |
69 | 7, 28, 8, 35, 68 | nmoolb 30012 |
. . . . . 6
β’ (((π β NrmCVec β§ π β NrmCVec β§ π:πβΆ(BaseSetβπ)) β§ (((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄) β π β§ (πΏβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄)) β€ 1)) β (πβ(πβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄))) β€ (πβπ)) |
70 | 67, 69 | mpan 689 |
. . . . 5
β’ ((((1 /
(πΏβπ΄))( Β·π OLD
βπ)π΄) β π β§ (πΏβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄)) β€ 1) β (πβ(πβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄))) β€ (πβπ)) |
71 | 60, 66, 70 | syl2anc 585 |
. . . 4
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (πβ(πβ((1 / (πΏβπ΄))( Β·π OLD
βπ)π΄))) β€ (πβπ)) |
72 | 56, 71 | eqbrtrd 5170 |
. . 3
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β ((πβ(πβπ΄)) / (πΏβπ΄)) β€ (πβπ)) |
73 | 7, 28, 68, 29 | nmblore 30027 |
. . . . . 6
β’ ((π β NrmCVec β§ π β NrmCVec β§ π β π΅) β (πβπ) β β) |
74 | 6, 26, 27, 73 | mp3an 1462 |
. . . . 5
β’ (πβπ) β β |
75 | 74 | a1i 11 |
. . . 4
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (πβπ) β β) |
76 | | ledivmul2 12090 |
. . . 4
β’ (((πβ(πβπ΄)) β β β§ (πβπ) β β β§ ((πΏβπ΄) β β β§ 0 < (πΏβπ΄))) β (((πβ(πβπ΄)) / (πΏβπ΄)) β€ (πβπ) β (πβ(πβπ΄)) β€ ((πβπ) Β· (πΏβπ΄)))) |
77 | 52, 75, 11, 20, 76 | syl112anc 1375 |
. . 3
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (((πβ(πβπ΄)) / (πΏβπ΄)) β€ (πβπ) β (πβ(πβπ΄)) β€ ((πβπ) Β· (πΏβπ΄)))) |
78 | 72, 77 | mpbid 231 |
. 2
β’ ((π΄ β π β§ π΄ β (0vecβπ)) β (πβ(πβπ΄)) β€ ((πβπ) Β· (πΏβπ΄))) |
79 | | 0le0 12310 |
. . . 4
β’ 0 β€
0 |
80 | | eqid 2733 |
. . . . . . . 8
β’
(0vecβπ) = (0vecβπ) |
81 | 7, 28, 12, 80, 41 | lno0 29997 |
. . . . . . 7
β’ ((π β NrmCVec β§ π β NrmCVec β§ π β (π LnOp π)) β (πβ(0vecβπ)) =
(0vecβπ)) |
82 | 6, 26, 43, 81 | mp3an 1462 |
. . . . . 6
β’ (πβ(0vecβπ)) =
(0vecβπ) |
83 | 82 | fveq2i 6892 |
. . . . 5
β’ (πβ(πβ(0vecβπ))) = (πβ(0vecβπ)) |
84 | 80, 35 | nvz0 29909 |
. . . . . 6
β’ (π β NrmCVec β (πβ(0vecβπ)) = 0) |
85 | 26, 84 | ax-mp 5 |
. . . . 5
β’ (πβ(0vecβπ)) = 0 |
86 | 83, 85 | eqtri 2761 |
. . . 4
β’ (πβ(πβ(0vecβπ))) = 0 |
87 | 12, 8 | nvz0 29909 |
. . . . . . 7
β’ (π β NrmCVec β (πΏβ(0vecβπ)) = 0) |
88 | 6, 87 | ax-mp 5 |
. . . . . 6
β’ (πΏβ(0vecβπ)) = 0 |
89 | 88 | oveq2i 7417 |
. . . . 5
β’ ((πβπ) Β· (πΏβ(0vecβπ))) = ((πβπ) Β· 0) |
90 | 74 | recni 11225 |
. . . . . 6
β’ (πβπ) β β |
91 | 90 | mul01i 11401 |
. . . . 5
β’ ((πβπ) Β· 0) = 0 |
92 | 89, 91 | eqtri 2761 |
. . . 4
β’ ((πβπ) Β· (πΏβ(0vecβπ))) = 0 |
93 | 79, 86, 92 | 3brtr4i 5178 |
. . 3
β’ (πβ(πβ(0vecβπ))) β€ ((πβπ) Β· (πΏβ(0vecβπ))) |
94 | 93 | a1i 11 |
. 2
β’ (π΄ β π β (πβ(πβ(0vecβπ))) β€ ((πβπ) Β· (πΏβ(0vecβπ)))) |
95 | 5, 78, 94 | pm2.61ne 3028 |
1
β’ (π΄ β π β (πβ(πβπ΄)) β€ ((πβπ) Β· (πΏβπ΄))) |