Metamath Proof Explorer


Theorem dvexp3

Description: Derivative of an exponential of integer exponent. (Contributed by Mario Carneiro, 26-Feb-2015)

Ref Expression
Assertion dvexp3
|- ( N e. ZZ -> ( CC _D ( x e. ( CC \ { 0 } ) |-> ( x ^ N ) ) ) = ( x e. ( CC \ { 0 } ) |-> ( N x. ( x ^ ( N - 1 ) ) ) ) )

Proof

Step Hyp Ref Expression
1 elznn0nn
 |-  ( N e. ZZ <-> ( N e. NN0 \/ ( N e. RR /\ -u N e. NN ) ) )
2 cnelprrecn
 |-  CC e. { RR , CC }
3 2 a1i
 |-  ( N e. NN0 -> CC e. { RR , CC } )
4 expcl
 |-  ( ( x e. CC /\ N e. NN0 ) -> ( x ^ N ) e. CC )
5 4 ancoms
 |-  ( ( N e. NN0 /\ x e. CC ) -> ( x ^ N ) e. CC )
6 c0ex
 |-  0 e. _V
7 ovex
 |-  ( N x. ( x ^ ( N - 1 ) ) ) e. _V
8 6 7 ifex
 |-  if ( N = 0 , 0 , ( N x. ( x ^ ( N - 1 ) ) ) ) e. _V
9 8 a1i
 |-  ( ( N e. NN0 /\ x e. CC ) -> if ( N = 0 , 0 , ( N x. ( x ^ ( N - 1 ) ) ) ) e. _V )
10 dvexp2
 |-  ( N e. NN0 -> ( CC _D ( x e. CC |-> ( x ^ N ) ) ) = ( x e. CC |-> if ( N = 0 , 0 , ( N x. ( x ^ ( N - 1 ) ) ) ) ) )
11 difssd
 |-  ( N e. NN0 -> ( CC \ { 0 } ) C_ CC )
12 eqid
 |-  ( TopOpen ` CCfld ) = ( TopOpen ` CCfld )
13 12 cnfldtopon
 |-  ( TopOpen ` CCfld ) e. ( TopOn ` CC )
14 13 toponrestid
 |-  ( TopOpen ` CCfld ) = ( ( TopOpen ` CCfld ) |`t CC )
15 cnn0opn
 |-  ( CC \ { 0 } ) e. ( TopOpen ` CCfld )
