Metamath Proof Explorer


Theorem fourierdlem66

Description: Value of the G function when the argument is not zero. (Contributed by Glauco Siliprandi, 11-Dec-2019)

Ref Expression
Hypotheses fourierdlem66.f ⊢ φ → F : ℝ ⟶ ℝ
fourierdlem66.x ⊢ φ → X ∈ ℝ
fourierdlem66.y ⊢ φ → Y ∈ ℝ
fourierdlem66.w ⊢ φ → W ∈ ℝ
fourierdlem66.d ⊢ D = n ∈ ℕ ⟼ s ∈ ℝ ⟼ if s mod 2 ⁢ π = 0 2 ⁢ n + 1 2 ⁢ π sin ⁡ n + 1 2 ⁢ s 2 ⁢ π ⁢ sin ⁡ s 2
fourierdlem66.h ⊢ H = s ∈ − π π ⟼ if s = 0 0 F ⁡ X + s − if 0 < s Y W s
fourierdlem66.k ⊢ K = s ∈ − π π ⟼ if s = 0 1 s 2 ⁢ sin ⁡ s 2
fourierdlem66.u ⊢ U = s ∈ − π π ⟼ H ⁡ s ⁢ K ⁡ s
fourierdlem66.s ⊢ S = s ∈ − π π ⟼ sin ⁡ n + 1 2 ⁢ s
fourierdlem66.g ⊢ G = s ∈ − π π ⟼ U ⁡ s ⁢ S ⁡ s
fourierdlem66.a ⊢ A = − π π ∖ 0
Assertion fourierdlem66 ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → G ⁡ s = π ⁢ F ⁡ X + s − if 0 < s Y W ⁢ D ⁡ n ⁡ s

Proof

