| Step |
Hyp |
Ref |
Expression |
| 1 |
|
fourierdlem62.k |
⊢ 𝐾 = ( 𝑦 ∈ ( - π [,] π ) ↦ if ( 𝑦 = 0 , 1 , ( 𝑦 / ( 2 · ( sin ‘ ( 𝑦 / 2 ) ) ) ) ) ) |
| 2 |
|
eqeq1 |
⊢ ( 𝑦 = 𝑠 → ( 𝑦 = 0 ↔ 𝑠 = 0 ) ) |
| 3 |
|
id |
⊢ ( 𝑦 = 𝑠 → 𝑦 = 𝑠 ) |
| 4 |
|
oveq1 |
⊢ ( 𝑦 = 𝑠 → ( 𝑦 / 2 ) = ( 𝑠 / 2 ) ) |
| 5 |
4
|
fveq2d |
⊢ ( 𝑦 = 𝑠 → ( sin ‘ ( 𝑦 / 2 ) ) = ( sin ‘ ( 𝑠 / 2 ) ) ) |
| 6 |
5
|
oveq2d |
⊢ ( 𝑦 = 𝑠 → ( 2 · ( sin ‘ ( 𝑦 / 2 ) ) ) = ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) |
| 7 |
3 6
|
oveq12d |
⊢ ( 𝑦 = 𝑠 → ( 𝑦 / ( 2 · ( sin ‘ ( 𝑦 / 2 ) ) ) ) = ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) |
| 8 |
2 7
|
ifbieq2d |
⊢ ( 𝑦 = 𝑠 → if ( 𝑦 = 0 , 1 , ( 𝑦 / ( 2 · ( sin ‘ ( 𝑦 / 2 ) ) ) ) ) = if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) |
| 9 |
8
|
cbvmptv |
⊢ ( 𝑦 ∈ ( - π [,] π ) ↦ if ( 𝑦 = 0 , 1 , ( 𝑦 / ( 2 · ( sin ‘ ( 𝑦 / 2 ) ) ) ) ) ) = ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) |
| 10 |
1 9
|
eqtri |
⊢ 𝐾 = ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) |
| 11 |
10
|
fourierdlem43 |
⊢ 𝐾 : ( - π [,] π ) ⟶ ℝ |
| 12 |
|
ax-resscn |
⊢ ℝ ⊆ ℂ |
| 13 |
|
fss |
⊢ ( ( 𝐾 : ( - π [,] π ) ⟶ ℝ ∧ ℝ ⊆ ℂ ) → 𝐾 : ( - π [,] π ) ⟶ ℂ ) |
| 14 |
11 12 13
|
mp2an |
⊢ 𝐾 : ( - π [,] π ) ⟶ ℂ |
| 15 |
14
|
a1i |
⊢ ( 𝑠 = 0 → 𝐾 : ( - π [,] π ) ⟶ ℂ ) |
| 16 |
|
difss |
⊢ ( ( - π (,) π ) ∖ { 0 } ) ⊆ ( - π (,) π ) |
| 17 |
|
elioore |
⊢ ( 𝑠 ∈ ( - π (,) π ) → 𝑠 ∈ ℝ ) |
| 18 |
17
|
ssriv |
⊢ ( - π (,) π ) ⊆ ℝ |
| 19 |
16 18
|
sstri |
⊢ ( ( - π (,) π ) ∖ { 0 } ) ⊆ ℝ |
| 20 |
19
|
a1i |
⊢ ( ⊤ → ( ( - π (,) π ) ∖ { 0 } ) ⊆ ℝ ) |
| 21 |
|
eqid |
⊢ ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) |
| 22 |
19
|
sseli |
⊢ ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 𝑥 ∈ ℝ ) |
| 23 |
21 22
|
fmpti |
⊢ ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) : ( ( - π (,) π ) ∖ { 0 } ) ⟶ ℝ |
| 24 |
23
|
a1i |
⊢ ( ⊤ → ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) : ( ( - π (,) π ) ∖ { 0 } ) ⟶ ℝ ) |
| 25 |
|
eqid |
⊢ ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) |
| 26 |
|
2re |
⊢ 2 ∈ ℝ |
| 27 |
26
|
a1i |
⊢ ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 2 ∈ ℝ ) |
| 28 |
22
|
rehalfcld |
⊢ ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 𝑥 / 2 ) ∈ ℝ ) |
| 29 |
28
|
resincld |
⊢ ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( sin ‘ ( 𝑥 / 2 ) ) ∈ ℝ ) |
| 30 |
27 29
|
remulcld |
⊢ ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ∈ ℝ ) |
| 31 |
25 30
|
fmpti |
⊢ ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) : ( ( - π (,) π ) ∖ { 0 } ) ⟶ ℝ |
| 32 |
31
|
a1i |
⊢ ( ⊤ → ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) : ( ( - π (,) π ) ∖ { 0 } ) ⟶ ℝ ) |
| 33 |
|
iooretop |
⊢ ( - π (,) π ) ∈ ( topGen ‘ ran (,) ) |
| 34 |
33
|
a1i |
⊢ ( ⊤ → ( - π (,) π ) ∈ ( topGen ‘ ran (,) ) ) |
| 35 |
|
0re |
⊢ 0 ∈ ℝ |
| 36 |
|
negpilt0 |
⊢ - π < 0 |
| 37 |
|
pipos |
⊢ 0 < π |
| 38 |
|
pire |
⊢ π ∈ ℝ |
| 39 |
38
|
renegcli |
⊢ - π ∈ ℝ |
| 40 |
39
|
rexri |
⊢ - π ∈ ℝ* |
| 41 |
38
|
rexri |
⊢ π ∈ ℝ* |
| 42 |
|
elioo2 |
⊢ ( ( - π ∈ ℝ* ∧ π ∈ ℝ* ) → ( 0 ∈ ( - π (,) π ) ↔ ( 0 ∈ ℝ ∧ - π < 0 ∧ 0 < π ) ) ) |
| 43 |
40 41 42
|
mp2an |
⊢ ( 0 ∈ ( - π (,) π ) ↔ ( 0 ∈ ℝ ∧ - π < 0 ∧ 0 < π ) ) |
| 44 |
35 36 37 43
|
mpbir3an |
⊢ 0 ∈ ( - π (,) π ) |
| 45 |
44
|
a1i |
⊢ ( ⊤ → 0 ∈ ( - π (,) π ) ) |
| 46 |
|
eqid |
⊢ ( ( - π (,) π ) ∖ { 0 } ) = ( ( - π (,) π ) ∖ { 0 } ) |
| 47 |
|
1ex |
⊢ 1 ∈ V |
| 48 |
|
eqid |
⊢ ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 1 ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 1 ) |
| 49 |
47 48
|
dmmpti |
⊢ dom ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 1 ) = ( ( - π (,) π ) ∖ { 0 } ) |
| 50 |
|
reelprrecn |
⊢ ℝ ∈ { ℝ , ℂ } |
| 51 |
50
|
a1i |
⊢ ( ⊤ → ℝ ∈ { ℝ , ℂ } ) |
| 52 |
12
|
sseli |
⊢ ( 𝑥 ∈ ℝ → 𝑥 ∈ ℂ ) |
| 53 |
52
|
adantl |
⊢ ( ( ⊤ ∧ 𝑥 ∈ ℝ ) → 𝑥 ∈ ℂ ) |
| 54 |
|
1red |
⊢ ( ( ⊤ ∧ 𝑥 ∈ ℝ ) → 1 ∈ ℝ ) |
| 55 |
51
|
dvmptid |
⊢ ( ⊤ → ( ℝ D ( 𝑥 ∈ ℝ ↦ 𝑥 ) ) = ( 𝑥 ∈ ℝ ↦ 1 ) ) |
| 56 |
|
tgioo4 |
⊢ ( topGen ‘ ran (,) ) = ( ( TopOpen ‘ ℂfld ) ↾t ℝ ) |
| 57 |
|
eqid |
⊢ ( TopOpen ‘ ℂfld ) = ( TopOpen ‘ ℂfld ) |
| 58 |
|
sncldre |
⊢ ( 0 ∈ ℝ → { 0 } ∈ ( Clsd ‘ ( topGen ‘ ran (,) ) ) ) |
| 59 |
35 58
|
ax-mp |
⊢ { 0 } ∈ ( Clsd ‘ ( topGen ‘ ran (,) ) ) |
| 60 |
|
retopon |
⊢ ( topGen ‘ ran (,) ) ∈ ( TopOn ‘ ℝ ) |
| 61 |
60
|
toponunii |
⊢ ℝ = ∪ ( topGen ‘ ran (,) ) |
| 62 |
61
|
difopn |
⊢ ( ( ( - π (,) π ) ∈ ( topGen ‘ ran (,) ) ∧ { 0 } ∈ ( Clsd ‘ ( topGen ‘ ran (,) ) ) ) → ( ( - π (,) π ) ∖ { 0 } ) ∈ ( topGen ‘ ran (,) ) ) |
| 63 |
33 59 62
|
mp2an |
⊢ ( ( - π (,) π ) ∖ { 0 } ) ∈ ( topGen ‘ ran (,) ) |
| 64 |
63
|
a1i |
⊢ ( ⊤ → ( ( - π (,) π ) ∖ { 0 } ) ∈ ( topGen ‘ ran (,) ) ) |
| 65 |
51 53 54 55 20 56 57 64
|
dvmptres |
⊢ ( ⊤ → ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 1 ) ) |
| 66 |
65
|
mptru |
⊢ ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 1 ) |
| 67 |
66
|
eqcomi |
⊢ ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 1 ) = ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ) |
| 68 |
67
|
dmeqi |
⊢ dom ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 1 ) = dom ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ) |
| 69 |
49 68
|
eqtr3i |
⊢ ( ( - π (,) π ) ∖ { 0 } ) = dom ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ) |
| 70 |
69
|
eqimssi |
⊢ ( ( - π (,) π ) ∖ { 0 } ) ⊆ dom ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ) |
| 71 |
70
|
a1i |
⊢ ( ⊤ → ( ( - π (,) π ) ∖ { 0 } ) ⊆ dom ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ) ) |
| 72 |
|
fvex |
⊢ ( cos ‘ ( 𝑥 / 2 ) ) ∈ V |
| 73 |
|
eqid |
⊢ ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) |
| 74 |
72 73
|
dmmpti |
⊢ dom ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) = ( ( - π (,) π ) ∖ { 0 } ) |
| 75 |
|
2cnd |
⊢ ( ( ⊤ ∧ 𝑥 ∈ ℝ ) → 2 ∈ ℂ ) |
| 76 |
53
|
halfcld |
⊢ ( ( ⊤ ∧ 𝑥 ∈ ℝ ) → ( 𝑥 / 2 ) ∈ ℂ ) |
| 77 |
76
|
sincld |
⊢ ( ( ⊤ ∧ 𝑥 ∈ ℝ ) → ( sin ‘ ( 𝑥 / 2 ) ) ∈ ℂ ) |
| 78 |
75 77
|
mulcld |
⊢ ( ( ⊤ ∧ 𝑥 ∈ ℝ ) → ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ∈ ℂ ) |
| 79 |
76
|
coscld |
⊢ ( ( ⊤ ∧ 𝑥 ∈ ℝ ) → ( cos ‘ ( 𝑥 / 2 ) ) ∈ ℂ ) |
| 80 |
|
2cnd |
⊢ ( 𝑥 ∈ ℝ → 2 ∈ ℂ ) |
| 81 |
|
2ne0 |
⊢ 2 ≠ 0 |
| 82 |
81
|
a1i |
⊢ ( 𝑥 ∈ ℝ → 2 ≠ 0 ) |
| 83 |
52 80 82
|
divrec2d |
⊢ ( 𝑥 ∈ ℝ → ( 𝑥 / 2 ) = ( ( 1 / 2 ) · 𝑥 ) ) |
| 84 |
83
|
fveq2d |
⊢ ( 𝑥 ∈ ℝ → ( sin ‘ ( 𝑥 / 2 ) ) = ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) |
| 85 |
84
|
oveq2d |
⊢ ( 𝑥 ∈ ℝ → ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) = ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) |
| 86 |
85
|
mpteq2ia |
⊢ ( 𝑥 ∈ ℝ ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) = ( 𝑥 ∈ ℝ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) |
| 87 |
86
|
oveq2i |
⊢ ( ℝ D ( 𝑥 ∈ ℝ ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) = ( ℝ D ( 𝑥 ∈ ℝ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ) |
| 88 |
|
resmpt |
⊢ ( ℝ ⊆ ℂ → ( ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ↾ ℝ ) = ( 𝑥 ∈ ℝ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ) |
| 89 |
12 88
|
ax-mp |
⊢ ( ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ↾ ℝ ) = ( 𝑥 ∈ ℝ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) |
| 90 |
89
|
eqcomi |
⊢ ( 𝑥 ∈ ℝ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) = ( ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ↾ ℝ ) |
| 91 |
90
|
oveq2i |
⊢ ( ℝ D ( 𝑥 ∈ ℝ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ) = ( ℝ D ( ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ↾ ℝ ) ) |
| 92 |
|
eqid |
⊢ ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) = ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) |
| 93 |
|
2cnd |
⊢ ( 𝑥 ∈ ℂ → 2 ∈ ℂ ) |
| 94 |
|
halfcn |
⊢ ( 1 / 2 ) ∈ ℂ |
| 95 |
94
|
a1i |
⊢ ( 𝑥 ∈ ℂ → ( 1 / 2 ) ∈ ℂ ) |
| 96 |
|
id |
⊢ ( 𝑥 ∈ ℂ → 𝑥 ∈ ℂ ) |
| 97 |
95 96
|
mulcld |
⊢ ( 𝑥 ∈ ℂ → ( ( 1 / 2 ) · 𝑥 ) ∈ ℂ ) |
| 98 |
97
|
sincld |
⊢ ( 𝑥 ∈ ℂ → ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ∈ ℂ ) |
| 99 |
93 98
|
mulcld |
⊢ ( 𝑥 ∈ ℂ → ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ∈ ℂ ) |
| 100 |
92 99
|
fmpti |
⊢ ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) : ℂ ⟶ ℂ |
| 101 |
|
eqid |
⊢ ( 𝑥 ∈ ℂ ↦ ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) = ( 𝑥 ∈ ℂ ↦ ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) |
| 102 |
|
2cn |
⊢ 2 ∈ ℂ |
| 103 |
102 94
|
mulcli |
⊢ ( 2 · ( 1 / 2 ) ) ∈ ℂ |
| 104 |
103
|
a1i |
⊢ ( 𝑥 ∈ ℂ → ( 2 · ( 1 / 2 ) ) ∈ ℂ ) |
| 105 |
97
|
coscld |
⊢ ( 𝑥 ∈ ℂ → ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ∈ ℂ ) |
| 106 |
104 105
|
mulcld |
⊢ ( 𝑥 ∈ ℂ → ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ∈ ℂ ) |
| 107 |
106
|
adantl |
⊢ ( ( ⊤ ∧ 𝑥 ∈ ℂ ) → ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ∈ ℂ ) |
| 108 |
101 107
|
dmmptd |
⊢ ( ⊤ → dom ( 𝑥 ∈ ℂ ↦ ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) = ℂ ) |
| 109 |
108
|
mptru |
⊢ dom ( 𝑥 ∈ ℂ ↦ ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) = ℂ |
| 110 |
12 109
|
sseqtrri |
⊢ ℝ ⊆ dom ( 𝑥 ∈ ℂ ↦ ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) |
| 111 |
|
dvasinbx |
⊢ ( ( 2 ∈ ℂ ∧ ( 1 / 2 ) ∈ ℂ ) → ( ℂ D ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ) = ( 𝑥 ∈ ℂ ↦ ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ) |
| 112 |
102 94 111
|
mp2an |
⊢ ( ℂ D ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ) = ( 𝑥 ∈ ℂ ↦ ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) |
| 113 |
112
|
dmeqi |
⊢ dom ( ℂ D ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ) = dom ( 𝑥 ∈ ℂ ↦ ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) |
| 114 |
110 113
|
sseqtrri |
⊢ ℝ ⊆ dom ( ℂ D ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ) |
| 115 |
|
dvcnre |
⊢ ( ( ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) : ℂ ⟶ ℂ ∧ ℝ ⊆ dom ( ℂ D ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ) ) → ( ℝ D ( ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ↾ ℝ ) ) = ( ( ℂ D ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ) ↾ ℝ ) ) |
| 116 |
100 114 115
|
mp2an |
⊢ ( ℝ D ( ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ↾ ℝ ) ) = ( ( ℂ D ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ) ↾ ℝ ) |
| 117 |
112
|
reseq1i |
⊢ ( ( ℂ D ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ) ↾ ℝ ) = ( ( 𝑥 ∈ ℂ ↦ ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ↾ ℝ ) |
| 118 |
|
resmpt |
⊢ ( ℝ ⊆ ℂ → ( ( 𝑥 ∈ ℂ ↦ ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ↾ ℝ ) = ( 𝑥 ∈ ℝ ↦ ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ) |
| 119 |
12 118
|
ax-mp |
⊢ ( ( 𝑥 ∈ ℂ ↦ ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ↾ ℝ ) = ( 𝑥 ∈ ℝ ↦ ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) |
| 120 |
102 81
|
recidi |
⊢ ( 2 · ( 1 / 2 ) ) = 1 |
| 121 |
120
|
a1i |
⊢ ( 𝑥 ∈ ℝ → ( 2 · ( 1 / 2 ) ) = 1 ) |
| 122 |
83
|
eqcomd |
⊢ ( 𝑥 ∈ ℝ → ( ( 1 / 2 ) · 𝑥 ) = ( 𝑥 / 2 ) ) |
| 123 |
122
|
fveq2d |
⊢ ( 𝑥 ∈ ℝ → ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) = ( cos ‘ ( 𝑥 / 2 ) ) ) |
| 124 |
121 123
|
oveq12d |
⊢ ( 𝑥 ∈ ℝ → ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) = ( 1 · ( cos ‘ ( 𝑥 / 2 ) ) ) ) |
| 125 |
52
|
halfcld |
⊢ ( 𝑥 ∈ ℝ → ( 𝑥 / 2 ) ∈ ℂ ) |
| 126 |
125
|
coscld |
⊢ ( 𝑥 ∈ ℝ → ( cos ‘ ( 𝑥 / 2 ) ) ∈ ℂ ) |
| 127 |
126
|
mullidd |
⊢ ( 𝑥 ∈ ℝ → ( 1 · ( cos ‘ ( 𝑥 / 2 ) ) ) = ( cos ‘ ( 𝑥 / 2 ) ) ) |
| 128 |
124 127
|
eqtrd |
⊢ ( 𝑥 ∈ ℝ → ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) = ( cos ‘ ( 𝑥 / 2 ) ) ) |
| 129 |
128
|
mpteq2ia |
⊢ ( 𝑥 ∈ ℝ ↦ ( ( 2 · ( 1 / 2 ) ) · ( cos ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) = ( 𝑥 ∈ ℝ ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) |
| 130 |
117 119 129
|
3eqtri |
⊢ ( ( ℂ D ( 𝑥 ∈ ℂ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ) ↾ ℝ ) = ( 𝑥 ∈ ℝ ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) |
| 131 |
91 116 130
|
3eqtri |
⊢ ( ℝ D ( 𝑥 ∈ ℝ ↦ ( 2 · ( sin ‘ ( ( 1 / 2 ) · 𝑥 ) ) ) ) ) = ( 𝑥 ∈ ℝ ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) |
| 132 |
87 131
|
eqtri |
⊢ ( ℝ D ( 𝑥 ∈ ℝ ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) = ( 𝑥 ∈ ℝ ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) |
| 133 |
132
|
a1i |
⊢ ( ⊤ → ( ℝ D ( 𝑥 ∈ ℝ ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) = ( 𝑥 ∈ ℝ ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) ) |
| 134 |
51 78 79 133 20 56 57 64
|
dvmptres |
⊢ ( ⊤ → ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) ) |
| 135 |
134
|
mptru |
⊢ ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) |
| 136 |
135
|
eqcomi |
⊢ ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) = ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) |
| 137 |
136
|
dmeqi |
⊢ dom ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) = dom ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) |
| 138 |
74 137
|
eqtr3i |
⊢ ( ( - π (,) π ) ∖ { 0 } ) = dom ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) |
| 139 |
138
|
eqimssi |
⊢ ( ( - π (,) π ) ∖ { 0 } ) ⊆ dom ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) |
| 140 |
139
|
a1i |
⊢ ( ⊤ → ( ( - π (,) π ) ∖ { 0 } ) ⊆ dom ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) ) |
| 141 |
17
|
recnd |
⊢ ( 𝑠 ∈ ( - π (,) π ) → 𝑠 ∈ ℂ ) |
| 142 |
141
|
ssriv |
⊢ ( - π (,) π ) ⊆ ℂ |
| 143 |
142
|
a1i |
⊢ ( ⊤ → ( - π (,) π ) ⊆ ℂ ) |
| 144 |
|
ssid |
⊢ ℂ ⊆ ℂ |
| 145 |
144
|
a1i |
⊢ ( ⊤ → ℂ ⊆ ℂ ) |
| 146 |
143 145
|
idcncfg |
⊢ ( ⊤ → ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ∈ ( ( - π (,) π ) –cn→ ℂ ) ) |
| 147 |
146
|
mptru |
⊢ ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ∈ ( ( - π (,) π ) –cn→ ℂ ) |
| 148 |
|
cnlimc |
⊢ ( ( - π (,) π ) ⊆ ℂ → ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ∈ ( ( - π (,) π ) –cn→ ℂ ) ↔ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) : ( - π (,) π ) ⟶ ℂ ∧ ∀ 𝑦 ∈ ( - π (,) π ) ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ‘ 𝑦 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) limℂ 𝑦 ) ) ) ) |
| 149 |
142 148
|
ax-mp |
⊢ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ∈ ( ( - π (,) π ) –cn→ ℂ ) ↔ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) : ( - π (,) π ) ⟶ ℂ ∧ ∀ 𝑦 ∈ ( - π (,) π ) ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ‘ 𝑦 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) limℂ 𝑦 ) ) ) |
| 150 |
147 149
|
mpbi |
⊢ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) : ( - π (,) π ) ⟶ ℂ ∧ ∀ 𝑦 ∈ ( - π (,) π ) ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ‘ 𝑦 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) limℂ 𝑦 ) ) |
| 151 |
150
|
simpri |
⊢ ∀ 𝑦 ∈ ( - π (,) π ) ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ‘ 𝑦 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) limℂ 𝑦 ) |
| 152 |
|
fveq2 |
⊢ ( 𝑦 = 0 → ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ‘ 𝑦 ) = ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ‘ 0 ) ) |
| 153 |
|
oveq2 |
⊢ ( 𝑦 = 0 → ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) limℂ 𝑦 ) = ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) limℂ 0 ) ) |
| 154 |
152 153
|
eleq12d |
⊢ ( 𝑦 = 0 → ( ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ‘ 𝑦 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) limℂ 𝑦 ) ↔ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ‘ 0 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) limℂ 0 ) ) ) |
| 155 |
154
|
rspccva |
⊢ ( ( ∀ 𝑦 ∈ ( - π (,) π ) ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ‘ 𝑦 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) limℂ 𝑦 ) ∧ 0 ∈ ( - π (,) π ) ) → ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ‘ 0 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) limℂ 0 ) ) |
| 156 |
151 44 155
|
mp2an |
⊢ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ‘ 0 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) limℂ 0 ) |
| 157 |
|
id |
⊢ ( 𝑥 = 0 → 𝑥 = 0 ) |
| 158 |
|
eqid |
⊢ ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) = ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) |
| 159 |
|
c0ex |
⊢ 0 ∈ V |
| 160 |
157 158 159
|
fvmpt |
⊢ ( 0 ∈ ( - π (,) π ) → ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ‘ 0 ) = 0 ) |
| 161 |
44 160
|
ax-mp |
⊢ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ‘ 0 ) = 0 |
| 162 |
|
elioore |
⊢ ( 𝑥 ∈ ( - π (,) π ) → 𝑥 ∈ ℝ ) |
| 163 |
162
|
recnd |
⊢ ( 𝑥 ∈ ( - π (,) π ) → 𝑥 ∈ ℂ ) |
| 164 |
158 163
|
fmpti |
⊢ ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) : ( - π (,) π ) ⟶ ℂ |
| 165 |
164
|
a1i |
⊢ ( ⊤ → ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) : ( - π (,) π ) ⟶ ℂ ) |
| 166 |
165
|
limcdif |
⊢ ( ⊤ → ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) limℂ 0 ) = ( ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) limℂ 0 ) ) |
| 167 |
166
|
mptru |
⊢ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) limℂ 0 ) = ( ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) limℂ 0 ) |
| 168 |
|
resmpt |
⊢ ( ( ( - π (,) π ) ∖ { 0 } ) ⊆ ( - π (,) π ) → ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ) |
| 169 |
16 168
|
ax-mp |
⊢ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) |
| 170 |
169
|
oveq1i |
⊢ ( ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) limℂ 0 ) = ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) limℂ 0 ) |
| 171 |
167 170
|
eqtri |
⊢ ( ( 𝑥 ∈ ( - π (,) π ) ↦ 𝑥 ) limℂ 0 ) = ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) limℂ 0 ) |
| 172 |
156 161 171
|
3eltr3i |
⊢ 0 ∈ ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) limℂ 0 ) |
| 173 |
172
|
a1i |
⊢ ( ⊤ → 0 ∈ ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) limℂ 0 ) ) |
| 174 |
|
eqid |
⊢ ( 𝑥 ∈ ℂ ↦ 2 ) = ( 𝑥 ∈ ℂ ↦ 2 ) |
| 175 |
144
|
a1i |
⊢ ( 2 ∈ ℂ → ℂ ⊆ ℂ ) |
| 176 |
|
2cnd |
⊢ ( 2 ∈ ℂ → 2 ∈ ℂ ) |
| 177 |
175 176 175
|
constcncfg |
⊢ ( 2 ∈ ℂ → ( 𝑥 ∈ ℂ ↦ 2 ) ∈ ( ℂ –cn→ ℂ ) ) |
| 178 |
102 177
|
mp1i |
⊢ ( ⊤ → ( 𝑥 ∈ ℂ ↦ 2 ) ∈ ( ℂ –cn→ ℂ ) ) |
| 179 |
|
2cnd |
⊢ ( ( ⊤ ∧ 𝑥 ∈ ( - π (,) π ) ) → 2 ∈ ℂ ) |
| 180 |
174 178 143 145 179
|
cncfmptssg |
⊢ ( ⊤ → ( 𝑥 ∈ ( - π (,) π ) ↦ 2 ) ∈ ( ( - π (,) π ) –cn→ ℂ ) ) |
| 181 |
|
sincn |
⊢ sin ∈ ( ℂ –cn→ ℂ ) |
| 182 |
181
|
a1i |
⊢ ( ⊤ → sin ∈ ( ℂ –cn→ ℂ ) ) |
| 183 |
|
eqid |
⊢ ( 𝑥 ∈ ℂ ↦ ( 𝑥 / 2 ) ) = ( 𝑥 ∈ ℂ ↦ ( 𝑥 / 2 ) ) |
| 184 |
183
|
divccncf |
⊢ ( ( 2 ∈ ℂ ∧ 2 ≠ 0 ) → ( 𝑥 ∈ ℂ ↦ ( 𝑥 / 2 ) ) ∈ ( ℂ –cn→ ℂ ) ) |
| 185 |
102 81 184
|
mp2an |
⊢ ( 𝑥 ∈ ℂ ↦ ( 𝑥 / 2 ) ) ∈ ( ℂ –cn→ ℂ ) |
| 186 |
185
|
a1i |
⊢ ( ⊤ → ( 𝑥 ∈ ℂ ↦ ( 𝑥 / 2 ) ) ∈ ( ℂ –cn→ ℂ ) ) |
| 187 |
163
|
adantl |
⊢ ( ( ⊤ ∧ 𝑥 ∈ ( - π (,) π ) ) → 𝑥 ∈ ℂ ) |
| 188 |
187
|
halfcld |
⊢ ( ( ⊤ ∧ 𝑥 ∈ ( - π (,) π ) ) → ( 𝑥 / 2 ) ∈ ℂ ) |
| 189 |
183 186 143 145 188
|
cncfmptssg |
⊢ ( ⊤ → ( 𝑥 ∈ ( - π (,) π ) ↦ ( 𝑥 / 2 ) ) ∈ ( ( - π (,) π ) –cn→ ℂ ) ) |
| 190 |
182 189
|
cncfmpt1f |
⊢ ( ⊤ → ( 𝑥 ∈ ( - π (,) π ) ↦ ( sin ‘ ( 𝑥 / 2 ) ) ) ∈ ( ( - π (,) π ) –cn→ ℂ ) ) |
| 191 |
180 190
|
mulcncf |
⊢ ( ⊤ → ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ∈ ( ( - π (,) π ) –cn→ ℂ ) ) |
| 192 |
191
|
mptru |
⊢ ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ∈ ( ( - π (,) π ) –cn→ ℂ ) |
| 193 |
|
cnlimc |
⊢ ( ( - π (,) π ) ⊆ ℂ → ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ∈ ( ( - π (,) π ) –cn→ ℂ ) ↔ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) : ( - π (,) π ) ⟶ ℂ ∧ ∀ 𝑦 ∈ ( - π (,) π ) ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑦 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 𝑦 ) ) ) ) |
| 194 |
142 193
|
ax-mp |
⊢ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ∈ ( ( - π (,) π ) –cn→ ℂ ) ↔ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) : ( - π (,) π ) ⟶ ℂ ∧ ∀ 𝑦 ∈ ( - π (,) π ) ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑦 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 𝑦 ) ) ) |
| 195 |
192 194
|
mpbi |
⊢ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) : ( - π (,) π ) ⟶ ℂ ∧ ∀ 𝑦 ∈ ( - π (,) π ) ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑦 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 𝑦 ) ) |
| 196 |
195
|
simpri |
⊢ ∀ 𝑦 ∈ ( - π (,) π ) ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑦 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 𝑦 ) |
| 197 |
|
fveq2 |
⊢ ( 𝑦 = 0 → ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑦 ) = ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 0 ) ) |
| 198 |
|
oveq2 |
⊢ ( 𝑦 = 0 → ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 𝑦 ) = ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 0 ) ) |
| 199 |
197 198
|
eleq12d |
⊢ ( 𝑦 = 0 → ( ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑦 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 𝑦 ) ↔ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 0 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 0 ) ) ) |
| 200 |
199
|
rspccva |
⊢ ( ( ∀ 𝑦 ∈ ( - π (,) π ) ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑦 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 𝑦 ) ∧ 0 ∈ ( - π (,) π ) ) → ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 0 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 0 ) ) |
| 201 |
196 44 200
|
mp2an |
⊢ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 0 ) ∈ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 0 ) |
| 202 |
|
oveq1 |
⊢ ( 𝑥 = 0 → ( 𝑥 / 2 ) = ( 0 / 2 ) ) |
| 203 |
102 81
|
div0i |
⊢ ( 0 / 2 ) = 0 |
| 204 |
202 203
|
eqtrdi |
⊢ ( 𝑥 = 0 → ( 𝑥 / 2 ) = 0 ) |
| 205 |
204
|
fveq2d |
⊢ ( 𝑥 = 0 → ( sin ‘ ( 𝑥 / 2 ) ) = ( sin ‘ 0 ) ) |
| 206 |
|
sin0 |
⊢ ( sin ‘ 0 ) = 0 |
| 207 |
205 206
|
eqtrdi |
⊢ ( 𝑥 = 0 → ( sin ‘ ( 𝑥 / 2 ) ) = 0 ) |
| 208 |
207
|
oveq2d |
⊢ ( 𝑥 = 0 → ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) = ( 2 · 0 ) ) |
| 209 |
|
2t0e0 |
⊢ ( 2 · 0 ) = 0 |
| 210 |
208 209
|
eqtrdi |
⊢ ( 𝑥 = 0 → ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) = 0 ) |
| 211 |
|
eqid |
⊢ ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) = ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) |
| 212 |
210 211 159
|
fvmpt |
⊢ ( 0 ∈ ( - π (,) π ) → ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 0 ) = 0 ) |
| 213 |
44 212
|
ax-mp |
⊢ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 0 ) = 0 |
| 214 |
|
2cnd |
⊢ ( 𝑥 ∈ ( - π (,) π ) → 2 ∈ ℂ ) |
| 215 |
163
|
halfcld |
⊢ ( 𝑥 ∈ ( - π (,) π ) → ( 𝑥 / 2 ) ∈ ℂ ) |
| 216 |
215
|
sincld |
⊢ ( 𝑥 ∈ ( - π (,) π ) → ( sin ‘ ( 𝑥 / 2 ) ) ∈ ℂ ) |
| 217 |
214 216
|
mulcld |
⊢ ( 𝑥 ∈ ( - π (,) π ) → ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ∈ ℂ ) |
| 218 |
211 217
|
fmpti |
⊢ ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) : ( - π (,) π ) ⟶ ℂ |
| 219 |
218
|
a1i |
⊢ ( ⊤ → ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) : ( - π (,) π ) ⟶ ℂ ) |
| 220 |
219
|
limcdif |
⊢ ( ⊤ → ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 0 ) = ( ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) limℂ 0 ) ) |
| 221 |
220
|
mptru |
⊢ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 0 ) = ( ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) limℂ 0 ) |
| 222 |
|
resmpt |
⊢ ( ( ( - π (,) π ) ∖ { 0 } ) ⊆ ( - π (,) π ) → ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) |
| 223 |
16 222
|
ax-mp |
⊢ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) |
| 224 |
223
|
oveq1i |
⊢ ( ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) limℂ 0 ) = ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 0 ) |
| 225 |
221 224
|
eqtri |
⊢ ( ( 𝑥 ∈ ( - π (,) π ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 0 ) = ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 0 ) |
| 226 |
201 213 225
|
3eltr3i |
⊢ 0 ∈ ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 0 ) |
| 227 |
226
|
a1i |
⊢ ( ⊤ → 0 ∈ ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) limℂ 0 ) ) |
| 228 |
|
eqidd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) |
| 229 |
|
oveq1 |
⊢ ( 𝑥 = 𝑦 → ( 𝑥 / 2 ) = ( 𝑦 / 2 ) ) |
| 230 |
229
|
fveq2d |
⊢ ( 𝑥 = 𝑦 → ( sin ‘ ( 𝑥 / 2 ) ) = ( sin ‘ ( 𝑦 / 2 ) ) ) |
| 231 |
230
|
oveq2d |
⊢ ( 𝑥 = 𝑦 → ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) = ( 2 · ( sin ‘ ( 𝑦 / 2 ) ) ) ) |
| 232 |
231
|
adantl |
⊢ ( ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) ∧ 𝑥 = 𝑦 ) → ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) = ( 2 · ( sin ‘ ( 𝑦 / 2 ) ) ) ) |
| 233 |
|
id |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) ) |
| 234 |
26
|
a1i |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 2 ∈ ℝ ) |
| 235 |
19
|
sseli |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 𝑦 ∈ ℝ ) |
| 236 |
235
|
rehalfcld |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 𝑦 / 2 ) ∈ ℝ ) |
| 237 |
236
|
resincld |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( sin ‘ ( 𝑦 / 2 ) ) ∈ ℝ ) |
| 238 |
234 237
|
remulcld |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 2 · ( sin ‘ ( 𝑦 / 2 ) ) ) ∈ ℝ ) |
| 239 |
228 232 233 238
|
fvmptd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑦 ) = ( 2 · ( sin ‘ ( 𝑦 / 2 ) ) ) ) |
| 240 |
|
2cnd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 2 ∈ ℂ ) |
| 241 |
237
|
recnd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( sin ‘ ( 𝑦 / 2 ) ) ∈ ℂ ) |
| 242 |
81
|
a1i |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 2 ≠ 0 ) |
| 243 |
|
ioossicc |
⊢ ( - π (,) π ) ⊆ ( - π [,] π ) |
| 244 |
|
eldifi |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 𝑦 ∈ ( - π (,) π ) ) |
| 245 |
243 244
|
sselid |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 𝑦 ∈ ( - π [,] π ) ) |
| 246 |
|
eldifsni |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 𝑦 ≠ 0 ) |
| 247 |
|
fourierdlem44 |
⊢ ( ( 𝑦 ∈ ( - π [,] π ) ∧ 𝑦 ≠ 0 ) → ( sin ‘ ( 𝑦 / 2 ) ) ≠ 0 ) |
| 248 |
245 246 247
|
syl2anc |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( sin ‘ ( 𝑦 / 2 ) ) ≠ 0 ) |
| 249 |
240 241 242 248
|
mulne0d |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 2 · ( sin ‘ ( 𝑦 / 2 ) ) ) ≠ 0 ) |
| 250 |
239 249
|
eqnetrd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑦 ) ≠ 0 ) |
| 251 |
250
|
neneqd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ¬ ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑦 ) = 0 ) |
| 252 |
251
|
nrex |
⊢ ¬ ∃ 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑦 ) = 0 |
| 253 |
25
|
fnmpt |
⊢ ( ∀ 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ∈ ℝ → ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) Fn ( ( - π (,) π ) ∖ { 0 } ) ) |
| 254 |
253 30
|
mprg |
⊢ ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) Fn ( ( - π (,) π ) ∖ { 0 } ) |
| 255 |
|
ssid |
⊢ ( ( - π (,) π ) ∖ { 0 } ) ⊆ ( ( - π (,) π ) ∖ { 0 } ) |
| 256 |
|
fvelimab |
⊢ ( ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) Fn ( ( - π (,) π ) ∖ { 0 } ) ∧ ( ( - π (,) π ) ∖ { 0 } ) ⊆ ( ( - π (,) π ) ∖ { 0 } ) ) → ( 0 ∈ ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) “ ( ( - π (,) π ) ∖ { 0 } ) ) ↔ ∃ 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑦 ) = 0 ) ) |
| 257 |
254 255 256
|
mp2an |
⊢ ( 0 ∈ ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) “ ( ( - π (,) π ) ∖ { 0 } ) ) ↔ ∃ 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑦 ) = 0 ) |
| 258 |
252 257
|
mtbir |
⊢ ¬ 0 ∈ ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) “ ( ( - π (,) π ) ∖ { 0 } ) ) |
| 259 |
258
|
a1i |
⊢ ( ⊤ → ¬ 0 ∈ ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) “ ( ( - π (,) π ) ∖ { 0 } ) ) ) |
| 260 |
|
eqidd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) ) |
| 261 |
229
|
fveq2d |
⊢ ( 𝑥 = 𝑦 → ( cos ‘ ( 𝑥 / 2 ) ) = ( cos ‘ ( 𝑦 / 2 ) ) ) |
| 262 |
261
|
adantl |
⊢ ( ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) ∧ 𝑥 = 𝑦 ) → ( cos ‘ ( 𝑥 / 2 ) ) = ( cos ‘ ( 𝑦 / 2 ) ) ) |
| 263 |
235
|
recnd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 𝑦 ∈ ℂ ) |
| 264 |
263
|
halfcld |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 𝑦 / 2 ) ∈ ℂ ) |
| 265 |
264
|
coscld |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( cos ‘ ( 𝑦 / 2 ) ) ∈ ℂ ) |
| 266 |
260 262 233 265
|
fvmptd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) ‘ 𝑦 ) = ( cos ‘ ( 𝑦 / 2 ) ) ) |
| 267 |
236
|
rered |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( ℜ ‘ ( 𝑦 / 2 ) ) = ( 𝑦 / 2 ) ) |
| 268 |
|
halfpire |
⊢ ( π / 2 ) ∈ ℝ |
| 269 |
268
|
renegcli |
⊢ - ( π / 2 ) ∈ ℝ |
| 270 |
269
|
a1i |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → - ( π / 2 ) ∈ ℝ ) |
| 271 |
270
|
rexrd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → - ( π / 2 ) ∈ ℝ* ) |
| 272 |
268
|
a1i |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( π / 2 ) ∈ ℝ ) |
| 273 |
272
|
rexrd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( π / 2 ) ∈ ℝ* ) |
| 274 |
|
picn |
⊢ π ∈ ℂ |
| 275 |
|
divneg |
⊢ ( ( π ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0 ) → - ( π / 2 ) = ( - π / 2 ) ) |
| 276 |
274 102 81 275
|
mp3an |
⊢ - ( π / 2 ) = ( - π / 2 ) |
| 277 |
39
|
a1i |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → - π ∈ ℝ ) |
| 278 |
|
2rp |
⊢ 2 ∈ ℝ+ |
| 279 |
278
|
a1i |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 2 ∈ ℝ+ ) |
| 280 |
40
|
a1i |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → - π ∈ ℝ* ) |
| 281 |
41
|
a1i |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → π ∈ ℝ* ) |
| 282 |
|
ioogtlb |
⊢ ( ( - π ∈ ℝ* ∧ π ∈ ℝ* ∧ 𝑦 ∈ ( - π (,) π ) ) → - π < 𝑦 ) |
| 283 |
280 281 244 282
|
syl3anc |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → - π < 𝑦 ) |
| 284 |
277 235 279 283
|
ltdiv1dd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( - π / 2 ) < ( 𝑦 / 2 ) ) |
| 285 |
276 284
|
eqbrtrid |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → - ( π / 2 ) < ( 𝑦 / 2 ) ) |
| 286 |
38
|
a1i |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → π ∈ ℝ ) |
| 287 |
|
iooltub |
⊢ ( ( - π ∈ ℝ* ∧ π ∈ ℝ* ∧ 𝑦 ∈ ( - π (,) π ) ) → 𝑦 < π ) |
| 288 |
280 281 244 287
|
syl3anc |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 𝑦 < π ) |
| 289 |
235 286 279 288
|
ltdiv1dd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 𝑦 / 2 ) < ( π / 2 ) ) |
| 290 |
271 273 236 285 289
|
eliood |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 𝑦 / 2 ) ∈ ( - ( π / 2 ) (,) ( π / 2 ) ) ) |
| 291 |
267 290
|
eqeltrd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( ℜ ‘ ( 𝑦 / 2 ) ) ∈ ( - ( π / 2 ) (,) ( π / 2 ) ) ) |
| 292 |
|
cosne0 |
⊢ ( ( ( 𝑦 / 2 ) ∈ ℂ ∧ ( ℜ ‘ ( 𝑦 / 2 ) ) ∈ ( - ( π / 2 ) (,) ( π / 2 ) ) ) → ( cos ‘ ( 𝑦 / 2 ) ) ≠ 0 ) |
| 293 |
264 291 292
|
syl2anc |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( cos ‘ ( 𝑦 / 2 ) ) ≠ 0 ) |
| 294 |
266 293
|
eqnetrd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) ‘ 𝑦 ) ≠ 0 ) |
| 295 |
294
|
neneqd |
⊢ ( 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ¬ ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) ‘ 𝑦 ) = 0 ) |
| 296 |
295
|
nrex |
⊢ ¬ ∃ 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) ‘ 𝑦 ) = 0 |
| 297 |
72 73
|
fnmpti |
⊢ ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) Fn ( ( - π (,) π ) ∖ { 0 } ) |
| 298 |
|
fvelimab |
⊢ ( ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) Fn ( ( - π (,) π ) ∖ { 0 } ) ∧ ( ( - π (,) π ) ∖ { 0 } ) ⊆ ( ( - π (,) π ) ∖ { 0 } ) ) → ( 0 ∈ ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) “ ( ( - π (,) π ) ∖ { 0 } ) ) ↔ ∃ 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) ‘ 𝑦 ) = 0 ) ) |
| 299 |
297 255 298
|
mp2an |
⊢ ( 0 ∈ ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) “ ( ( - π (,) π ) ∖ { 0 } ) ) ↔ ∃ 𝑦 ∈ ( ( - π (,) π ) ∖ { 0 } ) ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) ‘ 𝑦 ) = 0 ) |
| 300 |
296 299
|
mtbir |
⊢ ¬ 0 ∈ ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) “ ( ( - π (,) π ) ∖ { 0 } ) ) |
| 301 |
135
|
imaeq1i |
⊢ ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) “ ( ( - π (,) π ) ∖ { 0 } ) ) = ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) “ ( ( - π (,) π ) ∖ { 0 } ) ) |
| 302 |
301
|
eleq2i |
⊢ ( 0 ∈ ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) “ ( ( - π (,) π ) ∖ { 0 } ) ) ↔ 0 ∈ ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) “ ( ( - π (,) π ) ∖ { 0 } ) ) ) |
| 303 |
300 302
|
mtbir |
⊢ ¬ 0 ∈ ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) “ ( ( - π (,) π ) ∖ { 0 } ) ) |
| 304 |
303
|
a1i |
⊢ ( ⊤ → ¬ 0 ∈ ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) “ ( ( - π (,) π ) ∖ { 0 } ) ) ) |
| 305 |
|
eqid |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑠 / 2 ) ) ) = ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑠 / 2 ) ) ) |
| 306 |
|
eqid |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 1 / ( cos ‘ ( 𝑠 / 2 ) ) ) ) = ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 1 / ( cos ‘ ( 𝑠 / 2 ) ) ) ) |
| 307 |
19
|
sseli |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 𝑠 ∈ ℝ ) |
| 308 |
307
|
recnd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 𝑠 ∈ ℂ ) |
| 309 |
308
|
halfcld |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 𝑠 / 2 ) ∈ ℂ ) |
| 310 |
309
|
coscld |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( cos ‘ ( 𝑠 / 2 ) ) ∈ ℂ ) |
| 311 |
307
|
rehalfcld |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 𝑠 / 2 ) ∈ ℝ ) |
| 312 |
311
|
rered |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( ℜ ‘ ( 𝑠 / 2 ) ) = ( 𝑠 / 2 ) ) |
| 313 |
269
|
a1i |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → - ( π / 2 ) ∈ ℝ ) |
| 314 |
313
|
rexrd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → - ( π / 2 ) ∈ ℝ* ) |
| 315 |
268
|
a1i |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( π / 2 ) ∈ ℝ ) |
| 316 |
315
|
rexrd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( π / 2 ) ∈ ℝ* ) |
| 317 |
38
|
a1i |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → π ∈ ℝ ) |
| 318 |
317
|
renegcld |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → - π ∈ ℝ ) |
| 319 |
278
|
a1i |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 2 ∈ ℝ+ ) |
| 320 |
40
|
a1i |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → - π ∈ ℝ* ) |
| 321 |
41
|
a1i |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → π ∈ ℝ* ) |
| 322 |
|
eldifi |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 𝑠 ∈ ( - π (,) π ) ) |
| 323 |
|
ioogtlb |
⊢ ( ( - π ∈ ℝ* ∧ π ∈ ℝ* ∧ 𝑠 ∈ ( - π (,) π ) ) → - π < 𝑠 ) |
| 324 |
320 321 322 323
|
syl3anc |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → - π < 𝑠 ) |
| 325 |
318 307 319 324
|
ltdiv1dd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( - π / 2 ) < ( 𝑠 / 2 ) ) |
| 326 |
276 325
|
eqbrtrid |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → - ( π / 2 ) < ( 𝑠 / 2 ) ) |
| 327 |
|
iooltub |
⊢ ( ( - π ∈ ℝ* ∧ π ∈ ℝ* ∧ 𝑠 ∈ ( - π (,) π ) ) → 𝑠 < π ) |
| 328 |
320 321 322 327
|
syl3anc |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 𝑠 < π ) |
| 329 |
307 317 319 328
|
ltdiv1dd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 𝑠 / 2 ) < ( π / 2 ) ) |
| 330 |
314 316 311 326 329
|
eliood |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 𝑠 / 2 ) ∈ ( - ( π / 2 ) (,) ( π / 2 ) ) ) |
| 331 |
312 330
|
eqeltrd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( ℜ ‘ ( 𝑠 / 2 ) ) ∈ ( - ( π / 2 ) (,) ( π / 2 ) ) ) |
| 332 |
|
cosne0 |
⊢ ( ( ( 𝑠 / 2 ) ∈ ℂ ∧ ( ℜ ‘ ( 𝑠 / 2 ) ) ∈ ( - ( π / 2 ) (,) ( π / 2 ) ) ) → ( cos ‘ ( 𝑠 / 2 ) ) ≠ 0 ) |
| 333 |
309 331 332
|
syl2anc |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( cos ‘ ( 𝑠 / 2 ) ) ≠ 0 ) |
| 334 |
333
|
neneqd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ¬ ( cos ‘ ( 𝑠 / 2 ) ) = 0 ) |
| 335 |
311
|
recoscld |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( cos ‘ ( 𝑠 / 2 ) ) ∈ ℝ ) |
| 336 |
|
elsng |
⊢ ( ( cos ‘ ( 𝑠 / 2 ) ) ∈ ℝ → ( ( cos ‘ ( 𝑠 / 2 ) ) ∈ { 0 } ↔ ( cos ‘ ( 𝑠 / 2 ) ) = 0 ) ) |
| 337 |
335 336
|
syl |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( ( cos ‘ ( 𝑠 / 2 ) ) ∈ { 0 } ↔ ( cos ‘ ( 𝑠 / 2 ) ) = 0 ) ) |
| 338 |
334 337
|
mtbird |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ¬ ( cos ‘ ( 𝑠 / 2 ) ) ∈ { 0 } ) |
| 339 |
310 338
|
eldifd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( cos ‘ ( 𝑠 / 2 ) ) ∈ ( ℂ ∖ { 0 } ) ) |
| 340 |
339
|
adantl |
⊢ ( ( ⊤ ∧ 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ) → ( cos ‘ ( 𝑠 / 2 ) ) ∈ ( ℂ ∖ { 0 } ) ) |
| 341 |
309
|
ad2antrl |
⊢ ( ( ⊤ ∧ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ∧ ( 𝑠 / 2 ) ≠ 0 ) ) → ( 𝑠 / 2 ) ∈ ℂ ) |
| 342 |
|
cosf |
⊢ cos : ℂ ⟶ ℂ |
| 343 |
342
|
a1i |
⊢ ( ⊤ → cos : ℂ ⟶ ℂ ) |
| 344 |
343
|
ffvelcdmda |
⊢ ( ( ⊤ ∧ 𝑥 ∈ ℂ ) → ( cos ‘ 𝑥 ) ∈ ℂ ) |
| 345 |
|
eqid |
⊢ ( 𝑠 ∈ ℂ ↦ ( 𝑠 / 2 ) ) = ( 𝑠 ∈ ℂ ↦ ( 𝑠 / 2 ) ) |
| 346 |
345
|
divccncf |
⊢ ( ( 2 ∈ ℂ ∧ 2 ≠ 0 ) → ( 𝑠 ∈ ℂ ↦ ( 𝑠 / 2 ) ) ∈ ( ℂ –cn→ ℂ ) ) |
| 347 |
102 81 346
|
mp2an |
⊢ ( 𝑠 ∈ ℂ ↦ ( 𝑠 / 2 ) ) ∈ ( ℂ –cn→ ℂ ) |
| 348 |
347
|
a1i |
⊢ ( ⊤ → ( 𝑠 ∈ ℂ ↦ ( 𝑠 / 2 ) ) ∈ ( ℂ –cn→ ℂ ) ) |
| 349 |
141
|
adantl |
⊢ ( ( ⊤ ∧ 𝑠 ∈ ( - π (,) π ) ) → 𝑠 ∈ ℂ ) |
| 350 |
349
|
halfcld |
⊢ ( ( ⊤ ∧ 𝑠 ∈ ( - π (,) π ) ) → ( 𝑠 / 2 ) ∈ ℂ ) |
| 351 |
345 348 143 145 350
|
cncfmptssg |
⊢ ( ⊤ → ( 𝑠 ∈ ( - π (,) π ) ↦ ( 𝑠 / 2 ) ) ∈ ( ( - π (,) π ) –cn→ ℂ ) ) |
| 352 |
|
oveq1 |
⊢ ( 𝑠 = 0 → ( 𝑠 / 2 ) = ( 0 / 2 ) ) |
| 353 |
352 203
|
eqtrdi |
⊢ ( 𝑠 = 0 → ( 𝑠 / 2 ) = 0 ) |
| 354 |
351 45 353
|
cnmptlimc |
⊢ ( ⊤ → 0 ∈ ( ( 𝑠 ∈ ( - π (,) π ) ↦ ( 𝑠 / 2 ) ) limℂ 0 ) ) |
| 355 |
|
eqid |
⊢ ( 𝑠 ∈ ( - π (,) π ) ↦ ( 𝑠 / 2 ) ) = ( 𝑠 ∈ ( - π (,) π ) ↦ ( 𝑠 / 2 ) ) |
| 356 |
141
|
halfcld |
⊢ ( 𝑠 ∈ ( - π (,) π ) → ( 𝑠 / 2 ) ∈ ℂ ) |
| 357 |
355 356
|
fmpti |
⊢ ( 𝑠 ∈ ( - π (,) π ) ↦ ( 𝑠 / 2 ) ) : ( - π (,) π ) ⟶ ℂ |
| 358 |
357
|
a1i |
⊢ ( ⊤ → ( 𝑠 ∈ ( - π (,) π ) ↦ ( 𝑠 / 2 ) ) : ( - π (,) π ) ⟶ ℂ ) |
| 359 |
358
|
limcdif |
⊢ ( ⊤ → ( ( 𝑠 ∈ ( - π (,) π ) ↦ ( 𝑠 / 2 ) ) limℂ 0 ) = ( ( ( 𝑠 ∈ ( - π (,) π ) ↦ ( 𝑠 / 2 ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) limℂ 0 ) ) |
| 360 |
359
|
mptru |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ↦ ( 𝑠 / 2 ) ) limℂ 0 ) = ( ( ( 𝑠 ∈ ( - π (,) π ) ↦ ( 𝑠 / 2 ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) limℂ 0 ) |
| 361 |
|
resmpt |
⊢ ( ( ( - π (,) π ) ∖ { 0 } ) ⊆ ( - π (,) π ) → ( ( 𝑠 ∈ ( - π (,) π ) ↦ ( 𝑠 / 2 ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) = ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 𝑠 / 2 ) ) ) |
| 362 |
16 361
|
ax-mp |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ↦ ( 𝑠 / 2 ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) = ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 𝑠 / 2 ) ) |
| 363 |
362
|
oveq1i |
⊢ ( ( ( 𝑠 ∈ ( - π (,) π ) ↦ ( 𝑠 / 2 ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) limℂ 0 ) = ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 𝑠 / 2 ) ) limℂ 0 ) |
| 364 |
360 363
|
eqtri |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ↦ ( 𝑠 / 2 ) ) limℂ 0 ) = ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 𝑠 / 2 ) ) limℂ 0 ) |
| 365 |
354 364
|
eleqtrdi |
⊢ ( ⊤ → 0 ∈ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 𝑠 / 2 ) ) limℂ 0 ) ) |
| 366 |
|
ffn |
⊢ ( cos : ℂ ⟶ ℂ → cos Fn ℂ ) |
| 367 |
342 366
|
ax-mp |
⊢ cos Fn ℂ |
| 368 |
|
dffn5 |
⊢ ( cos Fn ℂ ↔ cos = ( 𝑥 ∈ ℂ ↦ ( cos ‘ 𝑥 ) ) ) |
| 369 |
367 368
|
mpbi |
⊢ cos = ( 𝑥 ∈ ℂ ↦ ( cos ‘ 𝑥 ) ) |
| 370 |
|
coscn |
⊢ cos ∈ ( ℂ –cn→ ℂ ) |
| 371 |
369 370
|
eqeltrri |
⊢ ( 𝑥 ∈ ℂ ↦ ( cos ‘ 𝑥 ) ) ∈ ( ℂ –cn→ ℂ ) |
| 372 |
371
|
a1i |
⊢ ( ⊤ → ( 𝑥 ∈ ℂ ↦ ( cos ‘ 𝑥 ) ) ∈ ( ℂ –cn→ ℂ ) ) |
| 373 |
|
0cnd |
⊢ ( ⊤ → 0 ∈ ℂ ) |
| 374 |
|
fveq2 |
⊢ ( 𝑥 = 0 → ( cos ‘ 𝑥 ) = ( cos ‘ 0 ) ) |
| 375 |
|
cos0 |
⊢ ( cos ‘ 0 ) = 1 |
| 376 |
374 375
|
eqtrdi |
⊢ ( 𝑥 = 0 → ( cos ‘ 𝑥 ) = 1 ) |
| 377 |
372 373 376
|
cnmptlimc |
⊢ ( ⊤ → 1 ∈ ( ( 𝑥 ∈ ℂ ↦ ( cos ‘ 𝑥 ) ) limℂ 0 ) ) |
| 378 |
|
fveq2 |
⊢ ( 𝑥 = ( 𝑠 / 2 ) → ( cos ‘ 𝑥 ) = ( cos ‘ ( 𝑠 / 2 ) ) ) |
| 379 |
|
fveq2 |
⊢ ( ( 𝑠 / 2 ) = 0 → ( cos ‘ ( 𝑠 / 2 ) ) = ( cos ‘ 0 ) ) |
| 380 |
379 375
|
eqtrdi |
⊢ ( ( 𝑠 / 2 ) = 0 → ( cos ‘ ( 𝑠 / 2 ) ) = 1 ) |
| 381 |
380
|
ad2antll |
⊢ ( ( ⊤ ∧ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ∧ ( 𝑠 / 2 ) = 0 ) ) → ( cos ‘ ( 𝑠 / 2 ) ) = 1 ) |
| 382 |
341 344 365 377 378 381
|
limcco |
⊢ ( ⊤ → 1 ∈ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑠 / 2 ) ) ) limℂ 0 ) ) |
| 383 |
|
ax-1ne0 |
⊢ 1 ≠ 0 |
| 384 |
383
|
a1i |
⊢ ( ⊤ → 1 ≠ 0 ) |
| 385 |
305 306 340 382 384
|
reclimc |
⊢ ( ⊤ → ( 1 / 1 ) ∈ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 1 / ( cos ‘ ( 𝑠 / 2 ) ) ) ) limℂ 0 ) ) |
| 386 |
|
1div1e1 |
⊢ ( 1 / 1 ) = 1 |
| 387 |
66
|
fveq1i |
⊢ ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ) ‘ 𝑠 ) = ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 1 ) ‘ 𝑠 ) |
| 388 |
|
eqidd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 1 ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 1 ) ) |
| 389 |
|
eqidd |
⊢ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ∧ 𝑥 = 𝑠 ) → 1 = 1 ) |
| 390 |
|
id |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ) |
| 391 |
|
1red |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 1 ∈ ℝ ) |
| 392 |
388 389 390 391
|
fvmptd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 1 ) ‘ 𝑠 ) = 1 ) |
| 393 |
387 392
|
eqtr2id |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 1 = ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ) ‘ 𝑠 ) ) |
| 394 |
135
|
a1i |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( cos ‘ ( 𝑥 / 2 ) ) ) ) |
| 395 |
|
oveq1 |
⊢ ( 𝑥 = 𝑠 → ( 𝑥 / 2 ) = ( 𝑠 / 2 ) ) |
| 396 |
395
|
fveq2d |
⊢ ( 𝑥 = 𝑠 → ( cos ‘ ( 𝑥 / 2 ) ) = ( cos ‘ ( 𝑠 / 2 ) ) ) |
| 397 |
396
|
adantl |
⊢ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ∧ 𝑥 = 𝑠 ) → ( cos ‘ ( 𝑥 / 2 ) ) = ( cos ‘ ( 𝑠 / 2 ) ) ) |
| 398 |
394 397 390 335
|
fvmptd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) ‘ 𝑠 ) = ( cos ‘ ( 𝑠 / 2 ) ) ) |
| 399 |
398
|
eqcomd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( cos ‘ ( 𝑠 / 2 ) ) = ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) ‘ 𝑠 ) ) |
| 400 |
393 399
|
oveq12d |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 1 / ( cos ‘ ( 𝑠 / 2 ) ) ) = ( ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ) ‘ 𝑠 ) / ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) ‘ 𝑠 ) ) ) |
| 401 |
400
|
mpteq2ia |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 1 / ( cos ‘ ( 𝑠 / 2 ) ) ) ) = ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ) ‘ 𝑠 ) / ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) ‘ 𝑠 ) ) ) |
| 402 |
401
|
oveq1i |
⊢ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 1 / ( cos ‘ ( 𝑠 / 2 ) ) ) ) limℂ 0 ) = ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ) ‘ 𝑠 ) / ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) ‘ 𝑠 ) ) ) limℂ 0 ) |
| 403 |
385 386 402
|
3eltr3g |
⊢ ( ⊤ → 1 ∈ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ) ‘ 𝑠 ) / ( ( ℝ D ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) ‘ 𝑠 ) ) ) limℂ 0 ) ) |
| 404 |
20 24 32 34 45 46 71 140 173 227 259 304 403
|
lhop |
⊢ ( ⊤ → 1 ∈ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ‘ 𝑠 ) / ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑠 ) ) ) limℂ 0 ) ) |
| 405 |
404
|
mptru |
⊢ 1 ∈ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ‘ 𝑠 ) / ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑠 ) ) ) limℂ 0 ) |
| 406 |
|
eqidd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ) |
| 407 |
|
simpr |
⊢ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ∧ 𝑥 = 𝑠 ) → 𝑥 = 𝑠 ) |
| 408 |
406 407 390 307
|
fvmptd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ‘ 𝑠 ) = 𝑠 ) |
| 409 |
|
eqidd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) = ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ) |
| 410 |
407
|
oveq1d |
⊢ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ∧ 𝑥 = 𝑠 ) → ( 𝑥 / 2 ) = ( 𝑠 / 2 ) ) |
| 411 |
410
|
fveq2d |
⊢ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ∧ 𝑥 = 𝑠 ) → ( sin ‘ ( 𝑥 / 2 ) ) = ( sin ‘ ( 𝑠 / 2 ) ) ) |
| 412 |
411
|
oveq2d |
⊢ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ∧ 𝑥 = 𝑠 ) → ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) = ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) |
| 413 |
26
|
a1i |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → 2 ∈ ℝ ) |
| 414 |
311
|
resincld |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( sin ‘ ( 𝑠 / 2 ) ) ∈ ℝ ) |
| 415 |
413 414
|
remulcld |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ∈ ℝ ) |
| 416 |
409 412 390 415
|
fvmptd |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑠 ) = ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) |
| 417 |
408 416
|
oveq12d |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ( ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ‘ 𝑠 ) / ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑠 ) ) = ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) |
| 418 |
417
|
mpteq2ia |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ‘ 𝑠 ) / ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑠 ) ) ) = ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) |
| 419 |
418
|
oveq1i |
⊢ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ 𝑥 ) ‘ 𝑠 ) / ( ( 𝑥 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑥 / 2 ) ) ) ) ‘ 𝑠 ) ) ) limℂ 0 ) = ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) limℂ 0 ) |
| 420 |
405 419
|
eleqtri |
⊢ 1 ∈ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) limℂ 0 ) |
| 421 |
10
|
oveq1i |
⊢ ( 𝐾 limℂ 0 ) = ( ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) limℂ 0 ) |
| 422 |
10
|
feq1i |
⊢ ( 𝐾 : ( - π [,] π ) ⟶ ℂ ↔ ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) : ( - π [,] π ) ⟶ ℂ ) |
| 423 |
14 422
|
mpbi |
⊢ ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) : ( - π [,] π ) ⟶ ℂ |
| 424 |
423
|
a1i |
⊢ ( ⊤ → ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) : ( - π [,] π ) ⟶ ℂ ) |
| 425 |
243
|
a1i |
⊢ ( ⊤ → ( - π (,) π ) ⊆ ( - π [,] π ) ) |
| 426 |
|
iccssre |
⊢ ( ( - π ∈ ℝ ∧ π ∈ ℝ ) → ( - π [,] π ) ⊆ ℝ ) |
| 427 |
39 38 426
|
mp2an |
⊢ ( - π [,] π ) ⊆ ℝ |
| 428 |
427
|
a1i |
⊢ ( ⊤ → ( - π [,] π ) ⊆ ℝ ) |
| 429 |
428 12
|
sstrdi |
⊢ ( ⊤ → ( - π [,] π ) ⊆ ℂ ) |
| 430 |
|
eqid |
⊢ ( ( TopOpen ‘ ℂfld ) ↾t ( ( - π [,] π ) ∪ { 0 } ) ) = ( ( TopOpen ‘ ℂfld ) ↾t ( ( - π [,] π ) ∪ { 0 } ) ) |
| 431 |
39 35 36
|
ltleii |
⊢ - π ≤ 0 |
| 432 |
35 38 37
|
ltleii |
⊢ 0 ≤ π |
| 433 |
39 38
|
elicc2i |
⊢ ( 0 ∈ ( - π [,] π ) ↔ ( 0 ∈ ℝ ∧ - π ≤ 0 ∧ 0 ≤ π ) ) |
| 434 |
35 431 432 433
|
mpbir3an |
⊢ 0 ∈ ( - π [,] π ) |
| 435 |
159
|
snss |
⊢ ( 0 ∈ ( - π [,] π ) ↔ { 0 } ⊆ ( - π [,] π ) ) |
| 436 |
434 435
|
mpbi |
⊢ { 0 } ⊆ ( - π [,] π ) |
| 437 |
|
ssequn2 |
⊢ ( { 0 } ⊆ ( - π [,] π ) ↔ ( ( - π [,] π ) ∪ { 0 } ) = ( - π [,] π ) ) |
| 438 |
436 437
|
mpbi |
⊢ ( ( - π [,] π ) ∪ { 0 } ) = ( - π [,] π ) |
| 439 |
438
|
oveq2i |
⊢ ( ( TopOpen ‘ ℂfld ) ↾t ( ( - π [,] π ) ∪ { 0 } ) ) = ( ( TopOpen ‘ ℂfld ) ↾t ( - π [,] π ) ) |
| 440 |
|
eqid |
⊢ ( topGen ‘ ran (,) ) = ( topGen ‘ ran (,) ) |
| 441 |
57 440
|
rerest |
⊢ ( ( - π [,] π ) ⊆ ℝ → ( ( TopOpen ‘ ℂfld ) ↾t ( - π [,] π ) ) = ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ) |
| 442 |
427 441
|
ax-mp |
⊢ ( ( TopOpen ‘ ℂfld ) ↾t ( - π [,] π ) ) = ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) |
| 443 |
439 442
|
eqtri |
⊢ ( ( TopOpen ‘ ℂfld ) ↾t ( ( - π [,] π ) ∪ { 0 } ) ) = ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) |
| 444 |
443
|
fveq2i |
⊢ ( int ‘ ( ( TopOpen ‘ ℂfld ) ↾t ( ( - π [,] π ) ∪ { 0 } ) ) ) = ( int ‘ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ) |
| 445 |
159
|
snss |
⊢ ( 0 ∈ ( - π (,) π ) ↔ { 0 } ⊆ ( - π (,) π ) ) |
| 446 |
44 445
|
mpbi |
⊢ { 0 } ⊆ ( - π (,) π ) |
| 447 |
|
ssequn2 |
⊢ ( { 0 } ⊆ ( - π (,) π ) ↔ ( ( - π (,) π ) ∪ { 0 } ) = ( - π (,) π ) ) |
| 448 |
446 447
|
mpbi |
⊢ ( ( - π (,) π ) ∪ { 0 } ) = ( - π (,) π ) |
| 449 |
444 448
|
fveq12i |
⊢ ( ( int ‘ ( ( TopOpen ‘ ℂfld ) ↾t ( ( - π [,] π ) ∪ { 0 } ) ) ) ‘ ( ( - π (,) π ) ∪ { 0 } ) ) = ( ( int ‘ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ) ‘ ( - π (,) π ) ) |
| 450 |
|
resttopon |
⊢ ( ( ( topGen ‘ ran (,) ) ∈ ( TopOn ‘ ℝ ) ∧ ( - π [,] π ) ⊆ ℝ ) → ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ∈ ( TopOn ‘ ( - π [,] π ) ) ) |
| 451 |
60 427 450
|
mp2an |
⊢ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ∈ ( TopOn ‘ ( - π [,] π ) ) |
| 452 |
451
|
topontopi |
⊢ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ∈ Top |
| 453 |
|
retop |
⊢ ( topGen ‘ ran (,) ) ∈ Top |
| 454 |
|
ovex |
⊢ ( - π [,] π ) ∈ V |
| 455 |
453 454
|
pm3.2i |
⊢ ( ( topGen ‘ ran (,) ) ∈ Top ∧ ( - π [,] π ) ∈ V ) |
| 456 |
|
ssid |
⊢ ( - π (,) π ) ⊆ ( - π (,) π ) |
| 457 |
33 243 456
|
3pm3.2i |
⊢ ( ( - π (,) π ) ∈ ( topGen ‘ ran (,) ) ∧ ( - π (,) π ) ⊆ ( - π [,] π ) ∧ ( - π (,) π ) ⊆ ( - π (,) π ) ) |
| 458 |
|
restopnb |
⊢ ( ( ( ( topGen ‘ ran (,) ) ∈ Top ∧ ( - π [,] π ) ∈ V ) ∧ ( ( - π (,) π ) ∈ ( topGen ‘ ran (,) ) ∧ ( - π (,) π ) ⊆ ( - π [,] π ) ∧ ( - π (,) π ) ⊆ ( - π (,) π ) ) ) → ( ( - π (,) π ) ∈ ( topGen ‘ ran (,) ) ↔ ( - π (,) π ) ∈ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ) ) |
| 459 |
455 457 458
|
mp2an |
⊢ ( ( - π (,) π ) ∈ ( topGen ‘ ran (,) ) ↔ ( - π (,) π ) ∈ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ) |
| 460 |
33 459
|
mpbi |
⊢ ( - π (,) π ) ∈ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) |
| 461 |
|
isopn3i |
⊢ ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ∈ Top ∧ ( - π (,) π ) ∈ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ) → ( ( int ‘ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ) ‘ ( - π (,) π ) ) = ( - π (,) π ) ) |
| 462 |
452 460 461
|
mp2an |
⊢ ( ( int ‘ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ) ‘ ( - π (,) π ) ) = ( - π (,) π ) |
| 463 |
|
eqid |
⊢ ( - π (,) π ) = ( - π (,) π ) |
| 464 |
449 462 463
|
3eqtrri |
⊢ ( - π (,) π ) = ( ( int ‘ ( ( TopOpen ‘ ℂfld ) ↾t ( ( - π [,] π ) ∪ { 0 } ) ) ) ‘ ( ( - π (,) π ) ∪ { 0 } ) ) |
| 465 |
44 464
|
eleqtri |
⊢ 0 ∈ ( ( int ‘ ( ( TopOpen ‘ ℂfld ) ↾t ( ( - π [,] π ) ∪ { 0 } ) ) ) ‘ ( ( - π (,) π ) ∪ { 0 } ) ) |
| 466 |
465
|
a1i |
⊢ ( ⊤ → 0 ∈ ( ( int ‘ ( ( TopOpen ‘ ℂfld ) ↾t ( ( - π [,] π ) ∪ { 0 } ) ) ) ‘ ( ( - π (,) π ) ∪ { 0 } ) ) ) |
| 467 |
424 425 429 57 430 466
|
limcres |
⊢ ( ⊤ → ( ( ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ↾ ( - π (,) π ) ) limℂ 0 ) = ( ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) limℂ 0 ) ) |
| 468 |
467
|
mptru |
⊢ ( ( ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ↾ ( - π (,) π ) ) limℂ 0 ) = ( ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) limℂ 0 ) |
| 469 |
468
|
eqcomi |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) limℂ 0 ) = ( ( ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ↾ ( - π (,) π ) ) limℂ 0 ) |
| 470 |
|
resmpt |
⊢ ( ( - π (,) π ) ⊆ ( - π [,] π ) → ( ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ↾ ( - π (,) π ) ) = ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ) |
| 471 |
243 470
|
ax-mp |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ↾ ( - π (,) π ) ) = ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) |
| 472 |
471
|
oveq1i |
⊢ ( ( ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ↾ ( - π (,) π ) ) limℂ 0 ) = ( ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) limℂ 0 ) |
| 473 |
421 469 472
|
3eqtri |
⊢ ( 𝐾 limℂ 0 ) = ( ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) limℂ 0 ) |
| 474 |
|
eqid |
⊢ ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) = ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) |
| 475 |
|
iftrue |
⊢ ( 𝑠 = 0 → if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) = 1 ) |
| 476 |
|
1cnd |
⊢ ( 𝑠 = 0 → 1 ∈ ℂ ) |
| 477 |
475 476
|
eqeltrd |
⊢ ( 𝑠 = 0 → if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ℂ ) |
| 478 |
477
|
adantl |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ∧ 𝑠 = 0 ) → if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ℂ ) |
| 479 |
|
iffalse |
⊢ ( ¬ 𝑠 = 0 → if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) = ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) |
| 480 |
479
|
adantl |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ∧ ¬ 𝑠 = 0 ) → if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) = ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) |
| 481 |
141
|
adantr |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ∧ ¬ 𝑠 = 0 ) → 𝑠 ∈ ℂ ) |
| 482 |
|
2cnd |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ∧ ¬ 𝑠 = 0 ) → 2 ∈ ℂ ) |
| 483 |
481
|
halfcld |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ∧ ¬ 𝑠 = 0 ) → ( 𝑠 / 2 ) ∈ ℂ ) |
| 484 |
483
|
sincld |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ∧ ¬ 𝑠 = 0 ) → ( sin ‘ ( 𝑠 / 2 ) ) ∈ ℂ ) |
| 485 |
482 484
|
mulcld |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ∧ ¬ 𝑠 = 0 ) → ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ∈ ℂ ) |
| 486 |
81
|
a1i |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ∧ ¬ 𝑠 = 0 ) → 2 ≠ 0 ) |
| 487 |
243
|
sseli |
⊢ ( 𝑠 ∈ ( - π (,) π ) → 𝑠 ∈ ( - π [,] π ) ) |
| 488 |
|
neqne |
⊢ ( ¬ 𝑠 = 0 → 𝑠 ≠ 0 ) |
| 489 |
|
fourierdlem44 |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ∧ 𝑠 ≠ 0 ) → ( sin ‘ ( 𝑠 / 2 ) ) ≠ 0 ) |
| 490 |
487 488 489
|
syl2an |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ∧ ¬ 𝑠 = 0 ) → ( sin ‘ ( 𝑠 / 2 ) ) ≠ 0 ) |
| 491 |
482 484 486 490
|
mulne0d |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ∧ ¬ 𝑠 = 0 ) → ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ≠ 0 ) |
| 492 |
481 485 491
|
divcld |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ∧ ¬ 𝑠 = 0 ) → ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ∈ ℂ ) |
| 493 |
480 492
|
eqeltrd |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ∧ ¬ 𝑠 = 0 ) → if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ℂ ) |
| 494 |
478 493
|
pm2.61dan |
⊢ ( 𝑠 ∈ ( - π (,) π ) → if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ℂ ) |
| 495 |
474 494
|
fmpti |
⊢ ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) : ( - π (,) π ) ⟶ ℂ |
| 496 |
495
|
a1i |
⊢ ( ⊤ → ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) : ( - π (,) π ) ⟶ ℂ ) |
| 497 |
496
|
limcdif |
⊢ ( ⊤ → ( ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) limℂ 0 ) = ( ( ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) limℂ 0 ) ) |
| 498 |
497
|
mptru |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) limℂ 0 ) = ( ( ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) limℂ 0 ) |
| 499 |
|
resmpt |
⊢ ( ( ( - π (,) π ) ∖ { 0 } ) ⊆ ( - π (,) π ) → ( ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) = ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ) |
| 500 |
16 499
|
ax-mp |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) = ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) |
| 501 |
|
eldifn |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ¬ 𝑠 ∈ { 0 } ) |
| 502 |
|
velsn |
⊢ ( 𝑠 ∈ { 0 } ↔ 𝑠 = 0 ) |
| 503 |
501 502
|
sylnib |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → ¬ 𝑠 = 0 ) |
| 504 |
503 479
|
syl |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) → if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) = ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) |
| 505 |
504
|
mpteq2ia |
⊢ ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) = ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) |
| 506 |
500 505
|
eqtri |
⊢ ( ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) = ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) |
| 507 |
506
|
oveq1i |
⊢ ( ( ( 𝑠 ∈ ( - π (,) π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ↾ ( ( - π (,) π ) ∖ { 0 } ) ) limℂ 0 ) = ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) limℂ 0 ) |
| 508 |
473 498 507
|
3eqtrri |
⊢ ( ( 𝑠 ∈ ( ( - π (,) π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) limℂ 0 ) = ( 𝐾 limℂ 0 ) |
| 509 |
420 508
|
eleqtri |
⊢ 1 ∈ ( 𝐾 limℂ 0 ) |
| 510 |
509
|
a1i |
⊢ ( 𝑠 = 0 → 1 ∈ ( 𝐾 limℂ 0 ) ) |
| 511 |
|
fveq2 |
⊢ ( 𝑠 = 0 → ( 𝐾 ‘ 𝑠 ) = ( 𝐾 ‘ 0 ) ) |
| 512 |
475 10 47
|
fvmpt |
⊢ ( 0 ∈ ( - π [,] π ) → ( 𝐾 ‘ 0 ) = 1 ) |
| 513 |
434 512
|
ax-mp |
⊢ ( 𝐾 ‘ 0 ) = 1 |
| 514 |
511 513
|
eqtrdi |
⊢ ( 𝑠 = 0 → ( 𝐾 ‘ 𝑠 ) = 1 ) |
| 515 |
|
oveq2 |
⊢ ( 𝑠 = 0 → ( 𝐾 limℂ 𝑠 ) = ( 𝐾 limℂ 0 ) ) |
| 516 |
510 514 515
|
3eltr4d |
⊢ ( 𝑠 = 0 → ( 𝐾 ‘ 𝑠 ) ∈ ( 𝐾 limℂ 𝑠 ) ) |
| 517 |
427 12
|
sstri |
⊢ ( - π [,] π ) ⊆ ℂ |
| 518 |
517
|
a1i |
⊢ ( 𝑠 = 0 → ( - π [,] π ) ⊆ ℂ ) |
| 519 |
38
|
a1i |
⊢ ( 𝑠 = 0 → π ∈ ℝ ) |
| 520 |
519
|
renegcld |
⊢ ( 𝑠 = 0 → - π ∈ ℝ ) |
| 521 |
|
id |
⊢ ( 𝑠 = 0 → 𝑠 = 0 ) |
| 522 |
35
|
a1i |
⊢ ( 𝑠 = 0 → 0 ∈ ℝ ) |
| 523 |
521 522
|
eqeltrd |
⊢ ( 𝑠 = 0 → 𝑠 ∈ ℝ ) |
| 524 |
431 521
|
breqtrrid |
⊢ ( 𝑠 = 0 → - π ≤ 𝑠 ) |
| 525 |
521 432
|
eqbrtrdi |
⊢ ( 𝑠 = 0 → 𝑠 ≤ π ) |
| 526 |
520 519 523 524 525
|
eliccd |
⊢ ( 𝑠 = 0 → 𝑠 ∈ ( - π [,] π ) ) |
| 527 |
56
|
oveq1i |
⊢ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) = ( ( ( TopOpen ‘ ℂfld ) ↾t ℝ ) ↾t ( - π [,] π ) ) |
| 528 |
57
|
cnfldtop |
⊢ ( TopOpen ‘ ℂfld ) ∈ Top |
| 529 |
|
reex |
⊢ ℝ ∈ V |
| 530 |
|
restabs |
⊢ ( ( ( TopOpen ‘ ℂfld ) ∈ Top ∧ ( - π [,] π ) ⊆ ℝ ∧ ℝ ∈ V ) → ( ( ( TopOpen ‘ ℂfld ) ↾t ℝ ) ↾t ( - π [,] π ) ) = ( ( TopOpen ‘ ℂfld ) ↾t ( - π [,] π ) ) ) |
| 531 |
528 427 529 530
|
mp3an |
⊢ ( ( ( TopOpen ‘ ℂfld ) ↾t ℝ ) ↾t ( - π [,] π ) ) = ( ( TopOpen ‘ ℂfld ) ↾t ( - π [,] π ) ) |
| 532 |
527 531
|
eqtri |
⊢ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) = ( ( TopOpen ‘ ℂfld ) ↾t ( - π [,] π ) ) |
| 533 |
57 532
|
cnplimc |
⊢ ( ( ( - π [,] π ) ⊆ ℂ ∧ 𝑠 ∈ ( - π [,] π ) ) → ( 𝐾 ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ↔ ( 𝐾 : ( - π [,] π ) ⟶ ℂ ∧ ( 𝐾 ‘ 𝑠 ) ∈ ( 𝐾 limℂ 𝑠 ) ) ) ) |
| 534 |
518 526 533
|
syl2anc |
⊢ ( 𝑠 = 0 → ( 𝐾 ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ↔ ( 𝐾 : ( - π [,] π ) ⟶ ℂ ∧ ( 𝐾 ‘ 𝑠 ) ∈ ( 𝐾 limℂ 𝑠 ) ) ) ) |
| 535 |
15 516 534
|
mpbir2and |
⊢ ( 𝑠 = 0 → 𝐾 ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ) |
| 536 |
535
|
adantl |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ∧ 𝑠 = 0 ) → 𝐾 ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ) |
| 537 |
|
simpl |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ∧ ¬ 𝑠 = 0 ) → 𝑠 ∈ ( - π [,] π ) ) |
| 538 |
502
|
notbii |
⊢ ( ¬ 𝑠 ∈ { 0 } ↔ ¬ 𝑠 = 0 ) |
| 539 |
538
|
bilanri |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ∧ ¬ 𝑠 = 0 ) → ¬ 𝑠 ∈ { 0 } ) |
| 540 |
537 539
|
eldifd |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ∧ ¬ 𝑠 = 0 ) → 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ) |
| 541 |
|
fveq2 |
⊢ ( 𝑥 = 𝑠 → ( ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑥 ) = ( ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ) |
| 542 |
541
|
eleq2d |
⊢ ( 𝑥 = 𝑠 → ( ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑥 ) ↔ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ) ) |
| 543 |
429
|
ssdifssd |
⊢ ( ⊤ → ( ( - π [,] π ) ∖ { 0 } ) ⊆ ℂ ) |
| 544 |
543 145
|
idcncfg |
⊢ ( ⊤ → ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ 𝑠 ) ∈ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ℂ ) ) |
| 545 |
|
eqid |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) = ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) |
| 546 |
|
2cnd |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → 2 ∈ ℂ ) |
| 547 |
|
eldifi |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → 𝑠 ∈ ( - π [,] π ) ) |
| 548 |
517 547
|
sselid |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → 𝑠 ∈ ℂ ) |
| 549 |
548
|
halfcld |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → ( 𝑠 / 2 ) ∈ ℂ ) |
| 550 |
549
|
sincld |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → ( sin ‘ ( 𝑠 / 2 ) ) ∈ ℂ ) |
| 551 |
546 550
|
mulcld |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ∈ ℂ ) |
| 552 |
81
|
a1i |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → 2 ≠ 0 ) |
| 553 |
|
eldifsni |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → 𝑠 ≠ 0 ) |
| 554 |
547 553 489
|
syl2anc |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → ( sin ‘ ( 𝑠 / 2 ) ) ≠ 0 ) |
| 555 |
546 550 552 554
|
mulne0d |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ≠ 0 ) |
| 556 |
555
|
neneqd |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → ¬ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) = 0 ) |
| 557 |
|
elsng |
⊢ ( ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ∈ ℂ → ( ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ∈ { 0 } ↔ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) = 0 ) ) |
| 558 |
551 557
|
syl |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → ( ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ∈ { 0 } ↔ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) = 0 ) ) |
| 559 |
556 558
|
mtbird |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → ¬ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ∈ { 0 } ) |
| 560 |
551 559
|
eldifd |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ∈ ( ℂ ∖ { 0 } ) ) |
| 561 |
545 560
|
fmpti |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) : ( ( - π [,] π ) ∖ { 0 } ) ⟶ ( ℂ ∖ { 0 } ) |
| 562 |
|
difss |
⊢ ( ℂ ∖ { 0 } ) ⊆ ℂ |
| 563 |
|
eqid |
⊢ ( 𝑠 ∈ ℂ ↦ 2 ) = ( 𝑠 ∈ ℂ ↦ 2 ) |
| 564 |
175 176 175
|
constcncfg |
⊢ ( 2 ∈ ℂ → ( 𝑠 ∈ ℂ ↦ 2 ) ∈ ( ℂ –cn→ ℂ ) ) |
| 565 |
102 564
|
mp1i |
⊢ ( ⊤ → ( 𝑠 ∈ ℂ ↦ 2 ) ∈ ( ℂ –cn→ ℂ ) ) |
| 566 |
|
2cnd |
⊢ ( ( ⊤ ∧ 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ) → 2 ∈ ℂ ) |
| 567 |
563 565 543 145 566
|
cncfmptssg |
⊢ ( ⊤ → ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ 2 ) ∈ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ℂ ) ) |
| 568 |
548 546 552
|
divrecd |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → ( 𝑠 / 2 ) = ( 𝑠 · ( 1 / 2 ) ) ) |
| 569 |
568
|
mpteq2ia |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / 2 ) ) = ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 · ( 1 / 2 ) ) ) |
| 570 |
|
eqid |
⊢ ( 𝑠 ∈ ℂ ↦ ( 1 / 2 ) ) = ( 𝑠 ∈ ℂ ↦ ( 1 / 2 ) ) |
| 571 |
144
|
a1i |
⊢ ( ( 1 / 2 ) ∈ ℂ → ℂ ⊆ ℂ ) |
| 572 |
|
id |
⊢ ( ( 1 / 2 ) ∈ ℂ → ( 1 / 2 ) ∈ ℂ ) |
| 573 |
571 572 571
|
constcncfg |
⊢ ( ( 1 / 2 ) ∈ ℂ → ( 𝑠 ∈ ℂ ↦ ( 1 / 2 ) ) ∈ ( ℂ –cn→ ℂ ) ) |
| 574 |
94 573
|
mp1i |
⊢ ( ⊤ → ( 𝑠 ∈ ℂ ↦ ( 1 / 2 ) ) ∈ ( ℂ –cn→ ℂ ) ) |
| 575 |
94
|
a1i |
⊢ ( ( ⊤ ∧ 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ) → ( 1 / 2 ) ∈ ℂ ) |
| 576 |
570 574 543 145 575
|
cncfmptssg |
⊢ ( ⊤ → ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 1 / 2 ) ) ∈ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ℂ ) ) |
| 577 |
544 576
|
mulcncf |
⊢ ( ⊤ → ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 · ( 1 / 2 ) ) ) ∈ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ℂ ) ) |
| 578 |
569 577
|
eqeltrid |
⊢ ( ⊤ → ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / 2 ) ) ∈ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ℂ ) ) |
| 579 |
182 578
|
cncfmpt1f |
⊢ ( ⊤ → ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( sin ‘ ( 𝑠 / 2 ) ) ) ∈ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ℂ ) ) |
| 580 |
567 579
|
mulcncf |
⊢ ( ⊤ → ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ∈ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ℂ ) ) |
| 581 |
580
|
mptru |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ∈ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ℂ ) |
| 582 |
|
cncfcdm |
⊢ ( ( ( ℂ ∖ { 0 } ) ⊆ ℂ ∧ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ∈ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ℂ ) ) → ( ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ∈ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ( ℂ ∖ { 0 } ) ) ↔ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) : ( ( - π [,] π ) ∖ { 0 } ) ⟶ ( ℂ ∖ { 0 } ) ) ) |
| 583 |
562 581 582
|
mp2an |
⊢ ( ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ∈ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ( ℂ ∖ { 0 } ) ) ↔ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) : ( ( - π [,] π ) ∖ { 0 } ) ⟶ ( ℂ ∖ { 0 } ) ) |
| 584 |
561 583
|
mpbir |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ∈ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ( ℂ ∖ { 0 } ) ) |
| 585 |
584
|
a1i |
⊢ ( ⊤ → ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ∈ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ( ℂ ∖ { 0 } ) ) ) |
| 586 |
544 585
|
divcncf |
⊢ ( ⊤ → ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ℂ ) ) |
| 587 |
586
|
mptru |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ℂ ) |
| 588 |
428
|
ssdifssd |
⊢ ( ⊤ → ( ( - π [,] π ) ∖ { 0 } ) ⊆ ℝ ) |
| 589 |
588
|
mptru |
⊢ ( ( - π [,] π ) ∖ { 0 } ) ⊆ ℝ |
| 590 |
589 12
|
sstri |
⊢ ( ( - π [,] π ) ∖ { 0 } ) ⊆ ℂ |
| 591 |
56
|
oveq1i |
⊢ ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) = ( ( ( TopOpen ‘ ℂfld ) ↾t ℝ ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) |
| 592 |
|
restabs |
⊢ ( ( ( TopOpen ‘ ℂfld ) ∈ Top ∧ ( ( - π [,] π ) ∖ { 0 } ) ⊆ ℝ ∧ ℝ ∈ V ) → ( ( ( TopOpen ‘ ℂfld ) ↾t ℝ ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) = ( ( TopOpen ‘ ℂfld ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) ) |
| 593 |
528 589 529 592
|
mp3an |
⊢ ( ( ( TopOpen ‘ ℂfld ) ↾t ℝ ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) = ( ( TopOpen ‘ ℂfld ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) |
| 594 |
591 593
|
eqtri |
⊢ ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) = ( ( TopOpen ‘ ℂfld ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) |
| 595 |
|
unicntop |
⊢ ℂ = ∪ ( TopOpen ‘ ℂfld ) |
| 596 |
595
|
restid |
⊢ ( ( TopOpen ‘ ℂfld ) ∈ Top → ( ( TopOpen ‘ ℂfld ) ↾t ℂ ) = ( TopOpen ‘ ℂfld ) ) |
| 597 |
528 596
|
ax-mp |
⊢ ( ( TopOpen ‘ ℂfld ) ↾t ℂ ) = ( TopOpen ‘ ℂfld ) |
| 598 |
597
|
eqcomi |
⊢ ( TopOpen ‘ ℂfld ) = ( ( TopOpen ‘ ℂfld ) ↾t ℂ ) |
| 599 |
57 594 598
|
cncfcn |
⊢ ( ( ( ( - π [,] π ) ∖ { 0 } ) ⊆ ℂ ∧ ℂ ⊆ ℂ ) → ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ℂ ) = ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) Cn ( TopOpen ‘ ℂfld ) ) ) |
| 600 |
590 144 599
|
mp2an |
⊢ ( ( ( - π [,] π ) ∖ { 0 } ) –cn→ ℂ ) = ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) Cn ( TopOpen ‘ ℂfld ) ) |
| 601 |
587 600
|
eleqtri |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) Cn ( TopOpen ‘ ℂfld ) ) |
| 602 |
|
resttopon |
⊢ ( ( ( topGen ‘ ran (,) ) ∈ ( TopOn ‘ ℝ ) ∧ ( ( - π [,] π ) ∖ { 0 } ) ⊆ ℝ ) → ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) ∈ ( TopOn ‘ ( ( - π [,] π ) ∖ { 0 } ) ) ) |
| 603 |
60 589 602
|
mp2an |
⊢ ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) ∈ ( TopOn ‘ ( ( - π [,] π ) ∖ { 0 } ) ) |
| 604 |
57
|
cnfldtopon |
⊢ ( TopOpen ‘ ℂfld ) ∈ ( TopOn ‘ ℂ ) |
| 605 |
|
cncnp |
⊢ ( ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) ∈ ( TopOn ‘ ( ( - π [,] π ) ∖ { 0 } ) ) ∧ ( TopOpen ‘ ℂfld ) ∈ ( TopOn ‘ ℂ ) ) → ( ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) Cn ( TopOpen ‘ ℂfld ) ) ↔ ( ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) : ( ( - π [,] π ) ∖ { 0 } ) ⟶ ℂ ∧ ∀ 𝑥 ∈ ( ( - π [,] π ) ∖ { 0 } ) ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑥 ) ) ) ) |
| 606 |
603 604 605
|
mp2an |
⊢ ( ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) Cn ( TopOpen ‘ ℂfld ) ) ↔ ( ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) : ( ( - π [,] π ) ∖ { 0 } ) ⟶ ℂ ∧ ∀ 𝑥 ∈ ( ( - π [,] π ) ∖ { 0 } ) ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑥 ) ) ) |
| 607 |
601 606
|
mpbi |
⊢ ( ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) : ( ( - π [,] π ) ∖ { 0 } ) ⟶ ℂ ∧ ∀ 𝑥 ∈ ( ( - π [,] π ) ∖ { 0 } ) ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑥 ) ) |
| 608 |
607
|
simpri |
⊢ ∀ 𝑥 ∈ ( ( - π [,] π ) ∖ { 0 } ) ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑥 ) |
| 609 |
542 608
|
vtoclri |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ) |
| 610 |
540 609
|
syl |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ∧ ¬ 𝑠 = 0 ) → ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ) |
| 611 |
10
|
reseq1i |
⊢ ( 𝐾 ↾ ( ( - π [,] π ) ∖ { 0 } ) ) = ( ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ↾ ( ( - π [,] π ) ∖ { 0 } ) ) |
| 612 |
|
difss |
⊢ ( ( - π [,] π ) ∖ { 0 } ) ⊆ ( - π [,] π ) |
| 613 |
|
resmpt |
⊢ ( ( ( - π [,] π ) ∖ { 0 } ) ⊆ ( - π [,] π ) → ( ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ↾ ( ( - π [,] π ) ∖ { 0 } ) ) = ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ) |
| 614 |
612 613
|
ax-mp |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) ↾ ( ( - π [,] π ) ∖ { 0 } ) ) = ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) |
| 615 |
|
eldifn |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → ¬ 𝑠 ∈ { 0 } ) |
| 616 |
615 502
|
sylnib |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → ¬ 𝑠 = 0 ) |
| 617 |
616 479
|
syl |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) = ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) |
| 618 |
617
|
mpteq2ia |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ if ( 𝑠 = 0 , 1 , ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) ) = ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) |
| 619 |
611 614 618
|
3eqtri |
⊢ ( 𝐾 ↾ ( ( - π [,] π ) ∖ { 0 } ) ) = ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ↦ ( 𝑠 / ( 2 · ( sin ‘ ( 𝑠 / 2 ) ) ) ) ) |
| 620 |
|
restabs |
⊢ ( ( ( topGen ‘ ran (,) ) ∈ Top ∧ ( ( - π [,] π ) ∖ { 0 } ) ⊆ ( - π [,] π ) ∧ ( - π [,] π ) ∈ V ) → ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) = ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) ) |
| 621 |
453 612 454 620
|
mp3an |
⊢ ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) = ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) |
| 622 |
621
|
oveq1i |
⊢ ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) = ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) |
| 623 |
622
|
fveq1i |
⊢ ( ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) = ( ( ( ( topGen ‘ ran (,) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) |
| 624 |
610 619 623
|
3eltr4g |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ∧ ¬ 𝑠 = 0 ) → ( 𝐾 ↾ ( ( - π [,] π ) ∖ { 0 } ) ) ∈ ( ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ) |
| 625 |
452 612
|
pm3.2i |
⊢ ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ∈ Top ∧ ( ( - π [,] π ) ∖ { 0 } ) ⊆ ( - π [,] π ) ) |
| 626 |
625
|
a1i |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ∧ ¬ 𝑠 = 0 ) → ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ∈ Top ∧ ( ( - π [,] π ) ∖ { 0 } ) ⊆ ( - π [,] π ) ) ) |
| 627 |
|
ssdif |
⊢ ( ( - π [,] π ) ⊆ ℝ → ( ( - π [,] π ) ∖ { 0 } ) ⊆ ( ℝ ∖ { 0 } ) ) |
| 628 |
427 627
|
ax-mp |
⊢ ( ( - π [,] π ) ∖ { 0 } ) ⊆ ( ℝ ∖ { 0 } ) |
| 629 |
628 540
|
sselid |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ∧ ¬ 𝑠 = 0 ) → 𝑠 ∈ ( ℝ ∖ { 0 } ) ) |
| 630 |
|
sscon |
⊢ ( { 0 } ⊆ ( - π [,] π ) → ( ℝ ∖ ( - π [,] π ) ) ⊆ ( ℝ ∖ { 0 } ) ) |
| 631 |
436 630
|
ax-mp |
⊢ ( ℝ ∖ ( - π [,] π ) ) ⊆ ( ℝ ∖ { 0 } ) |
| 632 |
628 631
|
unssi |
⊢ ( ( ( - π [,] π ) ∖ { 0 } ) ∪ ( ℝ ∖ ( - π [,] π ) ) ) ⊆ ( ℝ ∖ { 0 } ) |
| 633 |
|
simpr |
⊢ ( ( 𝑠 ∈ ( ℝ ∖ { 0 } ) ∧ 𝑠 ∈ ( - π [,] π ) ) → 𝑠 ∈ ( - π [,] π ) ) |
| 634 |
|
eldifn |
⊢ ( 𝑠 ∈ ( ℝ ∖ { 0 } ) → ¬ 𝑠 ∈ { 0 } ) |
| 635 |
634
|
adantr |
⊢ ( ( 𝑠 ∈ ( ℝ ∖ { 0 } ) ∧ 𝑠 ∈ ( - π [,] π ) ) → ¬ 𝑠 ∈ { 0 } ) |
| 636 |
633 635
|
eldifd |
⊢ ( ( 𝑠 ∈ ( ℝ ∖ { 0 } ) ∧ 𝑠 ∈ ( - π [,] π ) ) → 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) ) |
| 637 |
|
elun1 |
⊢ ( 𝑠 ∈ ( ( - π [,] π ) ∖ { 0 } ) → 𝑠 ∈ ( ( ( - π [,] π ) ∖ { 0 } ) ∪ ( ℝ ∖ ( - π [,] π ) ) ) ) |
| 638 |
636 637
|
syl |
⊢ ( ( 𝑠 ∈ ( ℝ ∖ { 0 } ) ∧ 𝑠 ∈ ( - π [,] π ) ) → 𝑠 ∈ ( ( ( - π [,] π ) ∖ { 0 } ) ∪ ( ℝ ∖ ( - π [,] π ) ) ) ) |
| 639 |
|
eldifi |
⊢ ( 𝑠 ∈ ( ℝ ∖ { 0 } ) → 𝑠 ∈ ℝ ) |
| 640 |
639
|
adantr |
⊢ ( ( 𝑠 ∈ ( ℝ ∖ { 0 } ) ∧ ¬ 𝑠 ∈ ( - π [,] π ) ) → 𝑠 ∈ ℝ ) |
| 641 |
|
simpr |
⊢ ( ( 𝑠 ∈ ( ℝ ∖ { 0 } ) ∧ ¬ 𝑠 ∈ ( - π [,] π ) ) → ¬ 𝑠 ∈ ( - π [,] π ) ) |
| 642 |
640 641
|
eldifd |
⊢ ( ( 𝑠 ∈ ( ℝ ∖ { 0 } ) ∧ ¬ 𝑠 ∈ ( - π [,] π ) ) → 𝑠 ∈ ( ℝ ∖ ( - π [,] π ) ) ) |
| 643 |
|
elun2 |
⊢ ( 𝑠 ∈ ( ℝ ∖ ( - π [,] π ) ) → 𝑠 ∈ ( ( ( - π [,] π ) ∖ { 0 } ) ∪ ( ℝ ∖ ( - π [,] π ) ) ) ) |
| 644 |
642 643
|
syl |
⊢ ( ( 𝑠 ∈ ( ℝ ∖ { 0 } ) ∧ ¬ 𝑠 ∈ ( - π [,] π ) ) → 𝑠 ∈ ( ( ( - π [,] π ) ∖ { 0 } ) ∪ ( ℝ ∖ ( - π [,] π ) ) ) ) |
| 645 |
638 644
|
pm2.61dan |
⊢ ( 𝑠 ∈ ( ℝ ∖ { 0 } ) → 𝑠 ∈ ( ( ( - π [,] π ) ∖ { 0 } ) ∪ ( ℝ ∖ ( - π [,] π ) ) ) ) |
| 646 |
645
|
ssriv |
⊢ ( ℝ ∖ { 0 } ) ⊆ ( ( ( - π [,] π ) ∖ { 0 } ) ∪ ( ℝ ∖ ( - π [,] π ) ) ) |
| 647 |
632 646
|
eqssi |
⊢ ( ( ( - π [,] π ) ∖ { 0 } ) ∪ ( ℝ ∖ ( - π [,] π ) ) ) = ( ℝ ∖ { 0 } ) |
| 648 |
647
|
fveq2i |
⊢ ( ( int ‘ ( topGen ‘ ran (,) ) ) ‘ ( ( ( - π [,] π ) ∖ { 0 } ) ∪ ( ℝ ∖ ( - π [,] π ) ) ) ) = ( ( int ‘ ( topGen ‘ ran (,) ) ) ‘ ( ℝ ∖ { 0 } ) ) |
| 649 |
61
|
cldopn |
⊢ ( { 0 } ∈ ( Clsd ‘ ( topGen ‘ ran (,) ) ) → ( ℝ ∖ { 0 } ) ∈ ( topGen ‘ ran (,) ) ) |
| 650 |
59 649
|
ax-mp |
⊢ ( ℝ ∖ { 0 } ) ∈ ( topGen ‘ ran (,) ) |
| 651 |
|
isopn3i |
⊢ ( ( ( topGen ‘ ran (,) ) ∈ Top ∧ ( ℝ ∖ { 0 } ) ∈ ( topGen ‘ ran (,) ) ) → ( ( int ‘ ( topGen ‘ ran (,) ) ) ‘ ( ℝ ∖ { 0 } ) ) = ( ℝ ∖ { 0 } ) ) |
| 652 |
453 650 651
|
mp2an |
⊢ ( ( int ‘ ( topGen ‘ ran (,) ) ) ‘ ( ℝ ∖ { 0 } ) ) = ( ℝ ∖ { 0 } ) |
| 653 |
648 652
|
eqtri |
⊢ ( ( int ‘ ( topGen ‘ ran (,) ) ) ‘ ( ( ( - π [,] π ) ∖ { 0 } ) ∪ ( ℝ ∖ ( - π [,] π ) ) ) ) = ( ℝ ∖ { 0 } ) |
| 654 |
629 653
|
eleqtrrdi |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ∧ ¬ 𝑠 = 0 ) → 𝑠 ∈ ( ( int ‘ ( topGen ‘ ran (,) ) ) ‘ ( ( ( - π [,] π ) ∖ { 0 } ) ∪ ( ℝ ∖ ( - π [,] π ) ) ) ) ) |
| 655 |
654 537
|
elind |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ∧ ¬ 𝑠 = 0 ) → 𝑠 ∈ ( ( ( int ‘ ( topGen ‘ ran (,) ) ) ‘ ( ( ( - π [,] π ) ∖ { 0 } ) ∪ ( ℝ ∖ ( - π [,] π ) ) ) ) ∩ ( - π [,] π ) ) ) |
| 656 |
|
eqid |
⊢ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) = ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) |
| 657 |
61 656
|
restntr |
⊢ ( ( ( topGen ‘ ran (,) ) ∈ Top ∧ ( - π [,] π ) ⊆ ℝ ∧ ( ( - π [,] π ) ∖ { 0 } ) ⊆ ( - π [,] π ) ) → ( ( int ‘ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ) ‘ ( ( - π [,] π ) ∖ { 0 } ) ) = ( ( ( int ‘ ( topGen ‘ ran (,) ) ) ‘ ( ( ( - π [,] π ) ∖ { 0 } ) ∪ ( ℝ ∖ ( - π [,] π ) ) ) ) ∩ ( - π [,] π ) ) ) |
| 658 |
453 427 612 657
|
mp3an |
⊢ ( ( int ‘ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ) ‘ ( ( - π [,] π ) ∖ { 0 } ) ) = ( ( ( int ‘ ( topGen ‘ ran (,) ) ) ‘ ( ( ( - π [,] π ) ∖ { 0 } ) ∪ ( ℝ ∖ ( - π [,] π ) ) ) ) ∩ ( - π [,] π ) ) |
| 659 |
655 658
|
eleqtrrdi |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ∧ ¬ 𝑠 = 0 ) → 𝑠 ∈ ( ( int ‘ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ) ‘ ( ( - π [,] π ) ∖ { 0 } ) ) ) |
| 660 |
14
|
a1i |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ∧ ¬ 𝑠 = 0 ) → 𝐾 : ( - π [,] π ) ⟶ ℂ ) |
| 661 |
451
|
toponunii |
⊢ ( - π [,] π ) = ∪ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) |
| 662 |
661 595
|
cnprest |
⊢ ( ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ∈ Top ∧ ( ( - π [,] π ) ∖ { 0 } ) ⊆ ( - π [,] π ) ) ∧ ( 𝑠 ∈ ( ( int ‘ ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ) ‘ ( ( - π [,] π ) ∖ { 0 } ) ) ∧ 𝐾 : ( - π [,] π ) ⟶ ℂ ) ) → ( 𝐾 ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ↔ ( 𝐾 ↾ ( ( - π [,] π ) ∖ { 0 } ) ) ∈ ( ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ) ) |
| 663 |
626 659 660 662
|
syl12anc |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ∧ ¬ 𝑠 = 0 ) → ( 𝐾 ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ↔ ( 𝐾 ↾ ( ( - π [,] π ) ∖ { 0 } ) ) ∈ ( ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ↾t ( ( - π [,] π ) ∖ { 0 } ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ) ) |
| 664 |
624 663
|
mpbird |
⊢ ( ( 𝑠 ∈ ( - π [,] π ) ∧ ¬ 𝑠 = 0 ) → 𝐾 ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ) |
| 665 |
536 664
|
pm2.61dan |
⊢ ( 𝑠 ∈ ( - π [,] π ) → 𝐾 ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ) |
| 666 |
665
|
rgen |
⊢ ∀ 𝑠 ∈ ( - π [,] π ) 𝐾 ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) |
| 667 |
|
cncnp |
⊢ ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) ∈ ( TopOn ‘ ( - π [,] π ) ) ∧ ( TopOpen ‘ ℂfld ) ∈ ( TopOn ‘ ℂ ) ) → ( 𝐾 ∈ ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) Cn ( TopOpen ‘ ℂfld ) ) ↔ ( 𝐾 : ( - π [,] π ) ⟶ ℂ ∧ ∀ 𝑠 ∈ ( - π [,] π ) 𝐾 ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ) ) ) |
| 668 |
451 604 667
|
mp2an |
⊢ ( 𝐾 ∈ ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) Cn ( TopOpen ‘ ℂfld ) ) ↔ ( 𝐾 : ( - π [,] π ) ⟶ ℂ ∧ ∀ 𝑠 ∈ ( - π [,] π ) 𝐾 ∈ ( ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) CnP ( TopOpen ‘ ℂfld ) ) ‘ 𝑠 ) ) ) |
| 669 |
14 666 668
|
mpbir2an |
⊢ 𝐾 ∈ ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) Cn ( TopOpen ‘ ℂfld ) ) |
| 670 |
57 532 598
|
cncfcn |
⊢ ( ( ( - π [,] π ) ⊆ ℂ ∧ ℂ ⊆ ℂ ) → ( ( - π [,] π ) –cn→ ℂ ) = ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) Cn ( TopOpen ‘ ℂfld ) ) ) |
| 671 |
517 144 670
|
mp2an |
⊢ ( ( - π [,] π ) –cn→ ℂ ) = ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) Cn ( TopOpen ‘ ℂfld ) ) |
| 672 |
671
|
eqcomi |
⊢ ( ( ( topGen ‘ ran (,) ) ↾t ( - π [,] π ) ) Cn ( TopOpen ‘ ℂfld ) ) = ( ( - π [,] π ) –cn→ ℂ ) |
| 673 |
669 672
|
eleqtri |
⊢ 𝐾 ∈ ( ( - π [,] π ) –cn→ ℂ ) |
| 674 |
|
cncfcdm |
⊢ ( ( ℝ ⊆ ℂ ∧ 𝐾 ∈ ( ( - π [,] π ) –cn→ ℂ ) ) → ( 𝐾 ∈ ( ( - π [,] π ) –cn→ ℝ ) ↔ 𝐾 : ( - π [,] π ) ⟶ ℝ ) ) |
| 675 |
12 673 674
|
mp2an |
⊢ ( 𝐾 ∈ ( ( - π [,] π ) –cn→ ℝ ) ↔ 𝐾 : ( - π [,] π ) ⟶ ℝ ) |
| 676 |
11 675
|
mpbir |
⊢ 𝐾 ∈ ( ( - π [,] π ) –cn→ ℝ ) |