16 15 a1i
 |-  ( N e. NN0 -> ( CC \ { 0 } ) e. ( TopOpen ` CCfld ) )
17 3 5 9 10 11 14 12 16 dvmptres
 |-  ( N e. NN0 -> ( CC _D ( x e. ( CC \ { 0 } ) |-> ( x ^ N ) ) ) = ( x e. ( CC \ { 0 } ) |-> if ( N = 0 , 0 , ( N x. ( x ^ ( N - 1 ) ) ) ) ) )
18 ifid
 |-  if ( N = 0 , ( N x. ( x ^ ( N - 1 ) ) ) , ( N x. ( x ^ ( N - 1 ) ) ) ) = ( N x. ( x ^ ( N - 1 ) ) )
19 id
 |-  ( N = 0 -> N = 0 )
20 oveq1
 |-  ( N = 0 -> ( N - 1 ) = ( 0 - 1 ) )
21 20 oveq2d
 |-  ( N = 0 -> ( x ^ ( N - 1 ) ) = ( x ^ ( 0 - 1 ) ) )
22 19 21 oveq12d
 |-  ( N = 0 -> ( N x. ( x ^ ( N - 1 ) ) ) = ( 0 x. ( x ^ ( 0 - 1 ) ) ) )
23 eldifsn
 |-  ( x e. ( CC \ { 0 } ) <-> ( x e. CC /\ x =/= 0 ) )
24 0z
 |-  0 e. ZZ
25 peano2zm
 |-  ( 0 e. ZZ -> ( 0 - 1 ) e. ZZ )
26 24 25 ax-mp
 |-  ( 0 - 1 ) e. ZZ
27 expclz
 |-  ( ( x e. CC /\ x =/= 0 /\ ( 0 - 1 ) e. ZZ ) -> ( x ^ ( 0 - 1 ) ) e. CC )
28 26 27 mp3an3
 |-  ( ( x e. CC /\ x =/= 0 ) -> ( x ^ ( 0 - 1 ) ) e. CC )
29 23 28 sylbi
 |-  ( x e. ( CC \ { 0 } ) -> ( x ^ ( 0 - 1 ) ) e. CC )
30 29 adantl
 |-  ( ( N e. NN0 /\ x e. ( CC \ { 0 } ) ) -> ( x ^ ( 0 - 1 ) ) e. CC )
31 30 mul02d
 |-  ( ( N e. NN0 /\ x e. ( CC \ { 0 } ) ) -> ( 0 x. ( x ^ ( 0 - 1 ) ) ) = 0 )
32 22 31 sylan9eqr
 |-  ( ( ( N e. NN0 /\ x e. ( CC \ { 0 } ) ) /\ N = 0 ) -> ( N x. ( x ^ ( N - 1 ) ) ) = 0 )
33 32 ifeq1da
 |-  ( ( N e. NN0 /\ x e. ( CC \ { 0 } ) ) -> if ( N = 0 , ( N x. ( x ^ ( N - 1 ) ) ) , ( N x. ( x ^ ( N - 1 ) ) ) ) = if ( N = 0 , 0 , ( N x. ( x ^ ( N - 1 ) ) ) ) )
34 18 33 eqtr3id
 |-  ( ( N e. NN0 /\ x e. ( CC \ { 0 } ) ) -> ( N x. ( x ^ ( N - 1 ) ) ) = if ( N = 0 , 0 , ( N x. ( x ^ ( N - 1 ) ) ) ) )
35 34 mpteq2dva
 |-  ( N e. NN0 -> ( x e. ( CC \ { 0 } ) |-> ( N x. ( x ^ ( N - 1 ) ) ) ) = ( x e. ( CC \ { 0 } ) |-> if ( N = 0 , 0 , ( N x. ( x ^ ( N - 1 ) ) ) ) ) )
36 17 35 eqtr4d
 |-  ( N e. NN0 -> ( CC _D ( x e. ( CC \ { 0 } ) |-> ( x ^ N ) ) ) = ( x e. ( CC \ { 0 } ) |-> ( N x. ( x ^ ( N - 1 ) ) ) ) )
37 eldifi
 |-  ( x e. ( CC \ { 0 } ) -> x e. CC )
38 37 adantl
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> x e. CC )
39 simpll
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> N e. RR )
40 39 recnd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> N e. CC )
41 nnnn0
 |-  ( -u N e. NN -> -u N e. NN0 )
42 41 ad2antlr
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> -u N e. NN0 )
43 expneg2
 |-  ( ( x e. CC /\ N e. CC /\ -u N e. NN0 ) -> ( x ^ N ) = ( 1 / ( x ^ -u N ) ) )
44 38 40 42 43 syl3anc
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( x ^ N ) = ( 1 / ( x ^ -u N ) ) )
45 44 mpteq2dva
 |-  ( ( N e. RR /\ -u N e. NN ) -> ( x e. ( CC \ { 0 } ) |-> ( x ^ N ) ) = ( x e. ( CC \ { 0 } ) |-> ( 1 / ( x ^ -u N ) ) ) )
46 45 oveq2d
 |-  ( ( N e. RR /\ -u N e. NN ) -> ( CC _D ( x e. ( CC \ { 0 } ) |-> ( x ^ N ) ) ) = ( CC _D ( x e. ( CC \ { 0 } ) |-> ( 1 / ( x ^ -u N ) ) ) ) )
47 2 a1i
 |-  ( ( N e. RR /\ -u N e. NN ) -> CC e. { RR , CC } )
48 eldifsni
 |-  ( x e. ( CC \ { 0 } ) -> x =/= 0 )
49 48 adantl
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> x =/= 0 )
50 nnz
 |-  ( -u N e. NN -> -u N e. ZZ )
51 50 ad2antlr
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> -u N e. ZZ )
52 38 49 51 expclzd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( x ^ -u N ) e. CC )
53 38 49 51 expne0d
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( x ^ -u N ) =/= 0 )
54 eldifsn
 |-  ( ( x ^ -u N ) e. ( CC \ { 0 } ) <-> ( ( x ^ -u N ) e. CC /\ ( x ^ -u N ) =/= 0 ) )
55 52 53 54 sylanbrc
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( x ^ -u N ) e. ( CC \ { 0 } ) )
56 ovex
 |-  ( -u N x. ( x ^ ( -u N - 1 ) ) ) e. _V
57 56 a1i
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( -u N x. ( x ^ ( -u N - 1 ) ) ) e. _V )
58 eldifsn
 |-  ( y e. ( CC \ { 0 } ) <-> ( y e. CC /\ y =/= 0 ) )
59 58 bilani
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ y e. ( CC \ { 0 } ) ) -> ( y e. CC /\ y =/= 0 ) )
60 reccl
 |-  ( ( y e. CC /\ y =/= 0 ) -> ( 1 / y ) e. CC )
61 59 60 syl
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ y e. ( CC \ { 0 } ) ) -> ( 1 / y ) e. CC )
62 negex
 |-  -u ( 1 / ( y ^ 2 ) ) e. _V
63 62 a1i
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ y e. ( CC \ { 0 } ) ) -> -u ( 1 / ( y ^ 2 ) ) e. _V )
64 simpr
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. CC ) -> x e. CC )
65 41 ad2antlr
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. CC ) -> -u N e. NN0 )
66 64 65 expcld
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. CC ) -> ( x ^ -u N ) e. CC )
67 56 a1i
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. CC ) -> ( -u N x. ( x ^ ( -u N - 1 ) ) ) e. _V )
68 dvexp
 |-  ( -u N e. NN -> ( CC _D ( x e. CC |-> ( x ^ -u N ) ) ) = ( x e. CC |-> ( -u N x. ( x ^ ( -u N - 1 ) ) ) ) )
69 68 adantl
 |-  ( ( N e. RR /\ -u N e. NN ) -> ( CC _D ( x e. CC |-> ( x ^ -u N ) ) ) = ( x e. CC |-> ( -u N x. ( x ^ ( -u N - 1 ) ) ) ) )
70 difssd
 |-  ( ( N e. RR /\ -u N e. NN ) -> ( CC \ { 0 } ) C_ CC )
71 15 a1i
 |-  ( ( N e. RR /\ -u N e. NN ) -> ( CC \ { 0 } ) e. ( TopOpen ` CCfld ) )
