Metamath Proof Explorer


Theorem abvcxp

Description: Raising an absolute value to a power less than one yields another absolute value. (Contributed by Mario Carneiro, 8-Sep-2014)

Ref Expression
Hypotheses abvcxp.a A = AbsVal R
abvcxp.b B = Base R
abvcxp.f G = x B F x S
Assertion abvcxp F A S 0 1 G A

Proof

Step Hyp Ref Expression
1 abvcxp.a A = AbsVal R
2 abvcxp.b B = Base R
3 abvcxp.f G = x B F x S
4 1 a1i F A S 0 1 A = AbsVal R
5 2 a1i F A S 0 1 B = Base R
6 eqidd F A S 0 1 + R = + R
7 eqidd F A S 0 1 R = R
8 eqidd F A S 0 1 0 R = 0 R
9 1 abvrcl F A R Ring
10 9 adantr F A S 0 1 R Ring
11 1 2 abvcl F A x B F x
12 11 adantlr F A S 0 1 x B F x
13 1 2 abvge0 F A x B 0 F x
14 13 adantlr F A S 0 1 x B 0 F x
15 simpr F A S 0 1 S 0 1
16 0xr 0 *
17 1re 1
18 elioc2 0 * 1 S 0 1 S 0 < S S 1
19 16 17 18 mp2an S 0 1 S 0 < S S 1
20 15 19 sylib F A S 0 1 S 0 < S S 1
21 20 simp1d F A S 0 1 S
22 21 adantr F A S 0 1 x B S
23 12 14 22 recxpcld F A S 0 1 x B F x S
24 23 3 fmptd F A S 0 1 G : B
25 eqid 0 R = 0 R
26 2 25 ring0cl R Ring 0 R B
27 10 26 syl F A S 0 1 0 R B
28 fveq2 x = 0 R F x = F 0 R
29 28 oveq1d x = 0 R F x S = F 0 R S
30 ovex F 0 R S V
31 29 3 30 fvmpt 0 R B G 0 R = F 0 R S
32 27 31 syl F A S 0 1 G 0 R = F 0 R S
33 1 25 abv0 F A F 0 R = 0
34 33 adantr F A S 0 1 F 0 R = 0
35 34 oveq1d F A S 0 1 F 0 R S = 0 S
36 21 recnd F A S 0 1 S
37 20 simp2d F A S 0 1 0 < S
38 37 gt0ne0d F A S 0 1 S 0
39 36 38 0cxpd F A S 0 1 0 S = 0
40 35 39 eqtrd F A S 0 1 F 0 R S = 0
41 32 40 eqtrd F A S 0 1 G 0 R = 0
42 simp1l F A S 0 1 y B y 0 R F A
43 simp2 F A S 0 1 y B y 0 R y B
44 1 2 abvcl F A y B F y
45 42 43 44 syl2anc F A S 0 1 y B y 0 R F y
46 1 2 25 abvgt0 F A y B y 0 R 0 < F y
47 46 3adant1r F A S 0 1 y B y 0 R 0 < F y
48 45 47 elrpd F A S 0 1 y B y 0 R F y +
49 21 3ad2ant1 F A S 0 1 y B y 0 R S
50 48 49 rpcxpcld F A S 0 1 y B y 0 R F y S +
51 50 rpgt0d F A S 0 1 y B y 0 R 0 < F y S
52 fveq2 x = y F x = F y
53 52 oveq1d x = y F x S = F y S
54 ovex F y S V
55 53 3 54 fvmpt y B G y = F y S
56 43 55 syl F A S 0 1 y B y 0 R G y = F y S
57 51 56 breqtrrd F A S 0 1 y B y 0 R 0 < G y
58 simp1l F A S 0 1 y B y 0 R z B z 0 R F A
59 simp2l F A S 0 1 y B y 0 R z B z 0 R y B
60 simp3l F A S 0 1 y B y 0 R z B z 0 R z B
61 eqid R = R
62 1 2 61 abvmul F A y B z B F y R z = F y F z
63 58 59 60 62 syl3anc F A S 0 1 y B y 0 R z B z 0 R F y R z = F y F z
64 63 oveq1d F A S 0 1 y B y 0 R z B z 0 R F y R z S = F y F z S
65 58 59 44 syl2anc F A S 0 1 y B y 0 R z B z 0 R F y
66 1 2 abvge0 F A y B 0 F y
67 58 59 66 syl2anc F A S 0 1 y B y 0 R z B z 0 R 0 F y
68 1 2 abvcl F A z B F z
69 58 60 68 syl2anc F A S 0 1 y B y 0 R z B z 0 R F z
70 1 2 abvge0 F A z B 0 F z
71 58 60 70 syl2anc F A S 0 1 y B y 0 R z B z 0 R 0 F z
72 36 3ad2ant1 F A S 0 1 y B y 0 R z B z 0 R S
73 65 67 69 71 72 mulcxpd F A S 0 1 y B y 0 R z B z 0 R F y F z S = F y S F z S
74 64 73 eqtrd F A S 0 1 y B y 0 R z B z 0 R F y R z S = F y S F z S
75 10 3ad2ant1 F A S 0 1 y B y 0 R z B z 0 R R Ring
76 2 61 ringcl R Ring y B z B y R z B
77 75 59 60 76 syl3anc F A S 0 1 y B y 0 R z B z 0 R y R z B
78 fveq2 x = y R z F x = F y R z
79 78 oveq1d x = y R z F x S = F y R z S
80 ovex F y R z S V
81 79 3 80 fvmpt y R z B G y R z = F y R z S
82 77 81 syl F A S 0 1 y B y 0 R z B z 0 R G y R z = F y R z S
83 59 55 syl F A S 0 1 y B y 0 R z B z 0 R G y = F y S
84 fveq2 x = z F x = F z
85 84 oveq1d x = z F x S = F z S
86 ovex F z S V
87 85 3 86 fvmpt z B G z = F z S
88 60 87 syl F A S 0 1 y B y 0 R z B z 0 R G z = F z S
89 83 88 oveq12d F A S 0 1 y B y 0 R z B z 0 R G y G z = F y S F z S
90 74 82 89 3eqtr4d F A S 0 1 y B y 0 R z B z 0 R G y R z = G y G z
91 ringgrp R Ring R Grp
92 75 91 syl F A S 0 1 y B y 0 R z B z 0 R R Grp
93 eqid + R = + R
94 2 93 grpcl R Grp y B z B y + R z B
95 92 59 60 94 syl3anc F A S 0 1 y B y 0 R z B z 0 R y + R z B
96 1 2 abvcl F A y + R z B F y + R z
97 58 95 96 syl2anc F A S 0 1 y B y 0 R z B z 0 R F y + R z
98 1 2 abvge0 F A y + R z B 0 F y + R z
99 58 95 98 syl2anc F A S 0 1 y B y 0 R z B z 0 R 0 F y + R z
100 20 3ad2ant1 F A S 0 1 y B y 0 R z B z 0 R S 0 < S S 1
101 100 simp1d F A S 0 1 y B y 0 R z B z 0 R S
102 97 99 101 recxpcld F A S 0 1 y B y 0 R z B z 0 R F y + R z S
103 65 69 readdcld F A S 0 1 y B y 0 R z B z 0 R F y + F z
104 65 69 67 71 addge0d F A S 0 1 y B y 0 R z B z 0 R 0 F y + F z
105 103 104 101 recxpcld F A S 0 1 y B y 0 R z B z 0 R F y + F z S
106 65 67 101 recxpcld F A S 0 1 y B y 0 R z B z 0 R F y S
107 69 71 101 recxpcld F A S 0 1 y B y 0 R z B z 0 R F z S
108 106 107 readdcld F A S 0 1 y B y 0 R z B z 0 R F y S + F z S
109 1 2 93 abvtri F A y B z B F y + R z F y + F z
110 58 59 60 109 syl3anc F A S 0 1 y B y 0 R z B z 0 R F y + R z F y + F z
111 100 simp2d F A S 0 1 y B y 0 R z B z 0 R 0 < S
112 101 111 elrpd F A S 0 1 y B y 0 R z B z 0 R S +
113 97 99 103 104 112 cxple2d F A S 0 1 y B y 0 R z B z 0 R F y + R z F y + F z F y + R z S F y + F z S
114 110 113 mpbid F A S 0 1 y B y 0 R z B z 0 R F y + R z S F y + F z S
115 100 simp3d F A S 0 1 y B y 0 R z B z 0 R S 1
116 65 67 69 71 112 115 cxpaddle F A S 0 1 y B y 0 R z B z 0 R F y + F z S F y S + F z S
117 102 105 108 114 116 letrd F A S 0 1 y B y 0 R z B z 0 R F y + R z S F y S + F z S
118 fveq2 x = y + R z F x = F y + R z
119 118 oveq1d x = y + R z F x S = F y + R z S
120 ovex F y + R z S V
121 119 3 120 fvmpt y + R z B G y + R z = F y + R z S
122 95 121 syl F A S 0 1 y B y 0 R z B z 0 R G y + R z = F y + R z S
123 83 88 oveq12d F A S 0 1 y B y 0 R z B z 0 R G y + G z = F y S + F z S
124 117 122 123 3brtr4d F A S 0 1 y B y 0 R z B z 0 R G y + R z G y + G z
125 4 5 6 7 8 10 24 41 57 90 124 isabvd F A S 0 1 G A