Step Hyp Ref Expression
1 fourierdlem66.f ⊢ φ → F : ℝ ⟶ ℝ
2 fourierdlem66.x ⊢ φ → X ∈ ℝ
3 fourierdlem66.y ⊢ φ → Y ∈ ℝ
4 fourierdlem66.w ⊢ φ → W ∈ ℝ
5 fourierdlem66.d ⊢ D = n ∈ ℕ ⟼ s ∈ ℝ ⟼ if s mod 2 ⁢ π = 0 2 ⁢ n + 1 2 ⁢ π sin ⁡ n + 1 2 ⁢ s 2 ⁢ π ⁢ sin ⁡ s 2
6 fourierdlem66.h ⊢ H = s ∈ − π π ⟼ if s = 0 0 F ⁡ X + s − if 0 < s Y W s
7 fourierdlem66.k ⊢ K = s ∈ − π π ⟼ if s = 0 1 s 2 ⁢ sin ⁡ s 2
8 fourierdlem66.u ⊢ U = s ∈ − π π ⟼ H ⁡ s ⁢ K ⁡ s
9 fourierdlem66.s ⊢ S = s ∈ − π π ⟼ sin ⁡ n + 1 2 ⁢ s
10 fourierdlem66.g ⊢ G = s ∈ − π π ⟼ U ⁡ s ⁢ S ⁡ s
11 fourierdlem66.a ⊢ A = − π π ∖ 0
12 11 eqimssi ⊢ A ⊆ − π π ∖ 0
13 difss ⊢ − π π ∖ 0 ⊆ − π π
14 12 13 sstri ⊢ A ⊆ − π π
15 14 a1i ⊢ φ → A ⊆ − π π
16 15 sselda ⊢ φ ∧ s ∈ A → s ∈ − π π
17 16 adantlr ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → s ∈ − π π
18 1 adantr ⊢ φ ∧ n ∈ ℕ → F : ℝ ⟶ ℝ
19 2 adantr ⊢ φ ∧ n ∈ ℕ → X ∈ ℝ
20 3 adantr ⊢ φ ∧ n ∈ ℕ → Y ∈ ℝ
21 4 adantr ⊢ φ ∧ n ∈ ℕ → W ∈ ℝ
22 18 19 20 21 6 7 8 fourierdlem55 ⊢ φ ∧ n ∈ ℕ → U : − π π ⟶ ℝ
23 22 adantr ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → U : − π π ⟶ ℝ
24 23 17 ffvelcdmd ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → U ⁡ s ∈ ℝ
25 nnre ⊢ n ∈ ℕ → n ∈ ℝ
26 9 fourierdlem5 ⊢ n ∈ ℝ → S : − π π ⟶ ℝ
27 25 26 syl ⊢ n ∈ ℕ → S : − π π ⟶ ℝ
28 27 ad2antlr ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → S : − π π ⟶ ℝ
29 28 17 ffvelcdmd ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → S ⁡ s ∈ ℝ
30 24 29 remulcld ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → U ⁡ s ⁢ S ⁡ s ∈ ℝ
31 10 fvmpt2 ⊢ s ∈ − π π ∧ U ⁡ s ⁢ S ⁡ s ∈ ℝ → G ⁡ s = U ⁡ s ⁢ S ⁡ s
32 17 30 31 syl2anc ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → G ⁡ s = U ⁡ s ⁢ S ⁡ s
33 1 2 3 4 6 fourierdlem9 ⊢ φ → H : − π π ⟶ ℝ
34 33 adantr ⊢ φ ∧ s ∈ A → H : − π π ⟶ ℝ
35 34 16 ffvelcdmd ⊢ φ ∧ s ∈ A → H ⁡ s ∈ ℝ
36 7 fourierdlem43 ⊢ K : − π π ⟶ ℝ
37 36 a1i ⊢ φ ∧ s ∈ A → K : − π π ⟶ ℝ
38 37 16 ffvelcdmd ⊢ φ ∧ s ∈ A → K ⁡ s ∈ ℝ
39 35 38 remulcld ⊢ φ ∧ s ∈ A → H ⁡ s ⁢ K ⁡ s ∈ ℝ
40 8 fvmpt2 ⊢ s ∈ − π π ∧ H ⁡ s ⁢ K ⁡ s ∈ ℝ → U ⁡ s = H ⁡ s ⁢ K ⁡ s
41 16 39 40 syl2anc ⊢ φ ∧ s ∈ A → U ⁡ s = H ⁡ s ⁢ K ⁡ s
42 0red ⊢ φ ∧ s ∈ A → 0 ∈ ℝ
43 1 adantr ⊢ φ ∧ s ∈ A → F : ℝ ⟶ ℝ
44 2 adantr ⊢ φ ∧ s ∈ A → X ∈ ℝ
45 pire ⊢ π ∈ ℝ
46 45 renegcli ⊢ − π ∈ ℝ
47 iccssre ⊢ − π ∈ ℝ ∧ π ∈ ℝ → − π π ⊆ ℝ
48 46 45 47 mp2an ⊢ − π π ⊆ ℝ
49 14 sseli ⊢ s ∈ A → s ∈ − π π
50 48 49 sselid ⊢ s ∈ A → s ∈ ℝ
51 50 adantl ⊢ φ ∧ s ∈ A → s ∈ ℝ
52 44 51 readdcld ⊢ φ ∧ s ∈ A → X + s ∈ ℝ
53 43 52 ffvelcdmd ⊢ φ ∧ s ∈ A → F ⁡ X + s ∈ ℝ
54 3 4 ifcld ⊢ φ → if 0 < s Y W ∈ ℝ
55 54 adantr ⊢ φ ∧ s ∈ A → if 0 < s Y W ∈ ℝ
56 53 55 resubcld ⊢ φ ∧ s ∈ A → F ⁡ X + s − if 0 < s Y W ∈ ℝ
57 simpr ⊢ φ ∧ s ∈ A → s ∈ A
58 12 57 sselid ⊢ φ ∧ s ∈ A → s ∈ − π π ∖ 0
59 58 eldifbd ⊢ φ ∧ s ∈ A → ¬ s ∈ 0
60 velsn ⊢ s ∈ 0 ↔ s = 0
61 59 60 sylnib ⊢ φ ∧ s ∈ A → ¬ s = 0
62 61 neqned ⊢ φ ∧ s ∈ A → s ≠ 0
63 56 51 62 redivcld ⊢ φ ∧ s ∈ A → F ⁡ X + s − if 0 < s Y W s ∈ ℝ
64 42 63 ifcld ⊢ φ ∧ s ∈ A → if s = 0 0 F ⁡ X + s − if 0 < s Y W s ∈ ℝ
65 6 fvmpt2 ⊢ s ∈ − π π ∧ if s = 0 0 F ⁡ X + s − if 0 < s Y W s ∈ ℝ → H ⁡ s = if s = 0 0 F ⁡ X + s − if 0 < s Y W s
66 16 64 65 syl2anc ⊢ φ ∧ s ∈ A → H ⁡ s = if s = 0 0 F ⁡ X + s − if 0 < s Y W s
67 61 iffalsed ⊢ φ ∧ s ∈ A → if s = 0 0 F ⁡ X + s − if 0 < s Y W s = F ⁡ X + s − if 0 < s Y W s
68 66 67 eqtrd ⊢ φ ∧ s ∈ A → H ⁡ s = F ⁡ X + s − if 0 < s Y W s
69 1red ⊢ φ ∧ s ∈ A → 1 ∈ ℝ
70 2re ⊢ 2 ∈ ℝ
71 70 a1i ⊢ φ ∧ s ∈ A → 2 ∈ ℝ
72 51 rehalfcld ⊢ φ ∧ s ∈ A → s 2 ∈ ℝ
73 72 resincld ⊢ φ ∧ s ∈ A → sin ⁡ s 2 ∈ ℝ
74 71 73 remulcld ⊢ φ ∧ s ∈ A → 2 ⁢ sin ⁡ s 2 ∈ ℝ
75 2cnd ⊢ φ ∧ s ∈ A → 2 ∈ ℂ
76 73 recnd ⊢ φ ∧ s ∈ A → sin ⁡ s 2 ∈ ℂ
77 2ne0 ⊢ 2 ≠ 0
78 77 a1i ⊢ φ ∧ s ∈ A → 2 ≠ 0
79 fourierdlem44 ⊢ s ∈ − π π ∧ s ≠ 0 → sin ⁡ s 2 ≠ 0
80 16 62 79 syl2anc ⊢ φ ∧ s ∈ A → sin ⁡ s 2 ≠ 0
81 75 76 78 80 mulne0d ⊢ φ ∧ s ∈ A → 2 ⁢ sin ⁡ s 2 ≠ 0
82 51 74 81 redivcld ⊢ φ ∧ s ∈ A → s 2 ⁢ sin ⁡ s 2 ∈ ℝ
83 69 82 ifcld ⊢ φ ∧ s ∈ A → if s = 0 1 s 2 ⁢ sin ⁡ s 2 ∈ ℝ
84 7 fvmpt2 ⊢ s ∈ − π π ∧ if s = 0 1 s 2 ⁢ sin ⁡ s 2 ∈ ℝ → K ⁡ s = if s = 0 1 s 2 ⁢ sin ⁡ s 2
85 16 83 84 syl2anc ⊢ φ ∧ s ∈ A → K ⁡ s = if s = 0 1 s 2 ⁢ sin ⁡ s 2
86 61 iffalsed ⊢ φ ∧ s ∈ A → if s = 0 1 s 2 ⁢ sin ⁡ s 2 = s 2 ⁢ sin ⁡ s 2
87 85 86 eqtrd ⊢ φ ∧ s ∈ A → K ⁡ s = s 2 ⁢ sin ⁡ s 2
88 68 87 oveq12d ⊢ φ ∧ s ∈ A → H ⁡ s ⁢ K ⁡ s = F ⁡ X + s − if 0 < s Y W s ⁢ s 2 ⁢ sin ⁡ s 2
89 56 recnd ⊢ φ ∧ s ∈ A → F ⁡ X + s − if 0 < s Y W ∈ ℂ
90 51 recnd ⊢ φ ∧ s ∈ A → s ∈ ℂ
91 75 76 mulcld ⊢ φ ∧ s ∈ A → 2 ⁢ sin ⁡ s 2 ∈ ℂ
92 89 90 91 62 81 dmdcan2d ⊢ φ ∧ s ∈ A → F ⁡ X + s − if 0 < s Y W s ⁢ s 2 ⁢ sin ⁡ s 2 = F ⁡ X + s − if 0 < s Y W 2 ⁢ sin ⁡ s 2
93 41 88 92 3eqtrd ⊢ φ ∧ s ∈ A → U ⁡ s = F ⁡ X + s − if 0 < s Y W 2 ⁢ sin ⁡ s 2
94 93 adantlr ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → U ⁡ s = F ⁡ X + s − if 0 < s Y W 2 ⁢ sin ⁡ s 2
95 25 ad2antlr ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → n ∈ ℝ
96 1red ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → 1 ∈ ℝ
97 96 rehalfcld ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → 1 2 ∈ ℝ
98 95 97 readdcld ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → n + 1 2 ∈ ℝ
99 50 adantl ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → s ∈ ℝ
100 98 99 remulcld ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → n + 1 2 ⁢ s ∈ ℝ
101 100 resincld ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → sin ⁡ n + 1 2 ⁢ s ∈ ℝ
102 9 fvmpt2 ⊢ s ∈ − π π ∧ sin ⁡ n + 1 2 ⁢ s ∈ ℝ → S ⁡ s = sin ⁡ n + 1 2 ⁢ s
103 17 101 102 syl2anc ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → S ⁡ s = sin ⁡ n + 1 2 ⁢ s
104 94 103 oveq12d ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → U ⁡ s ⁢ S ⁡ s = F ⁡ X + s − if 0 < s Y W 2 ⁢ sin ⁡ s 2 ⁢ sin ⁡ n + 1 2 ⁢ s
105 89 adantlr ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → F ⁡ X + s − if 0 < s Y W ∈ ℂ
106 91 adantlr ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → 2 ⁢ sin ⁡ s 2 ∈ ℂ
107 101 recnd ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → sin ⁡ n + 1 2 ⁢ s ∈ ℂ
108 81 adantlr ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → 2 ⁢ sin ⁡ s 2 ≠ 0
109 105 106 107 108 div32d ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → F ⁡ X + s − if 0 < s Y W 2 ⁢ sin ⁡ s 2 ⁢ sin ⁡ n + 1 2 ⁢ s = F ⁡ X + s − if 0 < s Y W ⁢ sin ⁡ n + 1 2 ⁢ s 2 ⁢ sin ⁡ s 2
110 25 adantr ⊢ n ∈ ℕ ∧ s ∈ A → n ∈ ℝ
111 halfre ⊢ 1 2 ∈ ℝ
112 111 a1i ⊢ n ∈ ℕ ∧ s ∈ A → 1 2 ∈ ℝ
113 110 112 readdcld ⊢ n ∈ ℕ ∧ s ∈ A → n + 1 2 ∈ ℝ
114 50 adantl ⊢ n ∈ ℕ ∧ s ∈ A → s ∈ ℝ
115 113 114 remulcld ⊢ n ∈ ℕ ∧ s ∈ A → n + 1 2 ⁢ s ∈ ℝ
116 115 resincld ⊢ n ∈ ℕ ∧ s ∈ A → sin ⁡ n + 1 2 ⁢ s ∈ ℝ
117 116 recnd ⊢ n ∈ ℕ ∧ s ∈ A → sin ⁡ n + 1 2 ⁢ s ∈ ℂ
118 70 a1i ⊢ n ∈ ℕ ∧ s ∈ A → 2 ∈ ℝ
119 114 rehalfcld ⊢ n ∈ ℕ ∧ s ∈ A → s 2 ∈ ℝ
120 119 resincld ⊢ n ∈ ℕ ∧ s ∈ A → sin ⁡ s 2 ∈ ℝ
121 118 120 remulcld ⊢ n ∈ ℕ ∧ s ∈ A → 2 ⁢ sin ⁡ s 2 ∈ ℝ
122 121 recnd ⊢ n ∈ ℕ ∧ s ∈ A → 2 ⁢ sin ⁡ s 2 ∈ ℂ
123 picn ⊢ π ∈ ℂ
124 123 a1i ⊢ n ∈ ℕ ∧ s ∈ A → π ∈ ℂ
125 2cnd ⊢ s ∈ A → 2 ∈ ℂ
126 rehalfcl ⊢ s ∈ ℝ → s 2 ∈ ℝ
127 resincl ⊢ s 2 ∈ ℝ → sin ⁡ s 2 ∈ ℝ
128 50 126 127 3syl ⊢ s ∈ A → sin ⁡ s 2 ∈ ℝ
129 128 recnd ⊢ s ∈ A → sin ⁡ s 2 ∈ ℂ
130 77 a1i ⊢ s ∈ A → 2 ≠ 0
131 eldifsni ⊢ s ∈ − π π ∖ 0 → s ≠ 0
132 131 11 eleq2s ⊢ s ∈ A → s ≠ 0
133 49 132 79 syl2anc ⊢ s ∈ A → sin ⁡ s 2 ≠ 0
134 125 129 130 133 mulne0d ⊢ s ∈ A → 2 ⁢ sin ⁡ s 2 ≠ 0
135 134 adantl ⊢ n ∈ ℕ ∧ s ∈ A → 2 ⁢ sin ⁡ s 2 ≠ 0
136 0re ⊢ 0 ∈ ℝ
137 pipos ⊢ 0 < π
138 136 137 gtneii ⊢ π ≠ 0
139 138 a1i ⊢ n ∈ ℕ ∧ s ∈ A → π ≠ 0
140 117 122 124 135 139 divdiv1d ⊢ n ∈ ℕ ∧ s ∈ A → sin ⁡ n + 1 2 ⁢ s 2 ⁢ sin ⁡ s 2 π = sin ⁡ n + 1 2 ⁢ s 2 ⁢ sin ⁡ s 2 ⁢ π
141 2cnd ⊢ n ∈ ℕ ∧ s ∈ A → 2 ∈ ℂ
142 129 adantl ⊢ n ∈ ℕ ∧ s ∈ A → sin ⁡ s 2 ∈ ℂ
143 141 142 124 mulassd ⊢ n ∈ ℕ ∧ s ∈ A → 2 ⁢ sin ⁡ s 2 ⁢ π = 2 ⁢ sin ⁡ s 2 ⁢ π
144 143 oveq2d ⊢ n ∈ ℕ ∧ s ∈ A → sin ⁡ n + 1 2 ⁢ s 2 ⁢ sin ⁡ s 2 ⁢ π = sin ⁡ n + 1 2 ⁢ s 2 ⁢ sin ⁡ s 2 ⁢ π
145 142 124 mulcomd ⊢ n ∈ ℕ ∧ s ∈ A → sin ⁡ s 2 ⁢ π = π ⁢ sin ⁡ s 2
146 145 oveq2d ⊢ n ∈ ℕ ∧ s ∈ A → 2 ⁢ sin ⁡ s 2 ⁢ π = 2 ⁢ π ⁢ sin ⁡ s 2
147 141 124 142 mulassd ⊢ n ∈ ℕ ∧ s ∈ A → 2 ⁢ π ⁢ sin ⁡ s 2 = 2 ⁢ π ⁢ sin ⁡ s 2
148 146 147 eqtr4d ⊢ n ∈ ℕ ∧ s ∈ A → 2 ⁢ sin ⁡ s 2 ⁢ π = 2 ⁢ π ⁢ sin ⁡ s 2
149 148 oveq2d ⊢ n ∈ ℕ ∧ s ∈ A → sin ⁡ n + 1 2 ⁢ s 2 ⁢ sin ⁡ s 2 ⁢ π = sin ⁡ n + 1 2 ⁢ s 2 ⁢ π ⁢ sin ⁡ s 2
150 140 144 149 3eqtrd ⊢ n ∈ ℕ ∧ s ∈ A → sin ⁡ n + 1 2 ⁢ s 2 ⁢ sin ⁡ s 2 π = sin ⁡ n + 1 2 ⁢ s 2 ⁢ π ⁢ sin ⁡ s 2
151 150 oveq2d ⊢ n ∈ ℕ ∧ s ∈ A → π ⁢ sin ⁡ n + 1 2 ⁢ s 2 ⁢ sin ⁡ s 2 π = π ⁢ sin ⁡ n + 1 2 ⁢ s 2 ⁢ π ⁢ sin ⁡ s 2
152 116 121 135 redivcld ⊢ n ∈ ℕ ∧ s ∈ A → sin ⁡ n + 1 2 ⁢ s 2 ⁢ sin ⁡ s 2 ∈ ℝ
153 152 recnd ⊢ n ∈ ℕ ∧ s ∈ A → sin ⁡ n + 1 2 ⁢ s 2 ⁢ sin ⁡ s 2 ∈ ℂ
154 153 124 139 divcan2d ⊢ n ∈ ℕ ∧ s ∈ A → π ⁢ sin ⁡ n + 1 2 ⁢ s 2 ⁢ sin ⁡ s 2 π = sin ⁡ n + 1 2 ⁢ s 2 ⁢ sin ⁡ s 2
155 5 dirkerval2 ⊢ n ∈ ℕ ∧ s ∈ ℝ → D ⁡ n ⁡ s = if s mod 2 ⁢ π = 0 2 ⁢ n + 1 2 ⁢ π sin ⁡ n + 1 2 ⁢ s 2 ⁢ π ⁢ sin ⁡ s 2
156 50 155 sylan2 ⊢ n ∈ ℕ ∧ s ∈ A → D ⁡ n ⁡ s = if s mod 2 ⁢ π = 0 2 ⁢ n + 1 2 ⁢ π sin ⁡ n + 1 2 ⁢ s 2 ⁢ π ⁢ sin ⁡ s 2
157 fourierdlem24 ⊢ s ∈ − π π ∖ 0 → s mod 2 ⁢ π ≠ 0
158 157 11 eleq2s ⊢ s ∈ A → s mod 2 ⁢ π ≠ 0
159 158 neneqd ⊢ s ∈ A → ¬ s mod 2 ⁢ π = 0
160 159 adantl ⊢ n ∈ ℕ ∧ s ∈ A → ¬ s mod 2 ⁢ π = 0
161 160 iffalsed ⊢ n ∈ ℕ ∧ s ∈ A → if s mod 2 ⁢ π = 0 2 ⁢ n + 1 2 ⁢ π sin ⁡ n + 1 2 ⁢ s 2 ⁢ π ⁢ sin ⁡ s 2 = sin ⁡ n + 1 2 ⁢ s 2 ⁢ π ⁢ sin ⁡ s 2
162 156 161 eqtr2d ⊢ n ∈ ℕ ∧ s ∈ A → sin ⁡ n + 1 2 ⁢ s 2 ⁢ π ⁢ sin ⁡ s 2 = D ⁡ n ⁡ s
163 162 oveq2d ⊢ n ∈ ℕ ∧ s ∈ A → π ⁢ sin ⁡ n + 1 2 ⁢ s 2 ⁢ π ⁢ sin ⁡ s 2 = π ⁢ D ⁡ n ⁡ s
164 151 154 163 3eqtr3d ⊢ n ∈ ℕ ∧ s ∈ A → sin ⁡ n + 1 2 ⁢ s 2 ⁢ sin ⁡ s 2 = π ⁢ D ⁡ n ⁡ s
165 164 oveq2d ⊢ n ∈ ℕ ∧ s ∈ A → F ⁡ X + s − if 0 < s Y W ⁢ sin ⁡ n + 1 2 ⁢ s 2 ⁢ sin ⁡ s 2 = F ⁡ X + s − if 0 < s Y W ⁢ π ⁢ D ⁡ n ⁡ s
166 165 adantll ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → F ⁡ X + s − if 0 < s Y W ⁢ sin ⁡ n + 1 2 ⁢ s 2 ⁢ sin ⁡ s 2 = F ⁡ X + s − if 0 < s Y W ⁢ π ⁢ D ⁡ n ⁡ s
167 123 a1i ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → π ∈ ℂ
168 5 dirkerre ⊢ n ∈ ℕ ∧ s ∈ ℝ → D ⁡ n ⁡ s ∈ ℝ
169 50 168 sylan2 ⊢ n ∈ ℕ ∧ s ∈ A → D ⁡ n ⁡ s ∈ ℝ
170 169 recnd ⊢ n ∈ ℕ ∧ s ∈ A → D ⁡ n ⁡ s ∈ ℂ
171 170 adantll ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → D ⁡ n ⁡ s ∈ ℂ
172 105 167 171 mul12d ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → F ⁡ X + s − if 0 < s Y W ⁢ π ⁢ D ⁡ n ⁡ s = π ⁢ F ⁡ X + s − if 0 < s Y W ⁢ D ⁡ n ⁡ s
173 109 166 172 3eqtrd ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → F ⁡ X + s − if 0 < s Y W 2 ⁢ sin ⁡ s 2 ⁢ sin ⁡ n + 1 2 ⁢ s = π ⁢ F ⁡ X + s − if 0 < s Y W ⁢ D ⁡ n ⁡ s
174 32 104 173 3eqtrd ⊢ φ ∧ n ∈ ℕ ∧ s ∈ A → G ⁡ s = π ⁢ F ⁡ X + s − if 0 < s Y W ⁢ D ⁡ n ⁡ s