MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  cxpeq Structured version   Visualization version   GIF version

Theorem cxpeq 26254
Description: Solve an equation involving an ๐‘-th power. The expression -1โ†‘๐‘(2 / ๐‘) = exp(2ฯ€i / ๐‘) is a way to write the primitive ๐‘-th root of unity with the smallest positive argument. (Contributed by Mario Carneiro, 23-Apr-2015.)
Assertion
Ref Expression
cxpeq ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ ((๐ดโ†‘๐‘) = ๐ต โ†” โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))))
Distinct variable groups:   ๐ด,๐‘›   ๐ต,๐‘›   ๐‘›,๐‘

Proof of Theorem cxpeq
Dummy variable ๐‘š is distinct from all other variables.
StepHypRef Expression
1 simpl2 1192 . . . . . . . 8 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ ๐‘ โˆˆ โ„•)
2 nnm1nn0 12509 . . . . . . . 8 (๐‘ โˆˆ โ„• โ†’ (๐‘ โˆ’ 1) โˆˆ โ„•0)
31, 2syl 17 . . . . . . 7 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ (๐‘ โˆ’ 1) โˆˆ โ„•0)
4 nn0uz 12860 . . . . . . 7 โ„•0 = (โ„คโ‰ฅโ€˜0)
53, 4eleqtrdi 2843 . . . . . 6 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ (๐‘ โˆ’ 1) โˆˆ (โ„คโ‰ฅโ€˜0))
6 eluzfz1 13504 . . . . . 6 ((๐‘ โˆ’ 1) โˆˆ (โ„คโ‰ฅโ€˜0) โ†’ 0 โˆˆ (0...(๐‘ โˆ’ 1)))
75, 6syl 17 . . . . 5 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ 0 โˆˆ (0...(๐‘ โˆ’ 1)))
8 neg1cn 12322 . . . . . . . . . 10 -1 โˆˆ โ„‚
9 2re 12282 . . . . . . . . . . . 12 2 โˆˆ โ„
10 simp2 1137 . . . . . . . . . . . 12 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ ๐‘ โˆˆ โ„•)
11 nndivre 12249 . . . . . . . . . . . 12 ((2 โˆˆ โ„ โˆง ๐‘ โˆˆ โ„•) โ†’ (2 / ๐‘) โˆˆ โ„)
129, 10, 11sylancr 587 . . . . . . . . . . 11 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ (2 / ๐‘) โˆˆ โ„)
1312recnd 11238 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ (2 / ๐‘) โˆˆ โ„‚)
14 cxpcl 26173 . . . . . . . . . 10 ((-1 โˆˆ โ„‚ โˆง (2 / ๐‘) โˆˆ โ„‚) โ†’ (-1โ†‘๐‘(2 / ๐‘)) โˆˆ โ„‚)
158, 13, 14sylancr 587 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ (-1โ†‘๐‘(2 / ๐‘)) โˆˆ โ„‚)
1615adantr 481 . . . . . . . 8 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ (-1โ†‘๐‘(2 / ๐‘)) โˆˆ โ„‚)
17 0nn0 12483 . . . . . . . 8 0 โˆˆ โ„•0
18 expcl 14041 . . . . . . . 8 (((-1โ†‘๐‘(2 / ๐‘)) โˆˆ โ„‚ โˆง 0 โˆˆ โ„•0) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘0) โˆˆ โ„‚)
1916, 17, 18sylancl 586 . . . . . . 7 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘0) โˆˆ โ„‚)
2019mul02d 11408 . . . . . 6 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ (0 ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘0)) = 0)
21 simprl 769 . . . . . . . . . . 11 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ ๐ด = 0)
2221oveq1d 7420 . . . . . . . . . 10 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ (๐ดโ†‘๐‘) = (0โ†‘๐‘))
23 simprr 771 . . . . . . . . . 10 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ (๐ดโ†‘๐‘) = ๐ต)
2410expd 14100 . . . . . . . . . 10 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ (0โ†‘๐‘) = 0)
2522, 23, 243eqtr3d 2780 . . . . . . . . 9 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ ๐ต = 0)
2625oveq1d 7420 . . . . . . . 8 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ (๐ตโ†‘๐‘(1 / ๐‘)) = (0โ†‘๐‘(1 / ๐‘)))
27 nncn 12216 . . . . . . . . . 10 (๐‘ โˆˆ โ„• โ†’ ๐‘ โˆˆ โ„‚)
28 nnne0 12242 . . . . . . . . . 10 (๐‘ โˆˆ โ„• โ†’ ๐‘ โ‰  0)
29 reccl 11875 . . . . . . . . . . 11 ((๐‘ โˆˆ โ„‚ โˆง ๐‘ โ‰  0) โ†’ (1 / ๐‘) โˆˆ โ„‚)
30 recne0 11881 . . . . . . . . . . 11 ((๐‘ โˆˆ โ„‚ โˆง ๐‘ โ‰  0) โ†’ (1 / ๐‘) โ‰  0)
3129, 300cxpd 26209 . . . . . . . . . 10 ((๐‘ โˆˆ โ„‚ โˆง ๐‘ โ‰  0) โ†’ (0โ†‘๐‘(1 / ๐‘)) = 0)
3227, 28, 31syl2anc 584 . . . . . . . . 9 (๐‘ โˆˆ โ„• โ†’ (0โ†‘๐‘(1 / ๐‘)) = 0)
331, 32syl 17 . . . . . . . 8 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ (0โ†‘๐‘(1 / ๐‘)) = 0)
3426, 33eqtrd 2772 . . . . . . 7 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ (๐ตโ†‘๐‘(1 / ๐‘)) = 0)
3534oveq1d 7420 . . . . . 6 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘0)) = (0 ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘0)))
3620, 35, 213eqtr4rd 2783 . . . . 5 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ ๐ด = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘0)))
37 oveq2 7413 . . . . . . 7 (๐‘› = 0 โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›) = ((-1โ†‘๐‘(2 / ๐‘))โ†‘0))
3837oveq2d 7421 . . . . . 6 (๐‘› = 0 โ†’ ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)) = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘0)))
3938rspceeqv 3632 . . . . 5 ((0 โˆˆ (0...(๐‘ โˆ’ 1)) โˆง ๐ด = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘0))) โ†’ โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)))
407, 36, 39syl2anc 584 . . . 4 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง (๐ด = 0 โˆง (๐ดโ†‘๐‘) = ๐ต)) โ†’ โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)))
4140expr 457 . . 3 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด = 0) โ†’ ((๐ดโ†‘๐‘) = ๐ต โ†’ โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))))
42 simpl1 1191 . . . . . . . 8 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ ๐ด โˆˆ โ„‚)
43 simpr 485 . . . . . . . 8 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ ๐ด โ‰  0)
44 simpl2 1192 . . . . . . . . 9 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ ๐‘ โˆˆ โ„•)
4544nnzd 12581 . . . . . . . 8 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ ๐‘ โˆˆ โ„ค)
46 explog 26093 . . . . . . . 8 ((๐ด โˆˆ โ„‚ โˆง ๐ด โ‰  0 โˆง ๐‘ โˆˆ โ„ค) โ†’ (๐ดโ†‘๐‘) = (expโ€˜(๐‘ ยท (logโ€˜๐ด))))
4742, 43, 45, 46syl3anc 1371 . . . . . . 7 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ (๐ดโ†‘๐‘) = (expโ€˜(๐‘ ยท (logโ€˜๐ด))))
4847eqcomd 2738 . . . . . 6 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ (expโ€˜(๐‘ ยท (logโ€˜๐ด))) = (๐ดโ†‘๐‘))
4910nncnd 12224 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ ๐‘ โˆˆ โ„‚)
5049adantr 481 . . . . . . . 8 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ ๐‘ โˆˆ โ„‚)
5142, 43logcld 26070 . . . . . . . 8 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ (logโ€˜๐ด) โˆˆ โ„‚)
5250, 51mulcld 11230 . . . . . . 7 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ (๐‘ ยท (logโ€˜๐ด)) โˆˆ โ„‚)
5344nnnn0d 12528 . . . . . . . 8 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ ๐‘ โˆˆ โ„•0)
5442, 53expcld 14107 . . . . . . 7 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ (๐ดโ†‘๐‘) โˆˆ โ„‚)
5542, 43, 45expne0d 14113 . . . . . . 7 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ (๐ดโ†‘๐‘) โ‰  0)
56 eflogeq 26101 . . . . . . 7 (((๐‘ ยท (logโ€˜๐ด)) โˆˆ โ„‚ โˆง (๐ดโ†‘๐‘) โˆˆ โ„‚ โˆง (๐ดโ†‘๐‘) โ‰  0) โ†’ ((expโ€˜(๐‘ ยท (logโ€˜๐ด))) = (๐ดโ†‘๐‘) โ†” โˆƒ๐‘š โˆˆ โ„ค (๐‘ ยท (logโ€˜๐ด)) = ((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š))))
5752, 54, 55, 56syl3anc 1371 . . . . . 6 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ ((expโ€˜(๐‘ ยท (logโ€˜๐ด))) = (๐ดโ†‘๐‘) โ†” โˆƒ๐‘š โˆˆ โ„ค (๐‘ ยท (logโ€˜๐ด)) = ((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š))))
5848, 57mpbid 231 . . . . 5 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ โˆƒ๐‘š โˆˆ โ„ค (๐‘ ยท (logโ€˜๐ด)) = ((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š)))
5954, 55logcld 26070 . . . . . . . . . 10 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ (logโ€˜(๐ดโ†‘๐‘)) โˆˆ โ„‚)
6059adantr 481 . . . . . . . . 9 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (logโ€˜(๐ดโ†‘๐‘)) โˆˆ โ„‚)
61 ax-icn 11165 . . . . . . . . . . 11 i โˆˆ โ„‚
62 2cn 12283 . . . . . . . . . . . 12 2 โˆˆ โ„‚
63 picn 25960 . . . . . . . . . . . 12 ฯ€ โˆˆ โ„‚
6462, 63mulcli 11217 . . . . . . . . . . 11 (2 ยท ฯ€) โˆˆ โ„‚
6561, 64mulcli 11217 . . . . . . . . . 10 (i ยท (2 ยท ฯ€)) โˆˆ โ„‚
66 zcn 12559 . . . . . . . . . . 11 (๐‘š โˆˆ โ„ค โ†’ ๐‘š โˆˆ โ„‚)
6766adantl 482 . . . . . . . . . 10 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ๐‘š โˆˆ โ„‚)
68 mulcl 11190 . . . . . . . . . 10 (((i ยท (2 ยท ฯ€)) โˆˆ โ„‚ โˆง ๐‘š โˆˆ โ„‚) โ†’ ((i ยท (2 ยท ฯ€)) ยท ๐‘š) โˆˆ โ„‚)
6965, 67, 68sylancr 587 . . . . . . . . 9 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((i ยท (2 ยท ฯ€)) ยท ๐‘š) โˆˆ โ„‚)
7060, 69addcld 11229 . . . . . . . 8 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š)) โˆˆ โ„‚)
7150adantr 481 . . . . . . . 8 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ๐‘ โˆˆ โ„‚)
7251adantr 481 . . . . . . . 8 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (logโ€˜๐ด) โˆˆ โ„‚)
7310nnne0d 12258 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ ๐‘ โ‰  0)
7473ad2antrr 724 . . . . . . . 8 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ๐‘ โ‰  0)
7570, 71, 72, 74divmuld 12008 . . . . . . 7 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š)) / ๐‘) = (logโ€˜๐ด) โ†” (๐‘ ยท (logโ€˜๐ด)) = ((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š))))
76 fveq2 6888 . . . . . . . 8 ((((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š)) / ๐‘) = (logโ€˜๐ด) โ†’ (expโ€˜(((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š)) / ๐‘)) = (expโ€˜(logโ€˜๐ด)))
7771, 74reccld 11979 . . . . . . . . . . . . 13 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (1 / ๐‘) โˆˆ โ„‚)
7877, 60mulcld 11230 . . . . . . . . . . . 12 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((1 / ๐‘) ยท (logโ€˜(๐ดโ†‘๐‘))) โˆˆ โ„‚)
7913ad2antrr 724 . . . . . . . . . . . . . 14 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (2 / ๐‘) โˆˆ โ„‚)
8079, 67mulcld 11230 . . . . . . . . . . . . 13 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((2 / ๐‘) ยท ๐‘š) โˆˆ โ„‚)
8161, 63mulcli 11217 . . . . . . . . . . . . 13 (i ยท ฯ€) โˆˆ โ„‚
82 mulcl 11190 . . . . . . . . . . . . 13 ((((2 / ๐‘) ยท ๐‘š) โˆˆ โ„‚ โˆง (i ยท ฯ€) โˆˆ โ„‚) โ†’ (((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€)) โˆˆ โ„‚)
8380, 81, 82sylancl 586 . . . . . . . . . . . 12 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€)) โˆˆ โ„‚)
84 efadd 16033 . . . . . . . . . . . 12 ((((1 / ๐‘) ยท (logโ€˜(๐ดโ†‘๐‘))) โˆˆ โ„‚ โˆง (((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€)) โˆˆ โ„‚) โ†’ (expโ€˜(((1 / ๐‘) ยท (logโ€˜(๐ดโ†‘๐‘))) + (((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€)))) = ((expโ€˜((1 / ๐‘) ยท (logโ€˜(๐ดโ†‘๐‘)))) ยท (expโ€˜(((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€)))))
8578, 83, 84syl2anc 584 . . . . . . . . . . 11 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (expโ€˜(((1 / ๐‘) ยท (logโ€˜(๐ดโ†‘๐‘))) + (((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€)))) = ((expโ€˜((1 / ๐‘) ยท (logโ€˜(๐ดโ†‘๐‘)))) ยท (expโ€˜(((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€)))))
8660, 69, 71, 74divdird 12024 . . . . . . . . . . . . 13 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š)) / ๐‘) = (((logโ€˜(๐ดโ†‘๐‘)) / ๐‘) + (((i ยท (2 ยท ฯ€)) ยท ๐‘š) / ๐‘)))
8760, 71, 74divrec2d 11990 . . . . . . . . . . . . . 14 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((logโ€˜(๐ดโ†‘๐‘)) / ๐‘) = ((1 / ๐‘) ยท (logโ€˜(๐ดโ†‘๐‘))))
8865a1i 11 . . . . . . . . . . . . . . . 16 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (i ยท (2 ยท ฯ€)) โˆˆ โ„‚)
8988, 67, 71, 74div23d 12023 . . . . . . . . . . . . . . 15 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (((i ยท (2 ยท ฯ€)) ยท ๐‘š) / ๐‘) = (((i ยท (2 ยท ฯ€)) / ๐‘) ยท ๐‘š))
9061, 62, 63mul12i 11405 . . . . . . . . . . . . . . . . . 18 (i ยท (2 ยท ฯ€)) = (2 ยท (i ยท ฯ€))
9190oveq1i 7415 . . . . . . . . . . . . . . . . 17 ((i ยท (2 ยท ฯ€)) / ๐‘) = ((2 ยท (i ยท ฯ€)) / ๐‘)
9262a1i 11 . . . . . . . . . . . . . . . . . 18 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ 2 โˆˆ โ„‚)
9381a1i 11 . . . . . . . . . . . . . . . . . 18 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (i ยท ฯ€) โˆˆ โ„‚)
9492, 93, 71, 74div23d 12023 . . . . . . . . . . . . . . . . 17 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((2 ยท (i ยท ฯ€)) / ๐‘) = ((2 / ๐‘) ยท (i ยท ฯ€)))
9591, 94eqtrid 2784 . . . . . . . . . . . . . . . 16 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((i ยท (2 ยท ฯ€)) / ๐‘) = ((2 / ๐‘) ยท (i ยท ฯ€)))
9695oveq1d 7420 . . . . . . . . . . . . . . 15 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (((i ยท (2 ยท ฯ€)) / ๐‘) ยท ๐‘š) = (((2 / ๐‘) ยท (i ยท ฯ€)) ยท ๐‘š))
9779, 93, 67mul32d 11420 . . . . . . . . . . . . . . 15 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (((2 / ๐‘) ยท (i ยท ฯ€)) ยท ๐‘š) = (((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€)))
9889, 96, 973eqtrd 2776 . . . . . . . . . . . . . 14 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (((i ยท (2 ยท ฯ€)) ยท ๐‘š) / ๐‘) = (((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€)))
9987, 98oveq12d 7423 . . . . . . . . . . . . 13 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (((logโ€˜(๐ดโ†‘๐‘)) / ๐‘) + (((i ยท (2 ยท ฯ€)) ยท ๐‘š) / ๐‘)) = (((1 / ๐‘) ยท (logโ€˜(๐ดโ†‘๐‘))) + (((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€))))
10086, 99eqtrd 2772 . . . . . . . . . . . 12 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š)) / ๐‘) = (((1 / ๐‘) ยท (logโ€˜(๐ดโ†‘๐‘))) + (((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€))))
101100fveq2d 6892 . . . . . . . . . . 11 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (expโ€˜(((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š)) / ๐‘)) = (expโ€˜(((1 / ๐‘) ยท (logโ€˜(๐ดโ†‘๐‘))) + (((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€)))))
10254adantr 481 . . . . . . . . . . . . 13 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (๐ดโ†‘๐‘) โˆˆ โ„‚)
10355adantr 481 . . . . . . . . . . . . 13 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (๐ดโ†‘๐‘) โ‰  0)
104102, 103, 77cxpefd 26211 . . . . . . . . . . . 12 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) = (expโ€˜((1 / ๐‘) ยท (logโ€˜(๐ดโ†‘๐‘)))))
1058a1i 11 . . . . . . . . . . . . . 14 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ -1 โˆˆ โ„‚)
106 neg1ne0 12324 . . . . . . . . . . . . . . 15 -1 โ‰  0
107106a1i 11 . . . . . . . . . . . . . 14 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ -1 โ‰  0)
108 simpr 485 . . . . . . . . . . . . . 14 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ๐‘š โˆˆ โ„ค)
109105, 107, 79, 108cxpmul2zd 26215 . . . . . . . . . . . . 13 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (-1โ†‘๐‘((2 / ๐‘) ยท ๐‘š)) = ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘š))
110105, 107, 80cxpefd 26211 . . . . . . . . . . . . . 14 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (-1โ†‘๐‘((2 / ๐‘) ยท ๐‘š)) = (expโ€˜(((2 / ๐‘) ยท ๐‘š) ยท (logโ€˜-1))))
111 logm1 26088 . . . . . . . . . . . . . . . 16 (logโ€˜-1) = (i ยท ฯ€)
112111oveq2i 7416 . . . . . . . . . . . . . . 15 (((2 / ๐‘) ยท ๐‘š) ยท (logโ€˜-1)) = (((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€))
113112fveq2i 6891 . . . . . . . . . . . . . 14 (expโ€˜(((2 / ๐‘) ยท ๐‘š) ยท (logโ€˜-1))) = (expโ€˜(((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€)))
114110, 113eqtrdi 2788 . . . . . . . . . . . . 13 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (-1โ†‘๐‘((2 / ๐‘) ยท ๐‘š)) = (expโ€˜(((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€))))
115105, 79cxpcld 26207 . . . . . . . . . . . . . . 15 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (-1โ†‘๐‘(2 / ๐‘)) โˆˆ โ„‚)
1168a1i 11 . . . . . . . . . . . . . . . . 17 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ -1 โˆˆ โ„‚)
117106a1i 11 . . . . . . . . . . . . . . . . 17 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ -1 โ‰  0)
118116, 117, 13cxpne0d 26212 . . . . . . . . . . . . . . . 16 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ (-1โ†‘๐‘(2 / ๐‘)) โ‰  0)
119118ad2antrr 724 . . . . . . . . . . . . . . 15 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (-1โ†‘๐‘(2 / ๐‘)) โ‰  0)
120115, 119, 108expclzd 14112 . . . . . . . . . . . . . 14 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘š) โˆˆ โ„‚)
12144adantr 481 . . . . . . . . . . . . . . . 16 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ๐‘ โˆˆ โ„•)
122108, 121zmodcld 13853 . . . . . . . . . . . . . . 15 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (๐‘š mod ๐‘) โˆˆ โ„•0)
123115, 122expcld 14107 . . . . . . . . . . . . . 14 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘)) โˆˆ โ„‚)
124122nn0zd 12580 . . . . . . . . . . . . . . 15 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (๐‘š mod ๐‘) โˆˆ โ„ค)
125115, 119, 124expne0d 14113 . . . . . . . . . . . . . 14 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘)) โ‰  0)
126115, 119, 124, 108expsubd 14118 . . . . . . . . . . . . . . 15 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š โˆ’ (๐‘š mod ๐‘))) = (((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘š) / ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘))))
127121nnzd 12581 . . . . . . . . . . . . . . . . 17 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ๐‘ โˆˆ โ„ค)
128 zre 12558 . . . . . . . . . . . . . . . . . 18 (๐‘š โˆˆ โ„ค โ†’ ๐‘š โˆˆ โ„)
129121nnrpd 13010 . . . . . . . . . . . . . . . . . 18 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ๐‘ โˆˆ โ„+)
130 moddifz 13844 . . . . . . . . . . . . . . . . . 18 ((๐‘š โˆˆ โ„ โˆง ๐‘ โˆˆ โ„+) โ†’ ((๐‘š โˆ’ (๐‘š mod ๐‘)) / ๐‘) โˆˆ โ„ค)
131128, 129, 130syl2an2 684 . . . . . . . . . . . . . . . . 17 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((๐‘š โˆ’ (๐‘š mod ๐‘)) / ๐‘) โˆˆ โ„ค)
132 expmulz 14070 . . . . . . . . . . . . . . . . 17 ((((-1โ†‘๐‘(2 / ๐‘)) โˆˆ โ„‚ โˆง (-1โ†‘๐‘(2 / ๐‘)) โ‰  0) โˆง (๐‘ โˆˆ โ„ค โˆง ((๐‘š โˆ’ (๐‘š mod ๐‘)) / ๐‘) โˆˆ โ„ค)) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘ ยท ((๐‘š โˆ’ (๐‘š mod ๐‘)) / ๐‘))) = (((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘)โ†‘((๐‘š โˆ’ (๐‘š mod ๐‘)) / ๐‘)))
133115, 119, 127, 131, 132syl22anc 837 . . . . . . . . . . . . . . . 16 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘ ยท ((๐‘š โˆ’ (๐‘š mod ๐‘)) / ๐‘))) = (((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘)โ†‘((๐‘š โˆ’ (๐‘š mod ๐‘)) / ๐‘)))
134122nn0cnd 12530 . . . . . . . . . . . . . . . . . . 19 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (๐‘š mod ๐‘) โˆˆ โ„‚)
13567, 134subcld 11567 . . . . . . . . . . . . . . . . . 18 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (๐‘š โˆ’ (๐‘š mod ๐‘)) โˆˆ โ„‚)
136135, 71, 74divcan2d 11988 . . . . . . . . . . . . . . . . 17 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (๐‘ ยท ((๐‘š โˆ’ (๐‘š mod ๐‘)) / ๐‘)) = (๐‘š โˆ’ (๐‘š mod ๐‘)))
137136oveq2d 7421 . . . . . . . . . . . . . . . 16 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘ ยท ((๐‘š โˆ’ (๐‘š mod ๐‘)) / ๐‘))) = ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š โˆ’ (๐‘š mod ๐‘))))
138 root1id 26251 . . . . . . . . . . . . . . . . . . 19 (๐‘ โˆˆ โ„• โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘) = 1)
139121, 138syl 17 . . . . . . . . . . . . . . . . . 18 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘) = 1)
140139oveq1d 7420 . . . . . . . . . . . . . . . . 17 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘)โ†‘((๐‘š โˆ’ (๐‘š mod ๐‘)) / ๐‘)) = (1โ†‘((๐‘š โˆ’ (๐‘š mod ๐‘)) / ๐‘)))
141 1exp 14053 . . . . . . . . . . . . . . . . . 18 (((๐‘š โˆ’ (๐‘š mod ๐‘)) / ๐‘) โˆˆ โ„ค โ†’ (1โ†‘((๐‘š โˆ’ (๐‘š mod ๐‘)) / ๐‘)) = 1)
142131, 141syl 17 . . . . . . . . . . . . . . . . 17 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (1โ†‘((๐‘š โˆ’ (๐‘š mod ๐‘)) / ๐‘)) = 1)
143140, 142eqtrd 2772 . . . . . . . . . . . . . . . 16 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘)โ†‘((๐‘š โˆ’ (๐‘š mod ๐‘)) / ๐‘)) = 1)
144133, 137, 1433eqtr3d 2780 . . . . . . . . . . . . . . 15 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š โˆ’ (๐‘š mod ๐‘))) = 1)
145126, 144eqtr3d 2774 . . . . . . . . . . . . . 14 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘š) / ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘))) = 1)
146120, 123, 125, 145diveq1d 11994 . . . . . . . . . . . . 13 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘š) = ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘)))
147109, 114, 1463eqtr3rd 2781 . . . . . . . . . . . 12 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘)) = (expโ€˜(((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€))))
148104, 147oveq12d 7423 . . . . . . . . . . 11 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘))) = ((expโ€˜((1 / ๐‘) ยท (logโ€˜(๐ดโ†‘๐‘)))) ยท (expโ€˜(((2 / ๐‘) ยท ๐‘š) ยท (i ยท ฯ€)))))
14985, 101, 1483eqtr4d 2782 . . . . . . . . . 10 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (expโ€˜(((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š)) / ๐‘)) = (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘))))
150 eflog 26076 . . . . . . . . . . . 12 ((๐ด โˆˆ โ„‚ โˆง ๐ด โ‰  0) โ†’ (expโ€˜(logโ€˜๐ด)) = ๐ด)
15142, 43, 150syl2anc 584 . . . . . . . . . . 11 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ (expโ€˜(logโ€˜๐ด)) = ๐ด)
152151adantr 481 . . . . . . . . . 10 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (expโ€˜(logโ€˜๐ด)) = ๐ด)
153149, 152eqeq12d 2748 . . . . . . . . 9 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((expโ€˜(((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š)) / ๐‘)) = (expโ€˜(logโ€˜๐ด)) โ†” (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘))) = ๐ด))
154 zmodfz 13854 . . . . . . . . . . 11 ((๐‘š โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„•) โ†’ (๐‘š mod ๐‘) โˆˆ (0...(๐‘ โˆ’ 1)))
155108, 121, 154syl2anc 584 . . . . . . . . . 10 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ (๐‘š mod ๐‘) โˆˆ (0...(๐‘ โˆ’ 1)))
156 eqcom 2739 . . . . . . . . . . . . 13 (๐ด = (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)) โ†” (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)) = ๐ด)
157 oveq2 7413 . . . . . . . . . . . . . . 15 (๐‘› = (๐‘š mod ๐‘) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›) = ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘)))
158157oveq2d 7421 . . . . . . . . . . . . . 14 (๐‘› = (๐‘š mod ๐‘) โ†’ (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)) = (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘))))
159158eqeq1d 2734 . . . . . . . . . . . . 13 (๐‘› = (๐‘š mod ๐‘) โ†’ ((((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)) = ๐ด โ†” (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘))) = ๐ด))
160156, 159bitrid 282 . . . . . . . . . . . 12 (๐‘› = (๐‘š mod ๐‘) โ†’ (๐ด = (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)) โ†” (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘))) = ๐ด))
161160rspcev 3612 . . . . . . . . . . 11 (((๐‘š mod ๐‘) โˆˆ (0...(๐‘ โˆ’ 1)) โˆง (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘))) = ๐ด) โ†’ โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)))
162161ex 413 . . . . . . . . . 10 ((๐‘š mod ๐‘) โˆˆ (0...(๐‘ โˆ’ 1)) โ†’ ((((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘))) = ๐ด โ†’ โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))))
163155, 162syl 17 . . . . . . . . 9 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘š mod ๐‘))) = ๐ด โ†’ โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))))
164153, 163sylbid 239 . . . . . . . 8 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((expโ€˜(((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š)) / ๐‘)) = (expโ€˜(logโ€˜๐ด)) โ†’ โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))))
16576, 164syl5 34 . . . . . . 7 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š)) / ๐‘) = (logโ€˜๐ด) โ†’ โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))))
16675, 165sylbird 259 . . . . . 6 ((((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โˆง ๐‘š โˆˆ โ„ค) โ†’ ((๐‘ ยท (logโ€˜๐ด)) = ((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š)) โ†’ โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))))
167166rexlimdva 3155 . . . . 5 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ (โˆƒ๐‘š โˆˆ โ„ค (๐‘ ยท (logโ€˜๐ด)) = ((logโ€˜(๐ดโ†‘๐‘)) + ((i ยท (2 ยท ฯ€)) ยท ๐‘š)) โ†’ โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))))
16858, 167mpd 15 . . . 4 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)))
169 oveq1 7412 . . . . . . 7 ((๐ดโ†‘๐‘) = ๐ต โ†’ ((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) = (๐ตโ†‘๐‘(1 / ๐‘)))
170169oveq1d 7420 . . . . . 6 ((๐ดโ†‘๐‘) = ๐ต โ†’ (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)) = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)))
171170eqeq2d 2743 . . . . 5 ((๐ดโ†‘๐‘) = ๐ต โ†’ (๐ด = (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)) โ†” ๐ด = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))))
172171rexbidv 3178 . . . 4 ((๐ดโ†‘๐‘) = ๐ต โ†’ (โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = (((๐ดโ†‘๐‘)โ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)) โ†” โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))))
173168, 172syl5ibcom 244 . . 3 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐ด โ‰  0) โ†’ ((๐ดโ†‘๐‘) = ๐ต โ†’ โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))))
17441, 173pm2.61dane 3029 . 2 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ ((๐ดโ†‘๐‘) = ๐ต โ†’ โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))))
175 simp3 1138 . . . . . . . 8 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ ๐ต โˆˆ โ„‚)
176 nnrecre 12250 . . . . . . . . . 10 (๐‘ โˆˆ โ„• โ†’ (1 / ๐‘) โˆˆ โ„)
1771763ad2ant2 1134 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ (1 / ๐‘) โˆˆ โ„)
178177recnd 11238 . . . . . . . 8 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ (1 / ๐‘) โˆˆ โ„‚)
179175, 178cxpcld 26207 . . . . . . 7 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ (๐ตโ†‘๐‘(1 / ๐‘)) โˆˆ โ„‚)
180179adantr 481 . . . . . 6 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ (๐ตโ†‘๐‘(1 / ๐‘)) โˆˆ โ„‚)
181 elfznn0 13590 . . . . . . 7 (๐‘› โˆˆ (0...(๐‘ โˆ’ 1)) โ†’ ๐‘› โˆˆ โ„•0)
182 expcl 14041 . . . . . . 7 (((-1โ†‘๐‘(2 / ๐‘)) โˆˆ โ„‚ โˆง ๐‘› โˆˆ โ„•0) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›) โˆˆ โ„‚)
18315, 181, 182syl2an 596 . . . . . 6 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›) โˆˆ โ„‚)
18410adantr 481 . . . . . . 7 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ ๐‘ โˆˆ โ„•)
185184nnnn0d 12528 . . . . . 6 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ ๐‘ โˆˆ โ„•0)
186180, 183, 185mulexpd 14122 . . . . 5 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ (((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))โ†‘๐‘) = (((๐ตโ†‘๐‘(1 / ๐‘))โ†‘๐‘) ยท (((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)โ†‘๐‘)))
187175adantr 481 . . . . . . 7 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ ๐ต โˆˆ โ„‚)
188 cxproot 26189 . . . . . . 7 ((๐ต โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„•) โ†’ ((๐ตโ†‘๐‘(1 / ๐‘))โ†‘๐‘) = ๐ต)
189187, 184, 188syl2anc 584 . . . . . 6 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ ((๐ตโ†‘๐‘(1 / ๐‘))โ†‘๐‘) = ๐ต)
190181adantl 482 . . . . . . . . . . 11 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ ๐‘› โˆˆ โ„•0)
191190nn0cnd 12530 . . . . . . . . . 10 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ ๐‘› โˆˆ โ„‚)
192184nncnd 12224 . . . . . . . . . 10 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ ๐‘ โˆˆ โ„‚)
193191, 192mulcomd 11231 . . . . . . . . 9 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ (๐‘› ยท ๐‘) = (๐‘ ยท ๐‘›))
194193oveq2d 7421 . . . . . . . 8 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘› ยท ๐‘)) = ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘ ยท ๐‘›)))
19515adantr 481 . . . . . . . . 9 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ (-1โ†‘๐‘(2 / ๐‘)) โˆˆ โ„‚)
196195, 185, 190expmuld 14110 . . . . . . . 8 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘› ยท ๐‘)) = (((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)โ†‘๐‘))
197195, 190, 185expmuld 14110 . . . . . . . 8 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘(๐‘ ยท ๐‘›)) = (((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘)โ†‘๐‘›))
198194, 196, 1973eqtr3d 2780 . . . . . . 7 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ (((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)โ†‘๐‘) = (((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘)โ†‘๐‘›))
199184, 138syl 17 . . . . . . . 8 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘) = 1)
200199oveq1d 7420 . . . . . . 7 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ (((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘)โ†‘๐‘›) = (1โ†‘๐‘›))
201 elfzelz 13497 . . . . . . . . 9 (๐‘› โˆˆ (0...(๐‘ โˆ’ 1)) โ†’ ๐‘› โˆˆ โ„ค)
202201adantl 482 . . . . . . . 8 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ ๐‘› โˆˆ โ„ค)
203 1exp 14053 . . . . . . . 8 (๐‘› โˆˆ โ„ค โ†’ (1โ†‘๐‘›) = 1)
204202, 203syl 17 . . . . . . 7 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ (1โ†‘๐‘›) = 1)
205198, 200, 2043eqtrd 2776 . . . . . 6 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ (((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)โ†‘๐‘) = 1)
206189, 205oveq12d 7423 . . . . 5 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ (((๐ตโ†‘๐‘(1 / ๐‘))โ†‘๐‘) ยท (((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)โ†‘๐‘)) = (๐ต ยท 1))
207187mulridd 11227 . . . . 5 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ (๐ต ยท 1) = ๐ต)
208186, 206, 2073eqtrd 2776 . . . 4 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ (((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))โ†‘๐‘) = ๐ต)
209 oveq1 7412 . . . . 5 (๐ด = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)) โ†’ (๐ดโ†‘๐‘) = (((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))โ†‘๐‘))
210209eqeq1d 2734 . . . 4 (๐ด = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)) โ†’ ((๐ดโ†‘๐‘) = ๐ต โ†” (((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))โ†‘๐‘) = ๐ต))
211208, 210syl5ibrcom 246 . . 3 (((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โˆง ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))) โ†’ (๐ด = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)) โ†’ (๐ดโ†‘๐‘) = ๐ต))
212211rexlimdva 3155 . 2 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ (โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›)) โ†’ (๐ดโ†‘๐‘) = ๐ต))
213174, 212impbid 211 1 ((๐ด โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„• โˆง ๐ต โˆˆ โ„‚) โ†’ ((๐ดโ†‘๐‘) = ๐ต โ†” โˆƒ๐‘› โˆˆ (0...(๐‘ โˆ’ 1))๐ด = ((๐ตโ†‘๐‘(1 / ๐‘)) ยท ((-1โ†‘๐‘(2 / ๐‘))โ†‘๐‘›))))
Colors of variables: wff setvar class
Syntax hints:   โ†’ wi 4   โ†” wb 205   โˆง wa 396   โˆง w3a 1087   = wceq 1541   โˆˆ wcel 2106   โ‰  wne 2940  โˆƒwrex 3070  โ€˜cfv 6540  (class class class)co 7405  โ„‚cc 11104  โ„cr 11105  0cc0 11106  1c1 11107  ici 11108   + caddc 11109   ยท cmul 11111   โˆ’ cmin 11440  -cneg 11441   / cdiv 11867  โ„•cn 12208  2c2 12263  โ„•0cn0 12468  โ„คcz 12554  โ„คโ‰ฅcuz 12818  โ„+crp 12970  ...cfz 13480   mod cmo 13830  โ†‘cexp 14023  expce 16001  ฯ€cpi 16006  logclog 26054  โ†‘๐‘ccxp 26055
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2703  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7721  ax-inf2 9632  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184  ax-addf 11185  ax-mulf 11186
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3376  df-reu 3377  df-rab 3433  df-v 3476  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-tp 4632  df-op 4634  df-uni 4908  df-int 4950  df-iun 4998  df-iin 4999  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-se 5631  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6297  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7361  df-ov 7408  df-oprab 7409  df-mpo 7410  df-of 7666  df-om 7852  df-1st 7971  df-2nd 7972  df-supp 8143  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-1o 8462  df-2o 8463  df-er 8699  df-map 8818  df-pm 8819  df-ixp 8888  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-fsupp 9358  df-fi 9402  df-sup 9433  df-inf 9434  df-oi 9501  df-card 9930  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-div 11868  df-nn 12209  df-2 12271  df-3 12272  df-4 12273  df-5 12274  df-6 12275  df-7 12276  df-8 12277  df-9 12278  df-n0 12469  df-z 12555  df-dec 12674  df-uz 12819  df-q 12929  df-rp 12971  df-xneg 13088  df-xadd 13089  df-xmul 13090  df-ioo 13324  df-ioc 13325  df-ico 13326  df-icc 13327  df-fz 13481  df-fzo 13624  df-fl 13753  df-mod 13831  df-seq 13963  df-exp 14024  df-fac 14230  df-bc 14259  df-hash 14287  df-shft 15010  df-cj 15042  df-re 15043  df-im 15044  df-sqrt 15178  df-abs 15179  df-limsup 15411  df-clim 15428  df-rlim 15429  df-sum 15629  df-ef 16007  df-sin 16009  df-cos 16010  df-pi 16012  df-struct 17076  df-sets 17093  df-slot 17111  df-ndx 17123  df-base 17141  df-ress 17170  df-plusg 17206  df-mulr 17207  df-starv 17208  df-sca 17209  df-vsca 17210  df-ip 17211  df-tset 17212  df-ple 17213  df-ds 17215  df-unif 17216  df-hom 17217  df-cco 17218  df-rest 17364  df-topn 17365  df-0g 17383  df-gsum 17384  df-topgen 17385  df-pt 17386  df-prds 17389  df-xrs 17444  df-qtop 17449  df-imas 17450  df-xps 17452  df-mre 17526  df-mrc 17527  df-acs 17529  df-mgm 18557  df-sgrp 18606  df-mnd 18622  df-submnd 18668  df-mulg 18945  df-cntz 19175  df-cmn 19644  df-psmet 20928  df-xmet 20929  df-met 20930  df-bl 20931  df-mopn 20932  df-fbas 20933  df-fg 20934  df-cnfld 20937  df-top 22387  df-topon 22404  df-topsp 22426  df-bases 22440  df-cld 22514  df-ntr 22515  df-cls 22516  df-nei 22593  df-lp 22631  df-perf 22632  df-cn 22722  df-cnp 22723  df-haus 22810  df-tx 23057  df-hmeo 23250  df-fil 23341  df-fm 23433  df-flim 23434  df-flf 23435  df-xms 23817  df-ms 23818  df-tms 23819  df-cncf 24385  df-limc 25374  df-dv 25375  df-log 26056  df-cxp 26057
This theorem is referenced by:  1cubr  26336
  Copyright terms: Public domain W3C validator