72 47 66 67 69 70 14 12 71 dvmptres
 |-  ( ( N e. RR /\ -u N e. NN ) -> ( CC _D ( x e. ( CC \ { 0 } ) |-> ( x ^ -u N ) ) ) = ( x e. ( CC \ { 0 } ) |-> ( -u N x. ( x ^ ( -u N - 1 ) ) ) ) )
73 ax-1cn
 |-  1 e. CC
74 dvrec
 |-  ( 1 e. CC -> ( CC _D ( y e. ( CC \ { 0 } ) |-> ( 1 / y ) ) ) = ( y e. ( CC \ { 0 } ) |-> -u ( 1 / ( y ^ 2 ) ) ) )
75 73 74 mp1i
 |-  ( ( N e. RR /\ -u N e. NN ) -> ( CC _D ( y e. ( CC \ { 0 } ) |-> ( 1 / y ) ) ) = ( y e. ( CC \ { 0 } ) |-> -u ( 1 / ( y ^ 2 ) ) ) )
76 oveq2
 |-  ( y = ( x ^ -u N ) -> ( 1 / y ) = ( 1 / ( x ^ -u N ) ) )
77 oveq1
 |-  ( y = ( x ^ -u N ) -> ( y ^ 2 ) = ( ( x ^ -u N ) ^ 2 ) )
78 77 oveq2d
 |-  ( y = ( x ^ -u N ) -> ( 1 / ( y ^ 2 ) ) = ( 1 / ( ( x ^ -u N ) ^ 2 ) ) )
