Step | Hyp | Ref
| Expression |
1 | | ax-icn 11165 |
. . 3
β’ i β
β |
2 | | sqrtcl 15304 |
. . . 4
β’ (π΄ β β β
(ββπ΄) β
β) |
3 | 2 | ad2antrr 724 |
. . 3
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β (ββπ΄)
β β) |
4 | | mulcl 11190 |
. . 3
β’ ((i
β β β§ (ββπ΄) β β) β (i Β·
(ββπ΄)) β
β) |
5 | 1, 3, 4 | sylancr 587 |
. 2
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β (i Β· (ββπ΄)) β β) |
6 | | imval 15050 |
. . . 4
β’ ((i
Β· (ββπ΄))
β β β (ββ(i Β· (ββπ΄))) = (ββ((i Β·
(ββπ΄)) /
i))) |
7 | 5, 6 | syl 17 |
. . 3
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β (ββ(i Β· (ββπ΄))) = (ββ((i Β·
(ββπ΄)) /
i))) |
8 | | ine0 11645 |
. . . . . 6
β’ i β
0 |
9 | | divcan3 11894 |
. . . . . 6
β’
(((ββπ΄)
β β β§ i β β β§ i β 0) β ((i Β·
(ββπ΄)) / i) =
(ββπ΄)) |
10 | 1, 8, 9 | mp3an23 1453 |
. . . . 5
β’
((ββπ΄)
β β β ((i Β· (ββπ΄)) / i) = (ββπ΄)) |
11 | 3, 10 | syl 17 |
. . . 4
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β ((i Β· (ββπ΄)) / i) = (ββπ΄)) |
12 | 11 | fveq2d 6892 |
. . 3
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β (ββ((i Β· (ββπ΄)) / i)) =
(ββ(ββπ΄))) |
13 | | halfre 12422 |
. . . . . . . . . . . . 13
β’ (1 / 2)
β β |
14 | 13 | recni 11224 |
. . . . . . . . . . . 12
β’ (1 / 2)
β β |
15 | | logcl 26068 |
. . . . . . . . . . . 12
β’ ((π΄ β β β§ π΄ β 0) β (logβπ΄) β
β) |
16 | | mulcl 11190 |
. . . . . . . . . . . 12
β’ (((1 / 2)
β β β§ (logβπ΄) β β) β ((1 / 2) Β·
(logβπ΄)) β
β) |
17 | 14, 15, 16 | sylancr 587 |
. . . . . . . . . . 11
β’ ((π΄ β β β§ π΄ β 0) β ((1 / 2)
Β· (logβπ΄))
β β) |
18 | 17 | recld 15137 |
. . . . . . . . . 10
β’ ((π΄ β β β§ π΄ β 0) β
(ββ((1 / 2) Β· (logβπ΄))) β β) |
19 | 18 | reefcld 16027 |
. . . . . . . . 9
β’ ((π΄ β β β§ π΄ β 0) β
(expβ(ββ((1 / 2) Β· (logβπ΄)))) β β) |
20 | 17 | imcld 15138 |
. . . . . . . . . 10
β’ ((π΄ β β β§ π΄ β 0) β
(ββ((1 / 2) Β· (logβπ΄))) β β) |
21 | 20 | recoscld 16083 |
. . . . . . . . 9
β’ ((π΄ β β β§ π΄ β 0) β
(cosβ(ββ((1 / 2) Β· (logβπ΄)))) β β) |
22 | 18 | rpefcld 16044 |
. . . . . . . . . 10
β’ ((π΄ β β β§ π΄ β 0) β
(expβ(ββ((1 / 2) Β· (logβπ΄)))) β
β+) |
23 | 22 | rpge0d 13016 |
. . . . . . . . 9
β’ ((π΄ β β β§ π΄ β 0) β 0 β€
(expβ(ββ((1 / 2) Β· (logβπ΄))))) |
24 | | immul2 15080 |
. . . . . . . . . . . . 13
β’ (((1 / 2)
β β β§ (logβπ΄) β β) β (ββ((1
/ 2) Β· (logβπ΄))) = ((1 / 2) Β·
(ββ(logβπ΄)))) |
25 | 13, 15, 24 | sylancr 587 |
. . . . . . . . . . . 12
β’ ((π΄ β β β§ π΄ β 0) β
(ββ((1 / 2) Β· (logβπ΄))) = ((1 / 2) Β·
(ββ(logβπ΄)))) |
26 | 15 | imcld 15138 |
. . . . . . . . . . . . . 14
β’ ((π΄ β β β§ π΄ β 0) β
(ββ(logβπ΄)) β β) |
27 | 26 | recnd 11238 |
. . . . . . . . . . . . 13
β’ ((π΄ β β β§ π΄ β 0) β
(ββ(logβπ΄)) β β) |
28 | | mulcom 11192 |
. . . . . . . . . . . . 13
β’ (((1 / 2)
β β β§ (ββ(logβπ΄)) β β) β ((1 / 2) Β·
(ββ(logβπ΄))) = ((ββ(logβπ΄)) Β· (1 /
2))) |
29 | 14, 27, 28 | sylancr 587 |
. . . . . . . . . . . 12
β’ ((π΄ β β β§ π΄ β 0) β ((1 / 2)
Β· (ββ(logβπ΄))) = ((ββ(logβπ΄)) Β· (1 /
2))) |
30 | 25, 29 | eqtrd 2772 |
. . . . . . . . . . 11
β’ ((π΄ β β β§ π΄ β 0) β
(ββ((1 / 2) Β· (logβπ΄))) = ((ββ(logβπ΄)) Β· (1 /
2))) |
31 | | logimcl 26069 |
. . . . . . . . . . . . . . 15
β’ ((π΄ β β β§ π΄ β 0) β (-Ο <
(ββ(logβπ΄)) β§ (ββ(logβπ΄)) β€ Ο)) |
32 | 31 | simpld 495 |
. . . . . . . . . . . . . 14
β’ ((π΄ β β β§ π΄ β 0) β -Ο <
(ββ(logβπ΄))) |
33 | | pire 25959 |
. . . . . . . . . . . . . . . 16
β’ Ο
β β |
34 | 33 | renegcli 11517 |
. . . . . . . . . . . . . . 15
β’ -Ο
β β |
35 | | ltle 11298 |
. . . . . . . . . . . . . . 15
β’ ((-Ο
β β β§ (ββ(logβπ΄)) β β) β (-Ο <
(ββ(logβπ΄)) β -Ο β€
(ββ(logβπ΄)))) |
36 | 34, 26, 35 | sylancr 587 |
. . . . . . . . . . . . . 14
β’ ((π΄ β β β§ π΄ β 0) β (-Ο <
(ββ(logβπ΄)) β -Ο β€
(ββ(logβπ΄)))) |
37 | 32, 36 | mpd 15 |
. . . . . . . . . . . . 13
β’ ((π΄ β β β§ π΄ β 0) β -Ο β€
(ββ(logβπ΄))) |
38 | 31 | simprd 496 |
. . . . . . . . . . . . 13
β’ ((π΄ β β β§ π΄ β 0) β
(ββ(logβπ΄)) β€ Ο) |
39 | 34, 33 | elicc2i 13386 |
. . . . . . . . . . . . 13
β’
((ββ(logβπ΄)) β (-Ο[,]Ο) β
((ββ(logβπ΄)) β β β§ -Ο β€
(ββ(logβπ΄)) β§ (ββ(logβπ΄)) β€ Ο)) |
40 | 26, 37, 38, 39 | syl3anbrc 1343 |
. . . . . . . . . . . 12
β’ ((π΄ β β β§ π΄ β 0) β
(ββ(logβπ΄)) β (-Ο[,]Ο)) |
41 | | halfgt0 12424 |
. . . . . . . . . . . . . 14
β’ 0 < (1
/ 2) |
42 | 13, 41 | elrpii 12973 |
. . . . . . . . . . . . 13
β’ (1 / 2)
β β+ |
43 | 33 | recni 11224 |
. . . . . . . . . . . . . . 15
β’ Ο
β β |
44 | | 2cn 12283 |
. . . . . . . . . . . . . . 15
β’ 2 β
β |
45 | | 2ne0 12312 |
. . . . . . . . . . . . . . 15
β’ 2 β
0 |
46 | | divneg 11902 |
. . . . . . . . . . . . . . 15
β’ ((Ο
β β β§ 2 β β β§ 2 β 0) β -(Ο / 2) =
(-Ο / 2)) |
47 | 43, 44, 45, 46 | mp3an 1461 |
. . . . . . . . . . . . . 14
β’ -(Ο /
2) = (-Ο / 2) |
48 | 34 | recni 11224 |
. . . . . . . . . . . . . . 15
β’ -Ο
β β |
49 | 48, 44, 45 | divreci 11955 |
. . . . . . . . . . . . . 14
β’ (-Ο /
2) = (-Ο Β· (1 / 2)) |
50 | 47, 49 | eqtr2i 2761 |
. . . . . . . . . . . . 13
β’ (-Ο
Β· (1 / 2)) = -(Ο / 2) |
51 | 43, 44, 45 | divreci 11955 |
. . . . . . . . . . . . . 14
β’ (Ο /
2) = (Ο Β· (1 / 2)) |
52 | 51 | eqcomi 2741 |
. . . . . . . . . . . . 13
β’ (Ο
Β· (1 / 2)) = (Ο / 2) |
53 | 34, 33, 42, 50, 52 | iccdili 13464 |
. . . . . . . . . . . 12
β’
((ββ(logβπ΄)) β (-Ο[,]Ο) β
((ββ(logβπ΄)) Β· (1 / 2)) β (-(Ο /
2)[,](Ο / 2))) |
54 | 40, 53 | syl 17 |
. . . . . . . . . . 11
β’ ((π΄ β β β§ π΄ β 0) β
((ββ(logβπ΄)) Β· (1 / 2)) β (-(Ο /
2)[,](Ο / 2))) |
55 | 30, 54 | eqeltrd 2833 |
. . . . . . . . . 10
β’ ((π΄ β β β§ π΄ β 0) β
(ββ((1 / 2) Β· (logβπ΄))) β (-(Ο / 2)[,](Ο /
2))) |
56 | | cosq14ge0 26012 |
. . . . . . . . . 10
β’
((ββ((1 / 2) Β· (logβπ΄))) β (-(Ο / 2)[,](Ο / 2)) β
0 β€ (cosβ(ββ((1 / 2) Β· (logβπ΄))))) |
57 | 55, 56 | syl 17 |
. . . . . . . . 9
β’ ((π΄ β β β§ π΄ β 0) β 0 β€
(cosβ(ββ((1 / 2) Β· (logβπ΄))))) |
58 | 19, 21, 23, 57 | mulge0d 11787 |
. . . . . . . 8
β’ ((π΄ β β β§ π΄ β 0) β 0 β€
((expβ(ββ((1 / 2) Β· (logβπ΄)))) Β· (cosβ(ββ((1
/ 2) Β· (logβπ΄)))))) |
59 | | cxpef 26164 |
. . . . . . . . . . . 12
β’ ((π΄ β β β§ π΄ β 0 β§ (1 / 2) β
β) β (π΄βπ(1 / 2)) =
(expβ((1 / 2) Β· (logβπ΄)))) |
60 | 14, 59 | mp3an3 1450 |
. . . . . . . . . . 11
β’ ((π΄ β β β§ π΄ β 0) β (π΄βπ(1 /
2)) = (expβ((1 / 2) Β· (logβπ΄)))) |
61 | | efeul 16101 |
. . . . . . . . . . . 12
β’ (((1 / 2)
Β· (logβπ΄))
β β β (expβ((1 / 2) Β· (logβπ΄))) = ((expβ(ββ((1 / 2)
Β· (logβπ΄))))
Β· ((cosβ(ββ((1 / 2) Β· (logβπ΄)))) + (i Β·
(sinβ(ββ((1 / 2) Β· (logβπ΄)))))))) |
62 | 17, 61 | syl 17 |
. . . . . . . . . . 11
β’ ((π΄ β β β§ π΄ β 0) β (expβ((1 /
2) Β· (logβπ΄)))
= ((expβ(ββ((1 / 2) Β· (logβπ΄)))) Β· ((cosβ(ββ((1
/ 2) Β· (logβπ΄)))) + (i Β·
(sinβ(ββ((1 / 2) Β· (logβπ΄)))))))) |
63 | 60, 62 | eqtrd 2772 |
. . . . . . . . . 10
β’ ((π΄ β β β§ π΄ β 0) β (π΄βπ(1 /
2)) = ((expβ(ββ((1 / 2) Β· (logβπ΄)))) Β· ((cosβ(ββ((1
/ 2) Β· (logβπ΄)))) + (i Β·
(sinβ(ββ((1 / 2) Β· (logβπ΄)))))))) |
64 | 63 | fveq2d 6892 |
. . . . . . . . 9
β’ ((π΄ β β β§ π΄ β 0) β
(ββ(π΄βπ(1 / 2))) =
(ββ((expβ(ββ((1 / 2) Β· (logβπ΄)))) Β·
((cosβ(ββ((1 / 2) Β· (logβπ΄)))) + (i Β·
(sinβ(ββ((1 / 2) Β· (logβπ΄))))))))) |
65 | 21 | recnd 11238 |
. . . . . . . . . . 11
β’ ((π΄ β β β§ π΄ β 0) β
(cosβ(ββ((1 / 2) Β· (logβπ΄)))) β β) |
66 | 20 | resincld 16082 |
. . . . . . . . . . . . 13
β’ ((π΄ β β β§ π΄ β 0) β
(sinβ(ββ((1 / 2) Β· (logβπ΄)))) β β) |
67 | 66 | recnd 11238 |
. . . . . . . . . . . 12
β’ ((π΄ β β β§ π΄ β 0) β
(sinβ(ββ((1 / 2) Β· (logβπ΄)))) β β) |
68 | | mulcl 11190 |
. . . . . . . . . . . 12
β’ ((i
β β β§ (sinβ(ββ((1 / 2) Β·
(logβπ΄)))) β
β) β (i Β· (sinβ(ββ((1 / 2) Β·
(logβπ΄))))) β
β) |
69 | 1, 67, 68 | sylancr 587 |
. . . . . . . . . . 11
β’ ((π΄ β β β§ π΄ β 0) β (i Β·
(sinβ(ββ((1 / 2) Β· (logβπ΄))))) β β) |
70 | 65, 69 | addcld 11229 |
. . . . . . . . . 10
β’ ((π΄ β β β§ π΄ β 0) β
((cosβ(ββ((1 / 2) Β· (logβπ΄)))) + (i Β·
(sinβ(ββ((1 / 2) Β· (logβπ΄)))))) β β) |
71 | 19, 70 | remul2d 15170 |
. . . . . . . . 9
β’ ((π΄ β β β§ π΄ β 0) β
(ββ((expβ(ββ((1 / 2) Β· (logβπ΄)))) Β·
((cosβ(ββ((1 / 2) Β· (logβπ΄)))) + (i Β·
(sinβ(ββ((1 / 2) Β· (logβπ΄)))))))) = ((expβ(ββ((1 /
2) Β· (logβπ΄)))) Β·
(ββ((cosβ(ββ((1 / 2) Β· (logβπ΄)))) + (i Β·
(sinβ(ββ((1 / 2) Β· (logβπ΄))))))))) |
72 | 21, 66 | crred 15174 |
. . . . . . . . . 10
β’ ((π΄ β β β§ π΄ β 0) β
(ββ((cosβ(ββ((1 / 2) Β· (logβπ΄)))) + (i Β·
(sinβ(ββ((1 / 2) Β· (logβπ΄))))))) = (cosβ(ββ((1 / 2)
Β· (logβπ΄))))) |
73 | 72 | oveq2d 7421 |
. . . . . . . . 9
β’ ((π΄ β β β§ π΄ β 0) β
((expβ(ββ((1 / 2) Β· (logβπ΄)))) Β·
(ββ((cosβ(ββ((1 / 2) Β· (logβπ΄)))) + (i Β·
(sinβ(ββ((1 / 2) Β· (logβπ΄)))))))) = ((expβ(ββ((1 /
2) Β· (logβπ΄)))) Β· (cosβ(ββ((1
/ 2) Β· (logβπ΄)))))) |
74 | 64, 71, 73 | 3eqtrd 2776 |
. . . . . . . 8
β’ ((π΄ β β β§ π΄ β 0) β
(ββ(π΄βπ(1 / 2))) =
((expβ(ββ((1 / 2) Β· (logβπ΄)))) Β· (cosβ(ββ((1
/ 2) Β· (logβπ΄)))))) |
75 | 58, 74 | breqtrrd 5175 |
. . . . . . 7
β’ ((π΄ β β β§ π΄ β 0) β 0 β€
(ββ(π΄βπ(1 /
2)))) |
76 | 75 | adantr 481 |
. . . . . 6
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β 0 β€ (ββ(π΄βπ(1 /
2)))) |
77 | | simpr 485 |
. . . . . . . 8
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β (π΄βπ(1 / 2)) =
-(ββπ΄)) |
78 | 77 | fveq2d 6892 |
. . . . . . 7
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β (ββ(π΄βπ(1 / 2))) =
(ββ-(ββπ΄))) |
79 | 3 | renegd 15152 |
. . . . . . 7
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β (ββ-(ββπ΄)) = -(ββ(ββπ΄))) |
80 | 78, 79 | eqtrd 2772 |
. . . . . 6
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β (ββ(π΄βπ(1 / 2))) =
-(ββ(ββπ΄))) |
81 | 76, 80 | breqtrd 5173 |
. . . . 5
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β 0 β€ -(ββ(ββπ΄))) |
82 | 3 | recld 15137 |
. . . . . 6
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β (ββ(ββπ΄)) β β) |
83 | 82 | le0neg1d 11781 |
. . . . 5
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β ((ββ(ββπ΄)) β€ 0 β 0 β€
-(ββ(ββπ΄)))) |
84 | 81, 83 | mpbird 256 |
. . . 4
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β (ββ(ββπ΄)) β€ 0) |
85 | | sqrtrege0 15308 |
. . . . 5
β’ (π΄ β β β 0 β€
(ββ(ββπ΄))) |
86 | 85 | ad2antrr 724 |
. . . 4
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β 0 β€ (ββ(ββπ΄))) |
87 | | 0re 11212 |
. . . . 5
β’ 0 β
β |
88 | | letri3 11295 |
. . . . 5
β’
(((ββ(ββπ΄)) β β β§ 0 β β)
β ((ββ(ββπ΄)) = 0 β
((ββ(ββπ΄)) β€ 0 β§ 0 β€
(ββ(ββπ΄))))) |
89 | 82, 87, 88 | sylancl 586 |
. . . 4
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β ((ββ(ββπ΄)) = 0 β
((ββ(ββπ΄)) β€ 0 β§ 0 β€
(ββ(ββπ΄))))) |
90 | 84, 86, 89 | mpbir2and 711 |
. . 3
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β (ββ(ββπ΄)) = 0) |
91 | 7, 12, 90 | 3eqtrd 2776 |
. 2
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β (ββ(i Β· (ββπ΄))) = 0) |
92 | 5, 91 | reim0bd 15143 |
1
β’ (((π΄ β β β§ π΄ β 0) β§ (π΄βπ(1 /
2)) = -(ββπ΄))
β (i Β· (ββπ΄)) β β) |