Metamath Proof Explorer


Theorem abscxpbnd

Description: Bound on the absolute value of a complex power. (Contributed by Mario Carneiro, 15-Sep-2014)

Ref Expression
Hypotheses abscxpbnd.1 φA
abscxpbnd.2 φB
abscxpbnd.3 φ0B
abscxpbnd.4 φM
abscxpbnd.5 φAM
Assertion abscxpbnd φABMBeBπ

Proof

Step Hyp Ref Expression
1 abscxpbnd.1 φA
2 abscxpbnd.2 φB
3 abscxpbnd.3 φ0B
4 abscxpbnd.4 φM
5 abscxpbnd.5 φAM
6 1le1 11
7 6 a1i φA=0B=011
8 oveq12 A=0B=0AB=00
9 8 adantll φA=0B=0AB=00
10 0cn 0
11 cxp0 000=1
12 10 11 ax-mp 00=1
13 9 12 eqtrdi φA=0B=0AB=1
14 13 fveq2d φA=0B=0AB=1
15 abs1 1=1
16 14 15 eqtrdi φA=0B=0AB=1
17 fveq2 B=0B=0
18 re0 0=0
19 17 18 eqtrdi B=0B=0
20 19 oveq2d B=0MB=M0
21 4 recnd φM
22 21 cxp0d φM0=1
23 22 adantr φA=0M0=1
24 20 23 sylan9eqr φA=0B=0MB=1
25 simpr φA=0B=0B=0
26 25 abs00bd φA=0B=0B=0
27 26 oveq1d φA=0B=0Bπ=0π
28 picn π
29 28 mul02i 0π=0
30 27 29 eqtrdi φA=0B=0Bπ=0
31 30 fveq2d φA=0B=0eBπ=e0
32 ef0 e0=1
33 31 32 eqtrdi φA=0B=0eBπ=1
34 24 33 oveq12d φA=0B=0MBeBπ=11
35 1t1e1 11=1
36 34 35 eqtrdi φA=0B=0MBeBπ=1
37 7 16 36 3brtr4d φA=0B=0ABMBeBπ
38 simplr φA=0B0A=0
39 38 oveq1d φA=0B0AB=0B
40 2 adantr φA=0B
41 0cxp BB00B=0
42 40 41 sylan φA=0B00B=0
43 39 42 eqtrd φA=0B0AB=0
44 43 abs00bd φA=0B0AB=0
45 0red φ0
46 1 abscld φA
47 1 absge0d φ0A
48 45 46 4 47 5 letrd φ0M
49 2 recld φB
50 4 48 49 recxpcld φMB
51 50 ad2antrr φA=0B0MB
52 2 abscld φB
53 52 ad2antrr φA=0B0B
54 pire π
55 remulcl BπBπ
56 53 54 55 sylancl φA=0B0Bπ
57 56 reefcld φA=0B0eBπ
58 4 48 49 cxpge0d φ0MB
59 58 ad2antrr φA=0B00MB
60 56 rpefcld φA=0B0eBπ+
61 60 rpge0d φA=0B00eBπ
62 51 57 59 61 mulge0d φA=0B00MBeBπ
63 44 62 eqbrtrd φA=0B0ABMBeBπ
64 37 63 pm2.61dane φA=0ABMBeBπ
65 1 adantr φA0A
66 simpr φA0A0
67 2 adantr φA0B
68 65 66 67 cxpefd φA0AB=eBlogA
69 68 fveq2d φA0AB=eBlogA
70 logcl AA0logA
71 1 70 sylan φA0logA
72 67 71 mulcld φA0BlogA
73 absef BlogAeBlogA=eBlogA
74 72 73 syl φA0eBlogA=eBlogA
75 67 recld φA0B
76 71 recld φA0logA
77 75 76 remulcld φA0BlogA
78 77 recnd φA0BlogA
79 67 imcld φA0B
80 71 imcld φA0logA
81 80 renegcld φA0logA
82 79 81 remulcld φA0BlogA
83 82 recnd φA0BlogA
84 efadd BlogABlogAeBlogA+BlogA=eBlogAeBlogA
85 78 83 84 syl2anc φA0eBlogA+BlogA=eBlogAeBlogA
86 79 80 remulcld φA0BlogA
87 86 recnd φA0BlogA
88 78 87 negsubd φA0BlogA+BlogA=BlogABlogA
89 79 recnd φA0B
90 80 recnd φA0logA
91 89 90 mulneg2d φA0BlogA=BlogA
92 91 oveq2d φA0BlogA+BlogA=BlogA+BlogA
93 67 71 remuld φA0BlogA=BlogABlogA
94 88 92 93 3eqtr4d φA0BlogA+BlogA=BlogA
95 94 fveq2d φA0eBlogA+BlogA=eBlogA
96 relog AA0logA=logA
97 1 96 sylan φA0logA=logA
98 97 oveq2d φA0BlogA=BlogA
99 98 fveq2d φA0eBlogA=eBlogA
100 46 recnd φA
101 100 adantr φA0A
102 1 abs00ad φA=0A=0
103 102 necon3bid φA0A0
104 103 biimpar φA0A0
105 75 recnd φA0B
106 101 104 105 cxpefd φA0AB=eBlogA
107 99 106 eqtr4d φA0eBlogA=AB
108 107 oveq1d φA0eBlogAeBlogA=ABeBlogA
109 85 95 108 3eqtr3d φA0eBlogA=ABeBlogA
110 69 74 109 3eqtrd φA0AB=ABeBlogA
111 65 abscld φA0A
112 65 absge0d φA00A
113 111 112 75 recxpcld φA0AB
114 82 reefcld φA0eBlogA
115 113 114 remulcld φA0ABeBlogA
116 50 adantr φA0MB
117 116 114 remulcld φA0MBeBlogA
118 52 54 55 sylancl φBπ
119 118 reefcld φeBπ
120 119 adantr φA0eBπ
121 116 120 remulcld φA0MBeBπ
122 82 rpefcld φA0eBlogA+
123 122 rpge0d φA00eBlogA
124 4 adantr φA0M
125 3 adantr φA00B
126 5 adantr φA0AM
127 111 112 124 75 125 126 cxple2ad φA0ABMB
128 113 116 114 123 127 lemul1ad φA0ABeBlogAMBeBlogA
129 58 adantr φA00MB
130 89 abscld φA0B
131 81 recnd φA0logA
132 131 abscld φA0logA
133 130 132 remulcld φA0BlogA
134 118 adantr φA0Bπ
135 82 leabsd φA0BlogABlogA
136 89 131 absmuld φA0BlogA=BlogA
137 135 136 breqtrd φA0BlogABlogA
138 67 abscld φA0B
139 138 132 remulcld φA0BlogA
140 131 absge0d φA00logA
141 absimle BBB
142 67 141 syl φA0BB
143 130 138 132 140 142 lemul1ad φA0BlogABlogA
144 54 a1i φA0π
145 67 absge0d φA00B
146 90 absnegd φA0logA=logA
147 logimcl AA0π<logAlogAπ
148 1 147 sylan φA0π<logAlogAπ
149 148 simpld φA0π<logA
150 54 renegcli π
151 ltle πlogAπ<logAπlogA
152 150 80 151 sylancr φA0π<logAπlogA
153 149 152 mpd φA0πlogA
154 148 simprd φA0logAπ
155 absle logAπlogAππlogAlogAπ
156 80 54 155 sylancl φA0logAππlogAlogAπ
157 153 154 156 mpbir2and φA0logAπ
158 146 157 eqbrtrd φA0logAπ
159 132 144 138 145 158 lemul2ad φA0BlogABπ
160 133 139 134 143 159 letrd φA0BlogABπ
161 82 133 134 137 160 letrd φA0BlogABπ
162 efle BlogABπBlogABπeBlogAeBπ
163 82 134 162 syl2anc φA0BlogABπeBlogAeBπ
164 161 163 mpbid φA0eBlogAeBπ
165 114 120 116 129 164 lemul2ad φA0MBeBlogAMBeBπ
166 115 117 121 128 165 letrd φA0ABeBlogAMBeBπ
167 110 166 eqbrtrd φA0ABMBeBπ
168 64 167 pm2.61dane φABMBeBπ