79 78 negeqd
 |-  ( y = ( x ^ -u N ) -> -u ( 1 / ( y ^ 2 ) ) = -u ( 1 / ( ( x ^ -u N ) ^ 2 ) ) )
80 47 47 55 57 61 63 72 75 76 79 dvmptco
 |-  ( ( N e. RR /\ -u N e. NN ) -> ( CC _D ( x e. ( CC \ { 0 } ) |-> ( 1 / ( x ^ -u N ) ) ) ) = ( x e. ( CC \ { 0 } ) |-> ( -u ( 1 / ( ( x ^ -u N ) ^ 2 ) ) x. ( -u N x. ( x ^ ( -u N - 1 ) ) ) ) ) )
81 2z
 |-  2 e. ZZ
82 81 a1i
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> 2 e. ZZ )
83 expmulz
 |-  ( ( ( x e. CC /\ x =/= 0 ) /\ ( -u N e. ZZ /\ 2 e. ZZ ) ) -> ( x ^ ( -u N x. 2 ) ) = ( ( x ^ -u N ) ^ 2 ) )
84 38 49 51 82 83 syl22anc
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( x ^ ( -u N x. 2 ) ) = ( ( x ^ -u N ) ^ 2 ) )
85 84 eqcomd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( ( x ^ -u N ) ^ 2 ) = ( x ^ ( -u N x. 2 ) ) )
86 85 oveq2d
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( 1 / ( ( x ^ -u N ) ^ 2 ) ) = ( 1 / ( x ^ ( -u N x. 2 ) ) ) )
87 86 negeqd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> -u ( 1 / ( ( x ^ -u N ) ^ 2 ) ) = -u ( 1 / ( x ^ ( -u N x. 2 ) ) ) )
88 peano2zm
 |-  ( -u N e. ZZ -> ( -u N - 1 ) e. ZZ )
89 51 88 syl
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( -u N - 1 ) e. ZZ )
90 38 49 89 expclzd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( x ^ ( -u N - 1 ) ) e. CC )
91 40 90 mulneg1d
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( -u N x. ( x ^ ( -u N - 1 ) ) ) = -u ( N x. ( x ^ ( -u N - 1 ) ) ) )
92 87 91 oveq12d
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( -u ( 1 / ( ( x ^ -u N ) ^ 2 ) ) x. ( -u N x. ( x ^ ( -u N - 1 ) ) ) ) = ( -u ( 1 / ( x ^ ( -u N x. 2 ) ) ) x. -u ( N x. ( x ^ ( -u N - 1 ) ) ) ) )
93 zmulcl
 |-  ( ( -u N e. ZZ /\ 2 e. ZZ ) -> ( -u N x. 2 ) e. ZZ )
94 51 81 93 sylancl
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( -u N x. 2 ) e. ZZ )
95 38 49 94 expclzd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( x ^ ( -u N x. 2 ) ) e. CC )
96 38 49 94 expne0d
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( x ^ ( -u N x. 2 ) ) =/= 0 )
97 95 96 reccld
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( 1 / ( x ^ ( -u N x. 2 ) ) ) e. CC )
98 40 90 mulcld
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( N x. ( x ^ ( -u N - 1 ) ) ) e. CC )
99 97 98 mul2negd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( -u ( 1 / ( x ^ ( -u N x. 2 ) ) ) x. -u ( N x. ( x ^ ( -u N - 1 ) ) ) ) = ( ( 1 / ( x ^ ( -u N x. 2 ) ) ) x. ( N x. ( x ^ ( -u N - 1 ) ) ) ) )
100 97 40 90 mul12d
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( ( 1 / ( x ^ ( -u N x. 2 ) ) ) x. ( N x. ( x ^ ( -u N - 1 ) ) ) ) = ( N x. ( ( 1 / ( x ^ ( -u N x. 2 ) ) ) x. ( x ^ ( -u N - 1 ) ) ) ) )
101 38 49 94 89 expsubd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( x ^ ( ( -u N - 1 ) - ( -u N x. 2 ) ) ) = ( ( x ^ ( -u N - 1 ) ) / ( x ^ ( -u N x. 2 ) ) ) )
102 nncn
 |-  ( -u N e. NN -> -u N e. CC )
