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

Theorem tanregt0 26040
Description: The real part of the tangent of a complex number with real part in the open interval (0(,)(ฯ€ / 2)) is positive. (Contributed by Mario Carneiro, 5-Apr-2015.)
Assertion
Ref Expression
tanregt0 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ 0 < (โ„œโ€˜(tanโ€˜๐ด)))

Proof of Theorem tanregt0
StepHypRef Expression
1 ax-1cn 11165 . . . . . . 7 1 โˆˆ โ„‚
2 recl 15054 . . . . . . . . . . 11 (๐ด โˆˆ โ„‚ โ†’ (โ„œโ€˜๐ด) โˆˆ โ„)
32adantr 482 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜๐ด) โˆˆ โ„)
43recnd 11239 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜๐ด) โˆˆ โ„‚)
53rered 15168 . . . . . . . . . . 11 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜(โ„œโ€˜๐ด)) = (โ„œโ€˜๐ด))
6 neghalfpire 25967 . . . . . . . . . . . . . 14 -(ฯ€ / 2) โˆˆ โ„
76rexri 11269 . . . . . . . . . . . . 13 -(ฯ€ / 2) โˆˆ โ„*
8 0re 11213 . . . . . . . . . . . . . 14 0 โˆˆ โ„
9 pirp 25963 . . . . . . . . . . . . . . . 16 ฯ€ โˆˆ โ„+
10 rphalfcl 12998 . . . . . . . . . . . . . . . 16 (ฯ€ โˆˆ โ„+ โ†’ (ฯ€ / 2) โˆˆ โ„+)
11 rpgt0 12983 . . . . . . . . . . . . . . . 16 ((ฯ€ / 2) โˆˆ โ„+ โ†’ 0 < (ฯ€ / 2))
129, 10, 11mp2b 10 . . . . . . . . . . . . . . 15 0 < (ฯ€ / 2)
13 halfpire 25966 . . . . . . . . . . . . . . . 16 (ฯ€ / 2) โˆˆ โ„
14 lt0neg2 11718 . . . . . . . . . . . . . . . 16 ((ฯ€ / 2) โˆˆ โ„ โ†’ (0 < (ฯ€ / 2) โ†” -(ฯ€ / 2) < 0))
1513, 14ax-mp 5 . . . . . . . . . . . . . . 15 (0 < (ฯ€ / 2) โ†” -(ฯ€ / 2) < 0)
1612, 15mpbi 229 . . . . . . . . . . . . . 14 -(ฯ€ / 2) < 0
176, 8, 16ltleii 11334 . . . . . . . . . . . . 13 -(ฯ€ / 2) โ‰ค 0
18 iooss1 13356 . . . . . . . . . . . . 13 ((-(ฯ€ / 2) โˆˆ โ„* โˆง -(ฯ€ / 2) โ‰ค 0) โ†’ (0(,)(ฯ€ / 2)) โŠ† (-(ฯ€ / 2)(,)(ฯ€ / 2)))
197, 17, 18mp2an 691 . . . . . . . . . . . 12 (0(,)(ฯ€ / 2)) โŠ† (-(ฯ€ / 2)(,)(ฯ€ / 2))
20 simpr 486 . . . . . . . . . . . 12 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2)))
2119, 20sselid 3980 . . . . . . . . . . 11 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜๐ด) โˆˆ (-(ฯ€ / 2)(,)(ฯ€ / 2)))
225, 21eqeltrd 2834 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜(โ„œโ€˜๐ด)) โˆˆ (-(ฯ€ / 2)(,)(ฯ€ / 2)))
23 cosne0 26030 . . . . . . . . . 10 (((โ„œโ€˜๐ด) โˆˆ โ„‚ โˆง (โ„œโ€˜(โ„œโ€˜๐ด)) โˆˆ (-(ฯ€ / 2)(,)(ฯ€ / 2))) โ†’ (cosโ€˜(โ„œโ€˜๐ด)) โ‰  0)
244, 22, 23syl2anc 585 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (cosโ€˜(โ„œโ€˜๐ด)) โ‰  0)
254, 24tancld 16072 . . . . . . . 8 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (tanโ€˜(โ„œโ€˜๐ด)) โˆˆ โ„‚)
26 ax-icn 11166 . . . . . . . . . 10 i โˆˆ โ„‚
27 imcl 15055 . . . . . . . . . . . 12 (๐ด โˆˆ โ„‚ โ†’ (โ„‘โ€˜๐ด) โˆˆ โ„)
2827adantr 482 . . . . . . . . . . 11 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„‘โ€˜๐ด) โˆˆ โ„)
2928recnd 11239 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„‘โ€˜๐ด) โˆˆ โ„‚)
30 mulcl 11191 . . . . . . . . . 10 ((i โˆˆ โ„‚ โˆง (โ„‘โ€˜๐ด) โˆˆ โ„‚) โ†’ (i ยท (โ„‘โ€˜๐ด)) โˆˆ โ„‚)
3126, 29, 30sylancr 588 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (i ยท (โ„‘โ€˜๐ด)) โˆˆ โ„‚)
32 rpcoshcl 16097 . . . . . . . . . . 11 ((โ„‘โ€˜๐ด) โˆˆ โ„ โ†’ (cosโ€˜(i ยท (โ„‘โ€˜๐ด))) โˆˆ โ„+)
3328, 32syl 17 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (cosโ€˜(i ยท (โ„‘โ€˜๐ด))) โˆˆ โ„+)
3433rpne0d 13018 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (cosโ€˜(i ยท (โ„‘โ€˜๐ด))) โ‰  0)
3531, 34tancld 16072 . . . . . . . 8 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (tanโ€˜(i ยท (โ„‘โ€˜๐ด))) โˆˆ โ„‚)
3625, 35mulcld 11231 . . . . . . 7 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) โˆˆ โ„‚)
37 subcl 11456 . . . . . . 7 ((1 โˆˆ โ„‚ โˆง ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) โˆˆ โ„‚) โ†’ (1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) โˆˆ โ„‚)
381, 36, 37sylancr 588 . . . . . 6 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) โˆˆ โ„‚)
39 replim 15060 . . . . . . . . . . . 12 (๐ด โˆˆ โ„‚ โ†’ ๐ด = ((โ„œโ€˜๐ด) + (i ยท (โ„‘โ€˜๐ด))))
4039adantr 482 . . . . . . . . . . 11 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ๐ด = ((โ„œโ€˜๐ด) + (i ยท (โ„‘โ€˜๐ด))))
4140fveq2d 6893 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (cosโ€˜๐ด) = (cosโ€˜((โ„œโ€˜๐ด) + (i ยท (โ„‘โ€˜๐ด)))))
42 cosne0 26030 . . . . . . . . . . 11 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (-(ฯ€ / 2)(,)(ฯ€ / 2))) โ†’ (cosโ€˜๐ด) โ‰  0)
4321, 42syldan 592 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (cosโ€˜๐ด) โ‰  0)
4441, 43eqnetrrd 3010 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (cosโ€˜((โ„œโ€˜๐ด) + (i ยท (โ„‘โ€˜๐ด)))) โ‰  0)
45 tanaddlem 16106 . . . . . . . . . 10 ((((โ„œโ€˜๐ด) โˆˆ โ„‚ โˆง (i ยท (โ„‘โ€˜๐ด)) โˆˆ โ„‚) โˆง ((cosโ€˜(โ„œโ€˜๐ด)) โ‰  0 โˆง (cosโ€˜(i ยท (โ„‘โ€˜๐ด))) โ‰  0)) โ†’ ((cosโ€˜((โ„œโ€˜๐ด) + (i ยท (โ„‘โ€˜๐ด)))) โ‰  0 โ†” ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) โ‰  1))
464, 31, 24, 34, 45syl22anc 838 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((cosโ€˜((โ„œโ€˜๐ด) + (i ยท (โ„‘โ€˜๐ด)))) โ‰  0 โ†” ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) โ‰  1))
4744, 46mpbid 231 . . . . . . . 8 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) โ‰  1)
4847necomd 2997 . . . . . . 7 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ 1 โ‰  ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))
49 subeq0 11483 . . . . . . . . 9 ((1 โˆˆ โ„‚ โˆง ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) โˆˆ โ„‚) โ†’ ((1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) = 0 โ†” 1 = ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))
5049necon3bid 2986 . . . . . . . 8 ((1 โˆˆ โ„‚ โˆง ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) โˆˆ โ„‚) โ†’ ((1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) โ‰  0 โ†” 1 โ‰  ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))
511, 36, 50sylancr 588 . . . . . . 7 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) โ‰  0 โ†” 1 โ‰  ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))
5248, 51mpbird 257 . . . . . 6 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) โ‰  0)
5338, 52absrpcld 15392 . . . . 5 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) โˆˆ โ„+)
54 2z 12591 . . . . 5 2 โˆˆ โ„ค
55 rpexpcl 14043 . . . . 5 (((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) โˆˆ โ„+ โˆง 2 โˆˆ โ„ค) โ†’ ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2) โˆˆ โ„+)
5653, 54, 55sylancl 587 . . . 4 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2) โˆˆ โ„+)
5756rprecred 13024 . . 3 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (1 / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)) โˆˆ โ„)
5838cjcld 15140 . . . . 5 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) โˆˆ โ„‚)
5925, 35addcld 11230 . . . . 5 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) โˆˆ โ„‚)
6058, 59mulcld 11231 . . . 4 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) โˆˆ โ„‚)
6160recld 15138 . . 3 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) โˆˆ โ„)
6256rpreccld 13023 . . . 4 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (1 / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)) โˆˆ โ„+)
6362rpgt0d 13016 . . 3 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ 0 < (1 / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)))
643, 24retancld 16085 . . . . 5 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (tanโ€˜(โ„œโ€˜๐ด)) โˆˆ โ„)
65 1re 11211 . . . . . 6 1 โˆˆ โ„
66 retanhcl 16099 . . . . . . . 8 ((โ„‘โ€˜๐ด) โˆˆ โ„ โ†’ ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) โˆˆ โ„)
6728, 66syl 17 . . . . . . 7 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) โˆˆ โ„)
6867resqcld 14087 . . . . . 6 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2) โˆˆ โ„)
69 resubcl 11521 . . . . . 6 ((1 โˆˆ โ„ โˆง (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2) โˆˆ โ„) โ†’ (1 โˆ’ (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2)) โˆˆ โ„)
7065, 68, 69sylancr 588 . . . . 5 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (1 โˆ’ (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2)) โˆˆ โ„)
71 tanrpcl 26006 . . . . . . 7 ((โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2)) โ†’ (tanโ€˜(โ„œโ€˜๐ด)) โˆˆ โ„+)
7271adantl 483 . . . . . 6 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (tanโ€˜(โ„œโ€˜๐ด)) โˆˆ โ„+)
7372rpgt0d 13016 . . . . 5 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ 0 < (tanโ€˜(โ„œโ€˜๐ด)))
74 absresq 15246 . . . . . . . 8 (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) โˆˆ โ„ โ†’ ((absโ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i))โ†‘2) = (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2))
7567, 74syl 17 . . . . . . 7 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((absโ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i))โ†‘2) = (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2))
76 tanhbnd 16101 . . . . . . . . . . . 12 ((โ„‘โ€˜๐ด) โˆˆ โ„ โ†’ ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) โˆˆ (-1(,)1))
7728, 76syl 17 . . . . . . . . . . 11 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) โˆˆ (-1(,)1))
78 eliooord 13380 . . . . . . . . . . 11 (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) โˆˆ (-1(,)1) โ†’ (-1 < ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) โˆง ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) < 1))
7977, 78syl 17 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (-1 < ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) โˆง ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) < 1))
80 abslt 15258 . . . . . . . . . . 11 ((((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) โˆˆ โ„ โˆง 1 โˆˆ โ„) โ†’ ((absโ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)) < 1 โ†” (-1 < ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) โˆง ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) < 1)))
8167, 65, 80sylancl 587 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((absโ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)) < 1 โ†” (-1 < ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) โˆง ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) < 1)))
8279, 81mpbird 257 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (absโ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)) < 1)
8367recnd 11239 . . . . . . . . . . 11 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) โˆˆ โ„‚)
8483abscld 15380 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (absโ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)) โˆˆ โ„)
8565a1i 11 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ 1 โˆˆ โ„)
8683absge0d 15388 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ 0 โ‰ค (absโ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))
87 0le1 11734 . . . . . . . . . . 11 0 โ‰ค 1
8887a1i 11 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ 0 โ‰ค 1)
8984, 85, 86, 88lt2sqd 14216 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((absโ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)) < 1 โ†” ((absโ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i))โ†‘2) < (1โ†‘2)))
9082, 89mpbid 231 . . . . . . . 8 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((absโ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i))โ†‘2) < (1โ†‘2))
91 sq1 14156 . . . . . . . 8 (1โ†‘2) = 1
9290, 91breqtrdi 5189 . . . . . . 7 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((absโ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i))โ†‘2) < 1)
9375, 92eqbrtrrd 5172 . . . . . 6 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2) < 1)
94 posdif 11704 . . . . . . 7 (((((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2) โˆˆ โ„ โˆง 1 โˆˆ โ„) โ†’ ((((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2) < 1 โ†” 0 < (1 โˆ’ (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2))))
9568, 65, 94sylancl 587 . . . . . 6 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2) < 1 โ†” 0 < (1 โˆ’ (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2))))
9693, 95mpbid 231 . . . . 5 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ 0 < (1 โˆ’ (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2)))
9764, 70, 73, 96mulgt0d 11366 . . . 4 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ 0 < ((tanโ€˜(โ„œโ€˜๐ด)) ยท (1 โˆ’ (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2))))
9838recjd 15148 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜(โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))) = (โ„œโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))))
99 resub 15071 . . . . . . . . . 10 ((1 โˆˆ โ„‚ โˆง ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) โˆˆ โ„‚) โ†’ (โ„œโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = ((โ„œโ€˜1) โˆ’ (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))))
1001, 36, 99sylancr 588 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = ((โ„œโ€˜1) โˆ’ (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))))
101 re1 15098 . . . . . . . . . . 11 (โ„œโ€˜1) = 1
102101oveq1i 7416 . . . . . . . . . 10 ((โ„œโ€˜1) โˆ’ (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = (1 โˆ’ (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))
10364, 35remul2d 15171 . . . . . . . . . . . . 13 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) = ((tanโ€˜(โ„œโ€˜๐ด)) ยท (โ„œโ€˜(tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))
104 negicn 11458 . . . . . . . . . . . . . . . . . 18 -i โˆˆ โ„‚
105104a1i 11 . . . . . . . . . . . . . . . . 17 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ -i โˆˆ โ„‚)
106 ine0 11646 . . . . . . . . . . . . . . . . . . 19 i โ‰  0
10726, 106negne0i 11532 . . . . . . . . . . . . . . . . . 18 -i โ‰  0
108107a1i 11 . . . . . . . . . . . . . . . . 17 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ -i โ‰  0)
10935, 105, 108divcld 11987 . . . . . . . . . . . . . . . 16 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / -i) โˆˆ โ„‚)
110 imre 15052 . . . . . . . . . . . . . . . 16 (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / -i) โˆˆ โ„‚ โ†’ (โ„‘โ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / -i)) = (โ„œโ€˜(-i ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / -i))))
111109, 110syl 17 . . . . . . . . . . . . . . 15 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„‘โ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / -i)) = (โ„œโ€˜(-i ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / -i))))
11226a1i 11 . . . . . . . . . . . . . . . . . 18 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ i โˆˆ โ„‚)
113106a1i 11 . . . . . . . . . . . . . . . . . 18 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ i โ‰  0)
11435, 112, 113divneg2d 12001 . . . . . . . . . . . . . . . . 17 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ -((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) = ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / -i))
11567renegcld 11638 . . . . . . . . . . . . . . . . 17 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ -((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) โˆˆ โ„)
116114, 115eqeltrrd 2835 . . . . . . . . . . . . . . . 16 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / -i) โˆˆ โ„)
117116reim0d 15169 . . . . . . . . . . . . . . 15 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„‘โ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / -i)) = 0)
11835, 105, 108divcan2d 11989 . . . . . . . . . . . . . . . 16 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (-i ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / -i)) = (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))
119118fveq2d 6893 . . . . . . . . . . . . . . 15 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜(-i ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / -i))) = (โ„œโ€˜(tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))
120111, 117, 1193eqtr3rd 2782 . . . . . . . . . . . . . 14 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜(tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) = 0)
121120oveq2d 7422 . . . . . . . . . . . . 13 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (โ„œโ€˜(tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) = ((tanโ€˜(โ„œโ€˜๐ด)) ยท 0))
12225mul01d 11410 . . . . . . . . . . . . 13 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท 0) = 0)
123103, 121, 1223eqtrd 2777 . . . . . . . . . . . 12 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) = 0)
124123oveq2d 7422 . . . . . . . . . . 11 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (1 โˆ’ (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = (1 โˆ’ 0))
125 1m0e1 12330 . . . . . . . . . . 11 (1 โˆ’ 0) = 1
126124, 125eqtrdi 2789 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (1 โˆ’ (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = 1)
127102, 126eqtrid 2785 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((โ„œโ€˜1) โˆ’ (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = 1)
12898, 100, 1273eqtrd 2777 . . . . . . . 8 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜(โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))) = 1)
12935, 112, 113divcan2d 11989 . . . . . . . . . . 11 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (i ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)) = (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))
130129oveq2d 7422 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(โ„œโ€˜๐ด)) + (i ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i))) = ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))
131130fveq2d 6893 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (i ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))) = (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))
13264, 67crred 15175 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (i ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))) = (tanโ€˜(โ„œโ€˜๐ด)))
133131, 132eqtr3d 2775 . . . . . . . 8 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) = (tanโ€˜(โ„œโ€˜๐ด)))
134128, 133oveq12d 7424 . . . . . . 7 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((โ„œโ€˜(โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))) ยท (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = (1 ยท (tanโ€˜(โ„œโ€˜๐ด))))
135 mulcom 11193 . . . . . . . 8 ((1 โˆˆ โ„‚ โˆง (tanโ€˜(โ„œโ€˜๐ด)) โˆˆ โ„‚) โ†’ (1 ยท (tanโ€˜(โ„œโ€˜๐ด))) = ((tanโ€˜(โ„œโ€˜๐ด)) ยท 1))
1361, 25, 135sylancr 588 . . . . . . 7 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (1 ยท (tanโ€˜(โ„œโ€˜๐ด))) = ((tanโ€˜(โ„œโ€˜๐ด)) ยท 1))
137134, 136eqtrd 2773 . . . . . 6 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((โ„œโ€˜(โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))) ยท (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = ((tanโ€˜(โ„œโ€˜๐ด)) ยท 1))
13825, 83, 83mulassd 11234 . . . . . . 7 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (((tanโ€˜(โ„œโ€˜๐ด)) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)) = ((tanโ€˜(โ„œโ€˜๐ด)) ยท (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i))))
13938imcjd 15149 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„‘โ€˜(โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))) = -(โ„‘โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))))
140 imsub 15079 . . . . . . . . . . . 12 ((1 โˆˆ โ„‚ โˆง ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) โˆˆ โ„‚) โ†’ (โ„‘โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = ((โ„‘โ€˜1) โˆ’ (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))))
1411, 36, 140sylancr 588 . . . . . . . . . . 11 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„‘โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = ((โ„‘โ€˜1) โˆ’ (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))))
142 im1 15099 . . . . . . . . . . . . . 14 (โ„‘โ€˜1) = 0
143142oveq1i 7416 . . . . . . . . . . . . 13 ((โ„‘โ€˜1) โˆ’ (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = (0 โˆ’ (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))
144 df-neg 11444 . . . . . . . . . . . . 13 -(โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) = (0 โˆ’ (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))
145143, 144eqtr4i 2764 . . . . . . . . . . . 12 ((โ„‘โ€˜1) โˆ’ (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = -(โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))
14664, 35immul2d 15172 . . . . . . . . . . . . . 14 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) = ((tanโ€˜(โ„œโ€˜๐ด)) ยท (โ„‘โ€˜(tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))
147 imval 15051 . . . . . . . . . . . . . . . . 17 ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) โˆˆ โ„‚ โ†’ (โ„‘โ€˜(tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) = (โ„œโ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))
14835, 147syl 17 . . . . . . . . . . . . . . . 16 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„‘โ€˜(tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) = (โ„œโ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))
14967rered 15168 . . . . . . . . . . . . . . . 16 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)) = ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i))
150148, 149eqtrd 2773 . . . . . . . . . . . . . . 15 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„‘โ€˜(tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) = ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i))
151150oveq2d 7422 . . . . . . . . . . . . . 14 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (โ„‘โ€˜(tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) = ((tanโ€˜(โ„œโ€˜๐ด)) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))
152146, 151eqtrd 2773 . . . . . . . . . . . . 13 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) = ((tanโ€˜(โ„œโ€˜๐ด)) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))
153152negeqd 11451 . . . . . . . . . . . 12 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ -(โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) = -((tanโ€˜(โ„œโ€˜๐ด)) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))
154145, 153eqtrid 2785 . . . . . . . . . . 11 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((โ„‘โ€˜1) โˆ’ (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = -((tanโ€˜(โ„œโ€˜๐ด)) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))
155141, 154eqtrd 2773 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„‘โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = -((tanโ€˜(โ„œโ€˜๐ด)) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))
156155negeqd 11451 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ -(โ„‘โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = --((tanโ€˜(โ„œโ€˜๐ด)) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))
15764, 67remulcld 11241 . . . . . . . . . . 11 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)) โˆˆ โ„)
158157recnd 11239 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)) โˆˆ โ„‚)
159158negnegd 11559 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ --((tanโ€˜(โ„œโ€˜๐ด)) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)) = ((tanโ€˜(โ„œโ€˜๐ด)) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))
160139, 156, 1593eqtrd 2777 . . . . . . . 8 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„‘โ€˜(โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))) = ((tanโ€˜(โ„œโ€˜๐ด)) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))
161130fveq2d 6893 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (i ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))) = (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))
16264, 67crimd 15176 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (i ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))) = ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i))
163161, 162eqtr3d 2775 . . . . . . . 8 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) = ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i))
164160, 163oveq12d 7424 . . . . . . 7 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((โ„‘โ€˜(โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))) ยท (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = (((tanโ€˜(โ„œโ€˜๐ด)) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))
16583sqvald 14105 . . . . . . . 8 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2) = (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)))
166165oveq2d 7422 . . . . . . 7 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2)) = ((tanโ€˜(โ„œโ€˜๐ด)) ยท (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i) ยท ((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i))))
167138, 164, 1663eqtr4d 2783 . . . . . 6 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((โ„‘โ€˜(โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))) ยท (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = ((tanโ€˜(โ„œโ€˜๐ด)) ยท (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2)))
168137, 167oveq12d 7424 . . . . 5 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (((โ„œโ€˜(โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))) ยท (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) โˆ’ ((โ„‘โ€˜(โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))) ยท (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))) = (((tanโ€˜(โ„œโ€˜๐ด)) ยท 1) โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2))))
16958, 59remuld 15162 . . . . 5 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = (((โ„œโ€˜(โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))) ยท (โ„œโ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) โˆ’ ((โ„‘โ€˜(โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))) ยท (โ„‘โ€˜((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))))
1701a1i 11 . . . . . 6 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ 1 โˆˆ โ„‚)
17183sqcld 14106 . . . . . 6 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2) โˆˆ โ„‚)
17225, 170, 171subdid 11667 . . . . 5 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (1 โˆ’ (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2))) = (((tanโ€˜(โ„œโ€˜๐ด)) ยท 1) โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2))))
173168, 169, 1723eqtr4d 2783 . . . 4 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = ((tanโ€˜(โ„œโ€˜๐ด)) ยท (1 โˆ’ (((tanโ€˜(i ยท (โ„‘โ€˜๐ด))) / i)โ†‘2))))
17497, 173breqtrrd 5176 . . 3 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ 0 < (โ„œโ€˜((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))))
17557, 61, 63, 174mulgt0d 11366 . 2 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ 0 < ((1 / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)) ยท (โ„œโ€˜((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))))
17640fveq2d 6893 . . . . . 6 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (tanโ€˜๐ด) = (tanโ€˜((โ„œโ€˜๐ด) + (i ยท (โ„‘โ€˜๐ด)))))
177 tanadd 16107 . . . . . . 7 ((((โ„œโ€˜๐ด) โˆˆ โ„‚ โˆง (i ยท (โ„‘โ€˜๐ด)) โˆˆ โ„‚) โˆง ((cosโ€˜(โ„œโ€˜๐ด)) โ‰  0 โˆง (cosโ€˜(i ยท (โ„‘โ€˜๐ด))) โ‰  0 โˆง (cosโ€˜((โ„œโ€˜๐ด) + (i ยท (โ„‘โ€˜๐ด)))) โ‰  0)) โ†’ (tanโ€˜((โ„œโ€˜๐ด) + (i ยท (โ„‘โ€˜๐ด)))) = (((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) / (1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))))
1784, 31, 24, 34, 44, 177syl23anc 1378 . . . . . 6 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (tanโ€˜((โ„œโ€˜๐ด) + (i ยท (โ„‘โ€˜๐ด)))) = (((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) / (1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))))
179 recval 15266 . . . . . . . . 9 (((1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) โˆˆ โ„‚ โˆง (1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) โ‰  0) โ†’ (1 / (1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = ((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)))
18038, 52, 179syl2anc 585 . . . . . . . 8 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (1 / (1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = ((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)))
181180oveq1d 7421 . . . . . . 7 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((1 / (1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) = (((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))
18259, 38, 52divrec2d 11991 . . . . . . 7 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) / (1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = ((1 / (1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))
18338abscld 15380 . . . . . . . . . 10 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) โˆˆ โ„)
184183resqcld 14087 . . . . . . . . 9 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2) โˆˆ โ„)
185184recnd 11239 . . . . . . . 8 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2) โˆˆ โ„‚)
18656rpne0d 13018 . . . . . . . 8 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2) โ‰  0)
18758, 59, 185, 186div23d 12024 . . . . . . 7 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)) = (((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))
188181, 182, 1873eqtr4d 2783 . . . . . 6 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))) / (1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) = (((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)))
189176, 178, 1883eqtrd 2777 . . . . 5 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (tanโ€˜๐ด) = (((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)))
19060, 185, 186divrec2d 11991 . . . . 5 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))) / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)) = ((1 / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)) ยท ((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))))
191189, 190eqtrd 2773 . . . 4 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (tanโ€˜๐ด) = ((1 / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)) ยท ((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))))
192191fveq2d 6893 . . 3 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜(tanโ€˜๐ด)) = (โ„œโ€˜((1 / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)) ยท ((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))))
19357, 60remul2d 15171 . . 3 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜((1 / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)) ยท ((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))) = ((1 / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)) ยท (โ„œโ€˜((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))))
194192, 193eqtrd 2773 . 2 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ (โ„œโ€˜(tanโ€˜๐ด)) = ((1 / ((absโ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))โ†‘2)) ยท (โ„œโ€˜((โˆ—โ€˜(1 โˆ’ ((tanโ€˜(โ„œโ€˜๐ด)) ยท (tanโ€˜(i ยท (โ„‘โ€˜๐ด)))))) ยท ((tanโ€˜(โ„œโ€˜๐ด)) + (tanโ€˜(i ยท (โ„‘โ€˜๐ด))))))))
195175, 194breqtrrd 5176 1 ((๐ด โˆˆ โ„‚ โˆง (โ„œโ€˜๐ด) โˆˆ (0(,)(ฯ€ / 2))) โ†’ 0 < (โ„œโ€˜(tanโ€˜๐ด)))
Colors of variables: wff setvar class
Syntax hints:   โ†’ wi 4   โ†” wb 205   โˆง wa 397   = wceq 1542   โˆˆ wcel 2107   โ‰  wne 2941   โŠ† wss 3948   class class class wbr 5148  โ€˜cfv 6541  (class class class)co 7406  โ„‚cc 11105  โ„cr 11106  0cc0 11107  1c1 11108  ici 11109   + caddc 11110   ยท cmul 11112  โ„*cxr 11244   < clt 11245   โ‰ค cle 11246   โˆ’ cmin 11441  -cneg 11442   / cdiv 11868  2c2 12264  โ„คcz 12555  โ„+crp 12971  (,)cioo 13321  โ†‘cexp 14024  โˆ—ccj 15040  โ„œcre 15041  โ„‘cim 15042  abscabs 15178  cosccos 16005  tanctan 16006  ฯ€cpi 16007
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7722  ax-inf2 9633  ax-cnex 11163  ax-resscn 11164  ax-1cn 11165  ax-icn 11166  ax-addcl 11167  ax-addrcl 11168  ax-mulcl 11169  ax-mulrcl 11170  ax-mulcom 11171  ax-addass 11172  ax-mulass 11173  ax-distr 11174  ax-i2m1 11175  ax-1ne0 11176  ax-1rid 11177  ax-rnegex 11178  ax-rrecex 11179  ax-cnre 11180  ax-pre-lttri 11181  ax-pre-lttrn 11182  ax-pre-ltadd 11183  ax-pre-mulgt0 11184  ax-pre-sup 11185  ax-addf 11186  ax-mulf 11187
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-tp 4633  df-op 4635  df-uni 4909  df-int 4951  df-iun 4999  df-iin 5000  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-se 5632  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6298  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6493  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-isom 6550  df-riota 7362  df-ov 7409  df-oprab 7410  df-mpo 7411  df-of 7667  df-om 7853  df-1st 7972  df-2nd 7973  df-supp 8144  df-frecs 8263  df-wrecs 8294  df-recs 8368  df-rdg 8407  df-1o 8463  df-2o 8464  df-er 8700  df-map 8819  df-pm 8820  df-ixp 8889  df-en 8937  df-dom 8938  df-sdom 8939  df-fin 8940  df-fsupp 9359  df-fi 9403  df-sup 9434  df-inf 9435  df-oi 9502  df-card 9931  df-pnf 11247  df-mnf 11248  df-xr 11249  df-ltxr 11250  df-le 11251  df-sub 11443  df-neg 11444  df-div 11869  df-nn 12210  df-2 12272  df-3 12273  df-4 12274  df-5 12275  df-6 12276  df-7 12277  df-8 12278  df-9 12279  df-n0 12470  df-z 12556  df-dec 12675  df-uz 12820  df-q 12930  df-rp 12972  df-xneg 13089  df-xadd 13090  df-xmul 13091  df-ioo 13325  df-ioc 13326  df-ico 13327  df-icc 13328  df-fz 13482  df-fzo 13625  df-fl 13754  df-mod 13832  df-seq 13964  df-exp 14025  df-fac 14231  df-bc 14260  df-hash 14288  df-shft 15011  df-cj 15043  df-re 15044  df-im 15045  df-sqrt 15179  df-abs 15180  df-limsup 15412  df-clim 15429  df-rlim 15430  df-sum 15630  df-ef 16008  df-sin 16010  df-cos 16011  df-tan 16012  df-pi 16013  df-struct 17077  df-sets 17094  df-slot 17112  df-ndx 17124  df-base 17142  df-ress 17171  df-plusg 17207  df-mulr 17208  df-starv 17209  df-sca 17210  df-vsca 17211  df-ip 17212  df-tset 17213  df-ple 17214  df-ds 17216  df-unif 17217  df-hom 17218  df-cco 17219  df-rest 17365  df-topn 17366  df-0g 17384  df-gsum 17385  df-topgen 17386  df-pt 17387  df-prds 17390  df-xrs 17445  df-qtop 17450  df-imas 17451  df-xps 17453  df-mre 17527  df-mrc 17528  df-acs 17530  df-mgm 18558  df-sgrp 18607  df-mnd 18623  df-submnd 18669  df-mulg 18946  df-cntz 19176  df-cmn 19645  df-psmet 20929  df-xmet 20930  df-met 20931  df-bl 20932  df-mopn 20933  df-fbas 20934  df-fg 20935  df-cnfld 20938  df-top 22388  df-topon 22405  df-topsp 22427  df-bases 22441  df-cld 22515  df-ntr 22516  df-cls 22517  df-nei 22594  df-lp 22632  df-perf 22633  df-cn 22723  df-cnp 22724  df-haus 22811  df-tx 23058  df-hmeo 23251  df-fil 23342  df-fm 23434  df-flim 23435  df-flf 23436  df-xms 23818  df-ms 23819  df-tms 23820  df-cncf 24386  df-limc 25375  df-dv 25376
This theorem is referenced by:  atantan  26418
  Copyright terms: Public domain W3C validator