103 102 ad2antlr
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> -u N e. CC )
104 73 a1i
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> 1 e. CC )
105 94 zcnd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( -u N x. 2 ) e. CC )
106 103 104 105 sub32d
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( ( -u N - 1 ) - ( -u N x. 2 ) ) = ( ( -u N - ( -u N x. 2 ) ) - 1 ) )
107 103 times2d
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( -u N x. 2 ) = ( -u N + -u N ) )
108 103 40 negsubd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( -u N + -u N ) = ( -u N - N ) )
109 107 108 eqtrd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( -u N x. 2 ) = ( -u N - N ) )
110 109 oveq2d
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( -u N - ( -u N x. 2 ) ) = ( -u N - ( -u N - N ) ) )
111 103 40 nncand
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( -u N - ( -u N - N ) ) = N )
112 110 111 eqtrd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( -u N - ( -u N x. 2 ) ) = N )
113 112 oveq1d
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( ( -u N - ( -u N x. 2 ) ) - 1 ) = ( N - 1 ) )
114 106 113 eqtrd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( ( -u N - 1 ) - ( -u N x. 2 ) ) = ( N - 1 ) )
115 114 oveq2d
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( x ^ ( ( -u N - 1 ) - ( -u N x. 2 ) ) ) = ( x ^ ( N - 1 ) ) )
116 90 95 96 divrec2d
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( ( x ^ ( -u N - 1 ) ) / ( x ^ ( -u N x. 2 ) ) ) = ( ( 1 / ( x ^ ( -u N x. 2 ) ) ) x. ( x ^ ( -u N - 1 ) ) ) )
117 101 115 116 3eqtr3rd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( ( 1 / ( x ^ ( -u N x. 2 ) ) ) x. ( x ^ ( -u N - 1 ) ) ) = ( x ^ ( N - 1 ) ) )
118 117 oveq2d
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( N x. ( ( 1 / ( x ^ ( -u N x. 2 ) ) ) x. ( x ^ ( -u N - 1 ) ) ) ) = ( N x. ( x ^ ( N - 1 ) ) ) )
119 100 118 eqtrd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( ( 1 / ( x ^ ( -u N x. 2 ) ) ) x. ( N x. ( x ^ ( -u N - 1 ) ) ) ) = ( N x. ( x ^ ( N - 1 ) ) ) )
120 92 99 119 3eqtrd
 |-  ( ( ( N e. RR /\ -u N e. NN ) /\ x e. ( CC \ { 0 } ) ) -> ( -u ( 1 / ( ( x ^ -u N ) ^ 2 ) ) x. ( -u N x. ( x ^ ( -u N - 1 ) ) ) ) = ( N x. ( x ^ ( N - 1 ) ) ) )
121 120 mpteq2dva
 |-  ( ( N e. RR /\ -u N e. NN ) -> ( x e. ( CC \ { 0 } ) |-> ( -u ( 1 / ( ( x ^ -u N ) ^ 2 ) ) x. ( -u N x. ( x ^ ( -u N - 1 ) ) ) ) ) = ( x e. ( CC \ { 0 } ) |-> ( N x. ( x ^ ( N - 1 ) ) ) ) )
122 46 80 121 3eqtrd
 |-  ( ( N e. RR /\ -u N e. NN ) -> ( CC _D ( x e. ( CC \ { 0 } ) |-> ( x ^ N ) ) ) = ( x e. ( CC \ { 0 } ) |-> ( N x. ( x ^ ( N - 1 ) ) ) ) )
123 36 122 jaoi
 |-  ( ( N e. NN0 \/ ( N e. RR /\ -u N e. NN ) ) -> ( CC _D ( x e. ( CC \ { 0 } ) |-> ( x ^ N ) ) ) = ( x e. ( CC \ { 0 } ) |-> ( N x. ( x ^ ( N - 1 ) ) ) ) )
124 1 123 sylbi
 |-  ( N e. ZZ -> ( CC _D ( x e. ( CC \ { 0 } ) |-> ( x ^ N ) ) ) = ( x e. ( CC \ { 0 } ) |-> ( N x. ( x ^ ( N - 1 ) ) ) ) )