Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  dirkertrigeqlem3 Structured version   Visualization version   GIF version

Theorem dirkertrigeqlem3 40834
Description: Trigonometric equality lemma for the Dirichlet Kernel trigonometric equality. Here we handle the case for an angle that's an odd multiple of π. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
dirkertrigeqlem3.n (𝜑𝑁 ∈ ℕ)
dirkertrigeqlem3.k (𝜑𝐾 ∈ ℤ)
dirkertrigeqlem3.a 𝐴 = (((2 · 𝐾) + 1) · π)
Assertion
Ref Expression
dirkertrigeqlem3 (𝜑 → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) / π) = ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))))
Distinct variable groups:   𝑛,𝑁   𝜑,𝑛
Allowed substitution hints:   𝐴(𝑛)   𝐾(𝑛)

Proof of Theorem dirkertrigeqlem3
StepHypRef Expression
1 dirkertrigeqlem3.a . . . . . . . . . . . . 13 𝐴 = (((2 · 𝐾) + 1) · π)
21a1i 11 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ (1...𝑁)) → 𝐴 = (((2 · 𝐾) + 1) · π))
32oveq2d 6809 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑛 · 𝐴) = (𝑛 · (((2 · 𝐾) + 1) · π)))
4 elfzelz 12549 . . . . . . . . . . . . . 14 (𝑛 ∈ (1...𝑁) → 𝑛 ∈ ℤ)
54zcnd 11685 . . . . . . . . . . . . 13 (𝑛 ∈ (1...𝑁) → 𝑛 ∈ ℂ)
65adantl 467 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ (1...𝑁)) → 𝑛 ∈ ℂ)
7 2cnd 11295 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ (1...𝑁)) → 2 ∈ ℂ)
8 dirkertrigeqlem3.k . . . . . . . . . . . . . . . . 17 (𝜑𝐾 ∈ ℤ)
98zcnd 11685 . . . . . . . . . . . . . . . 16 (𝜑𝐾 ∈ ℂ)
109adantr 466 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ (1...𝑁)) → 𝐾 ∈ ℂ)
117, 10mulcld 10262 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ (1...𝑁)) → (2 · 𝐾) ∈ ℂ)
12 1cnd 10258 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ (1...𝑁)) → 1 ∈ ℂ)
1311, 12addcld 10261 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ (1...𝑁)) → ((2 · 𝐾) + 1) ∈ ℂ)
14 picn 24432 . . . . . . . . . . . . . 14 π ∈ ℂ
1514a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ (1...𝑁)) → π ∈ ℂ)
1613, 15mulcld 10262 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ (1...𝑁)) → (((2 · 𝐾) + 1) · π) ∈ ℂ)
176, 16mulcomd 10263 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑛 · (((2 · 𝐾) + 1) · π)) = ((((2 · 𝐾) + 1) · π) · 𝑛))
1813, 15, 6mulassd 10265 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ (1...𝑁)) → ((((2 · 𝐾) + 1) · π) · 𝑛) = (((2 · 𝐾) + 1) · (π · 𝑛)))
1915, 6mulcld 10262 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ (1...𝑁)) → (π · 𝑛) ∈ ℂ)
2011, 12, 19adddird 10267 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ (1...𝑁)) → (((2 · 𝐾) + 1) · (π · 𝑛)) = (((2 · 𝐾) · (π · 𝑛)) + (1 · (π · 𝑛))))
2111, 19mulcld 10262 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ (1...𝑁)) → ((2 · 𝐾) · (π · 𝑛)) ∈ ℂ)
2212, 19mulcld 10262 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ (1...𝑁)) → (1 · (π · 𝑛)) ∈ ℂ)
2321, 22addcomd 10440 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ (1...𝑁)) → (((2 · 𝐾) · (π · 𝑛)) + (1 · (π · 𝑛))) = ((1 · (π · 𝑛)) + ((2 · 𝐾) · (π · 𝑛))))
2414a1i 11 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ (1...𝑁) → π ∈ ℂ)
2524, 5mulcld 10262 . . . . . . . . . . . . . . . 16 (𝑛 ∈ (1...𝑁) → (π · 𝑛) ∈ ℂ)
2625mulid2d 10260 . . . . . . . . . . . . . . 15 (𝑛 ∈ (1...𝑁) → (1 · (π · 𝑛)) = (π · 𝑛))
2726adantl 467 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ (1...𝑁)) → (1 · (π · 𝑛)) = (π · 𝑛))
287, 10, 15, 6mul4d 10450 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ (1...𝑁)) → ((2 · 𝐾) · (π · 𝑛)) = ((2 · π) · (𝐾 · 𝑛)))
297, 15mulcld 10262 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ (1...𝑁)) → (2 · π) ∈ ℂ)
3010, 6mulcld 10262 . . . . . . . . . . . . . . . 16 ((𝜑𝑛 ∈ (1...𝑁)) → (𝐾 · 𝑛) ∈ ℂ)
3129, 30mulcomd 10263 . . . . . . . . . . . . . . 15 ((𝜑𝑛 ∈ (1...𝑁)) → ((2 · π) · (𝐾 · 𝑛)) = ((𝐾 · 𝑛) · (2 · π)))
3228, 31eqtrd 2805 . . . . . . . . . . . . . 14 ((𝜑𝑛 ∈ (1...𝑁)) → ((2 · 𝐾) · (π · 𝑛)) = ((𝐾 · 𝑛) · (2 · π)))
3327, 32oveq12d 6811 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ (1...𝑁)) → ((1 · (π · 𝑛)) + ((2 · 𝐾) · (π · 𝑛))) = ((π · 𝑛) + ((𝐾 · 𝑛) · (2 · π))))
3423, 33eqtrd 2805 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ (1...𝑁)) → (((2 · 𝐾) · (π · 𝑛)) + (1 · (π · 𝑛))) = ((π · 𝑛) + ((𝐾 · 𝑛) · (2 · π))))
3518, 20, 343eqtrd 2809 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...𝑁)) → ((((2 · 𝐾) + 1) · π) · 𝑛) = ((π · 𝑛) + ((𝐾 · 𝑛) · (2 · π))))
363, 17, 353eqtrd 2809 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...𝑁)) → (𝑛 · 𝐴) = ((π · 𝑛) + ((𝐾 · 𝑛) · (2 · π))))
3736fveq2d 6336 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (cos‘(𝑛 · 𝐴)) = (cos‘((π · 𝑛) + ((𝐾 · 𝑛) · (2 · π)))))
388adantr 466 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...𝑁)) → 𝐾 ∈ ℤ)
394adantl 467 . . . . . . . . . . 11 ((𝜑𝑛 ∈ (1...𝑁)) → 𝑛 ∈ ℤ)
4038, 39zmulcld 11690 . . . . . . . . . 10 ((𝜑𝑛 ∈ (1...𝑁)) → (𝐾 · 𝑛) ∈ ℤ)
41 cosper 24455 . . . . . . . . . 10 (((π · 𝑛) ∈ ℂ ∧ (𝐾 · 𝑛) ∈ ℤ) → (cos‘((π · 𝑛) + ((𝐾 · 𝑛) · (2 · π)))) = (cos‘(π · 𝑛)))
4219, 40, 41syl2anc 573 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...𝑁)) → (cos‘((π · 𝑛) + ((𝐾 · 𝑛) · (2 · π)))) = (cos‘(π · 𝑛)))
4337, 42eqtrd 2805 . . . . . . . 8 ((𝜑𝑛 ∈ (1...𝑁)) → (cos‘(𝑛 · 𝐴)) = (cos‘(π · 𝑛)))
4443sumeq2dv 14641 . . . . . . 7 (𝜑 → Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴)) = Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛)))
4544oveq2d 6809 . . . . . 6 (𝜑 → ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) = ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))))
4645oveq1d 6808 . . . . 5 (𝜑 → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) / π) = (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) / π))
4746adantr 466 . . . 4 ((𝜑 ∧ (𝑁 mod 2) = 0) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) / π) = (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) / π))
48 dirkertrigeqlem3.n . . . . . . . . . . . . . 14 (𝜑𝑁 ∈ ℕ)
4948nncnd 11238 . . . . . . . . . . . . 13 (𝜑𝑁 ∈ ℂ)
50 2cnd 11295 . . . . . . . . . . . . 13 (𝜑 → 2 ∈ ℂ)
51 2ne0 11315 . . . . . . . . . . . . . 14 2 ≠ 0
5251a1i 11 . . . . . . . . . . . . 13 (𝜑 → 2 ≠ 0)
5349, 50, 52divcan2d 11005 . . . . . . . . . . . 12 (𝜑 → (2 · (𝑁 / 2)) = 𝑁)
5453eqcomd 2777 . . . . . . . . . . 11 (𝜑𝑁 = (2 · (𝑁 / 2)))
5554oveq2d 6809 . . . . . . . . . 10 (𝜑 → (1...𝑁) = (1...(2 · (𝑁 / 2))))
5655sumeq1d 14639 . . . . . . . . 9 (𝜑 → Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛)) = Σ𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(π · 𝑛)))
5756adantr 466 . . . . . . . 8 ((𝜑 ∧ (𝑁 mod 2) = 0) → Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛)) = Σ𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(π · 𝑛)))
5814a1i 11 . . . . . . . . . . . . 13 (𝑛 ∈ (1...(2 · (𝑁 / 2))) → π ∈ ℂ)
59 elfzelz 12549 . . . . . . . . . . . . . 14 (𝑛 ∈ (1...(2 · (𝑁 / 2))) → 𝑛 ∈ ℤ)
6059zcnd 11685 . . . . . . . . . . . . 13 (𝑛 ∈ (1...(2 · (𝑁 / 2))) → 𝑛 ∈ ℂ)
6158, 60mulcomd 10263 . . . . . . . . . . . 12 (𝑛 ∈ (1...(2 · (𝑁 / 2))) → (π · 𝑛) = (𝑛 · π))
6261fveq2d 6336 . . . . . . . . . . 11 (𝑛 ∈ (1...(2 · (𝑁 / 2))) → (cos‘(π · 𝑛)) = (cos‘(𝑛 · π)))
6362rgen 3071 . . . . . . . . . 10 𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(π · 𝑛)) = (cos‘(𝑛 · π))
6463a1i 11 . . . . . . . . 9 ((𝜑 ∧ (𝑁 mod 2) = 0) → ∀𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(π · 𝑛)) = (cos‘(𝑛 · π)))
6564sumeq2d 14640 . . . . . . . 8 ((𝜑 ∧ (𝑁 mod 2) = 0) → Σ𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(π · 𝑛)) = Σ𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(𝑛 · π)))
66 simpr 471 . . . . . . . . . . 11 ((𝜑 ∧ (𝑁 mod 2) = 0) → (𝑁 mod 2) = 0)
6748nnred 11237 . . . . . . . . . . . . 13 (𝜑𝑁 ∈ ℝ)
6867adantr 466 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑁 mod 2) = 0) → 𝑁 ∈ ℝ)
69 2rp 12040 . . . . . . . . . . . 12 2 ∈ ℝ+
70 mod0 12883 . . . . . . . . . . . 12 ((𝑁 ∈ ℝ ∧ 2 ∈ ℝ+) → ((𝑁 mod 2) = 0 ↔ (𝑁 / 2) ∈ ℤ))
7168, 69, 70sylancl 574 . . . . . . . . . . 11 ((𝜑 ∧ (𝑁 mod 2) = 0) → ((𝑁 mod 2) = 0 ↔ (𝑁 / 2) ∈ ℤ))
7266, 71mpbid 222 . . . . . . . . . 10 ((𝜑 ∧ (𝑁 mod 2) = 0) → (𝑁 / 2) ∈ ℤ)
73 2re 11292 . . . . . . . . . . . . 13 2 ∈ ℝ
7473a1i 11 . . . . . . . . . . . 12 (𝜑 → 2 ∈ ℝ)
7548nngt0d 11266 . . . . . . . . . . . 12 (𝜑 → 0 < 𝑁)
76 2pos 11314 . . . . . . . . . . . . 13 0 < 2
7776a1i 11 . . . . . . . . . . . 12 (𝜑 → 0 < 2)
7867, 74, 75, 77divgt0d 11161 . . . . . . . . . . 11 (𝜑 → 0 < (𝑁 / 2))
7978adantr 466 . . . . . . . . . 10 ((𝜑 ∧ (𝑁 mod 2) = 0) → 0 < (𝑁 / 2))
80 elnnz 11589 . . . . . . . . . 10 ((𝑁 / 2) ∈ ℕ ↔ ((𝑁 / 2) ∈ ℤ ∧ 0 < (𝑁 / 2)))
8172, 79, 80sylanbrc 572 . . . . . . . . 9 ((𝜑 ∧ (𝑁 mod 2) = 0) → (𝑁 / 2) ∈ ℕ)
82 dirkertrigeqlem1 40832 . . . . . . . . 9 ((𝑁 / 2) ∈ ℕ → Σ𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(𝑛 · π)) = 0)
8381, 82syl 17 . . . . . . . 8 ((𝜑 ∧ (𝑁 mod 2) = 0) → Σ𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(𝑛 · π)) = 0)
8457, 65, 833eqtrd 2809 . . . . . . 7 ((𝜑 ∧ (𝑁 mod 2) = 0) → Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛)) = 0)
8584oveq2d 6809 . . . . . 6 ((𝜑 ∧ (𝑁 mod 2) = 0) → ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) = ((1 / 2) + 0))
86 halfcn 11449 . . . . . . 7 (1 / 2) ∈ ℂ
8786addid1i 10425 . . . . . 6 ((1 / 2) + 0) = (1 / 2)
8885, 87syl6eq 2821 . . . . 5 ((𝜑 ∧ (𝑁 mod 2) = 0) → ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) = (1 / 2))
8988oveq1d 6808 . . . 4 ((𝜑 ∧ (𝑁 mod 2) = 0) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) / π) = ((1 / 2) / π))
90 ax-1cn 10196 . . . . . 6 1 ∈ ℂ
91 2cnne0 11444 . . . . . 6 (2 ∈ ℂ ∧ 2 ≠ 0)
92 pire 24431 . . . . . . . 8 π ∈ ℝ
93 pipos 24433 . . . . . . . 8 0 < π
9492, 93gt0ne0ii 10766 . . . . . . 7 π ≠ 0
9514, 94pm3.2i 447 . . . . . 6 (π ∈ ℂ ∧ π ≠ 0)
96 divdiv1 10938 . . . . . 6 ((1 ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 ≠ 0) ∧ (π ∈ ℂ ∧ π ≠ 0)) → ((1 / 2) / π) = (1 / (2 · π)))
9790, 91, 95, 96mp3an 1572 . . . . 5 ((1 / 2) / π) = (1 / (2 · π))
9897a1i 11 . . . 4 ((𝜑 ∧ (𝑁 mod 2) = 0) → ((1 / 2) / π) = (1 / (2 · π)))
9947, 89, 983eqtrd 2809 . . 3 ((𝜑 ∧ (𝑁 mod 2) = 0) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) / π) = (1 / (2 · π)))
1001oveq2i 6804 . . . . . . . . . 10 ((𝑁 + (1 / 2)) · 𝐴) = ((𝑁 + (1 / 2)) · (((2 · 𝐾) + 1) · π))
101100a1i 11 . . . . . . . . 9 (𝜑 → ((𝑁 + (1 / 2)) · 𝐴) = ((𝑁 + (1 / 2)) · (((2 · 𝐾) + 1) · π)))
10286a1i 11 . . . . . . . . . . 11 (𝜑 → (1 / 2) ∈ ℂ)
10349, 102addcld 10261 . . . . . . . . . 10 (𝜑 → (𝑁 + (1 / 2)) ∈ ℂ)
10450, 9mulcld 10262 . . . . . . . . . . 11 (𝜑 → (2 · 𝐾) ∈ ℂ)
105 peano2cn 10410 . . . . . . . . . . 11 ((2 · 𝐾) ∈ ℂ → ((2 · 𝐾) + 1) ∈ ℂ)
106104, 105syl 17 . . . . . . . . . 10 (𝜑 → ((2 · 𝐾) + 1) ∈ ℂ)
10714a1i 11 . . . . . . . . . 10 (𝜑 → π ∈ ℂ)
108103, 106, 107mulassd 10265 . . . . . . . . 9 (𝜑 → (((𝑁 + (1 / 2)) · ((2 · 𝐾) + 1)) · π) = ((𝑁 + (1 / 2)) · (((2 · 𝐾) + 1) · π)))
109 1cnd 10258 . . . . . . . . . . . . . 14 (𝜑 → 1 ∈ ℂ)
11049, 102, 104, 109muladdd 10691 . . . . . . . . . . . . 13 (𝜑 → ((𝑁 + (1 / 2)) · ((2 · 𝐾) + 1)) = (((𝑁 · (2 · 𝐾)) + (1 · (1 / 2))) + ((𝑁 · 1) + ((2 · 𝐾) · (1 / 2)))))
11149, 50, 9mul12d 10447 . . . . . . . . . . . . . . 15 (𝜑 → (𝑁 · (2 · 𝐾)) = (2 · (𝑁 · 𝐾)))
112102mulid2d 10260 . . . . . . . . . . . . . . 15 (𝜑 → (1 · (1 / 2)) = (1 / 2))
113111, 112oveq12d 6811 . . . . . . . . . . . . . 14 (𝜑 → ((𝑁 · (2 · 𝐾)) + (1 · (1 / 2))) = ((2 · (𝑁 · 𝐾)) + (1 / 2)))
11449mulid1d 10259 . . . . . . . . . . . . . . 15 (𝜑 → (𝑁 · 1) = 𝑁)
11550, 9mulcomd 10263 . . . . . . . . . . . . . . . . 17 (𝜑 → (2 · 𝐾) = (𝐾 · 2))
116115oveq1d 6808 . . . . . . . . . . . . . . . 16 (𝜑 → ((2 · 𝐾) · (1 / 2)) = ((𝐾 · 2) · (1 / 2)))
1179, 50, 102mulassd 10265 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝐾 · 2) · (1 / 2)) = (𝐾 · (2 · (1 / 2))))
118 2cn 11293 . . . . . . . . . . . . . . . . . . 19 2 ∈ ℂ
119118, 51recidi 10958 . . . . . . . . . . . . . . . . . 18 (2 · (1 / 2)) = 1
120119oveq2i 6804 . . . . . . . . . . . . . . . . 17 (𝐾 · (2 · (1 / 2))) = (𝐾 · 1)
1219mulid1d 10259 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐾 · 1) = 𝐾)
122120, 121syl5eq 2817 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐾 · (2 · (1 / 2))) = 𝐾)
123116, 117, 1223eqtrd 2809 . . . . . . . . . . . . . . 15 (𝜑 → ((2 · 𝐾) · (1 / 2)) = 𝐾)
124114, 123oveq12d 6811 . . . . . . . . . . . . . 14 (𝜑 → ((𝑁 · 1) + ((2 · 𝐾) · (1 / 2))) = (𝑁 + 𝐾))
125113, 124oveq12d 6811 . . . . . . . . . . . . 13 (𝜑 → (((𝑁 · (2 · 𝐾)) + (1 · (1 / 2))) + ((𝑁 · 1) + ((2 · 𝐾) · (1 / 2)))) = (((2 · (𝑁 · 𝐾)) + (1 / 2)) + (𝑁 + 𝐾)))
12649, 9mulcld 10262 . . . . . . . . . . . . . . 15 (𝜑 → (𝑁 · 𝐾) ∈ ℂ)
12750, 126mulcld 10262 . . . . . . . . . . . . . 14 (𝜑 → (2 · (𝑁 · 𝐾)) ∈ ℂ)
12849, 9addcld 10261 . . . . . . . . . . . . . 14 (𝜑 → (𝑁 + 𝐾) ∈ ℂ)
129127, 102, 128addassd 10264 . . . . . . . . . . . . 13 (𝜑 → (((2 · (𝑁 · 𝐾)) + (1 / 2)) + (𝑁 + 𝐾)) = ((2 · (𝑁 · 𝐾)) + ((1 / 2) + (𝑁 + 𝐾))))
130110, 125, 1293eqtrd 2809 . . . . . . . . . . . 12 (𝜑 → ((𝑁 + (1 / 2)) · ((2 · 𝐾) + 1)) = ((2 · (𝑁 · 𝐾)) + ((1 / 2) + (𝑁 + 𝐾))))
131102, 128addcld 10261 . . . . . . . . . . . . 13 (𝜑 → ((1 / 2) + (𝑁 + 𝐾)) ∈ ℂ)
132127, 131addcomd 10440 . . . . . . . . . . . 12 (𝜑 → ((2 · (𝑁 · 𝐾)) + ((1 / 2) + (𝑁 + 𝐾))) = (((1 / 2) + (𝑁 + 𝐾)) + (2 · (𝑁 · 𝐾))))
13350, 126mulcomd 10263 . . . . . . . . . . . . 13 (𝜑 → (2 · (𝑁 · 𝐾)) = ((𝑁 · 𝐾) · 2))
134133oveq2d 6809 . . . . . . . . . . . 12 (𝜑 → (((1 / 2) + (𝑁 + 𝐾)) + (2 · (𝑁 · 𝐾))) = (((1 / 2) + (𝑁 + 𝐾)) + ((𝑁 · 𝐾) · 2)))
135130, 132, 1343eqtrd 2809 . . . . . . . . . . 11 (𝜑 → ((𝑁 + (1 / 2)) · ((2 · 𝐾) + 1)) = (((1 / 2) + (𝑁 + 𝐾)) + ((𝑁 · 𝐾) · 2)))
136135oveq1d 6808 . . . . . . . . . 10 (𝜑 → (((𝑁 + (1 / 2)) · ((2 · 𝐾) + 1)) · π) = ((((1 / 2) + (𝑁 + 𝐾)) + ((𝑁 · 𝐾) · 2)) · π))
137126, 50mulcld 10262 . . . . . . . . . . 11 (𝜑 → ((𝑁 · 𝐾) · 2) ∈ ℂ)
138131, 137, 107adddird 10267 . . . . . . . . . 10 (𝜑 → ((((1 / 2) + (𝑁 + 𝐾)) + ((𝑁 · 𝐾) · 2)) · π) = ((((1 / 2) + (𝑁 + 𝐾)) · π) + (((𝑁 · 𝐾) · 2) · π)))
139126, 50, 107mulassd 10265 . . . . . . . . . . 11 (𝜑 → (((𝑁 · 𝐾) · 2) · π) = ((𝑁 · 𝐾) · (2 · π)))
140139oveq2d 6809 . . . . . . . . . 10 (𝜑 → ((((1 / 2) + (𝑁 + 𝐾)) · π) + (((𝑁 · 𝐾) · 2) · π)) = ((((1 / 2) + (𝑁 + 𝐾)) · π) + ((𝑁 · 𝐾) · (2 · π))))
141136, 138, 1403eqtrd 2809 . . . . . . . . 9 (𝜑 → (((𝑁 + (1 / 2)) · ((2 · 𝐾) + 1)) · π) = ((((1 / 2) + (𝑁 + 𝐾)) · π) + ((𝑁 · 𝐾) · (2 · π))))
142101, 108, 1413eqtr2d 2811 . . . . . . . 8 (𝜑 → ((𝑁 + (1 / 2)) · 𝐴) = ((((1 / 2) + (𝑁 + 𝐾)) · π) + ((𝑁 · 𝐾) · (2 · π))))
143142fveq2d 6336 . . . . . . 7 (𝜑 → (sin‘((𝑁 + (1 / 2)) · 𝐴)) = (sin‘((((1 / 2) + (𝑁 + 𝐾)) · π) + ((𝑁 · 𝐾) · (2 · π)))))
144131, 107mulcld 10262 . . . . . . . 8 (𝜑 → (((1 / 2) + (𝑁 + 𝐾)) · π) ∈ ℂ)
14548nnzd 11683 . . . . . . . . 9 (𝜑𝑁 ∈ ℤ)
146145, 8zmulcld 11690 . . . . . . . 8 (𝜑 → (𝑁 · 𝐾) ∈ ℤ)
147 sinper 24454 . . . . . . . 8 (((((1 / 2) + (𝑁 + 𝐾)) · π) ∈ ℂ ∧ (𝑁 · 𝐾) ∈ ℤ) → (sin‘((((1 / 2) + (𝑁 + 𝐾)) · π) + ((𝑁 · 𝐾) · (2 · π)))) = (sin‘(((1 / 2) + (𝑁 + 𝐾)) · π)))
148144, 146, 147syl2anc 573 . . . . . . 7 (𝜑 → (sin‘((((1 / 2) + (𝑁 + 𝐾)) · π) + ((𝑁 · 𝐾) · (2 · π)))) = (sin‘(((1 / 2) + (𝑁 + 𝐾)) · π)))
149102, 128addcomd 10440 . . . . . . . . . 10 (𝜑 → ((1 / 2) + (𝑁 + 𝐾)) = ((𝑁 + 𝐾) + (1 / 2)))
15049, 9, 102addassd 10264 . . . . . . . . . 10 (𝜑 → ((𝑁 + 𝐾) + (1 / 2)) = (𝑁 + (𝐾 + (1 / 2))))
1519, 102addcld 10261 . . . . . . . . . . 11 (𝜑 → (𝐾 + (1 / 2)) ∈ ℂ)
15249, 151addcomd 10440 . . . . . . . . . 10 (𝜑 → (𝑁 + (𝐾 + (1 / 2))) = ((𝐾 + (1 / 2)) + 𝑁))
153149, 150, 1523eqtrd 2809 . . . . . . . . 9 (𝜑 → ((1 / 2) + (𝑁 + 𝐾)) = ((𝐾 + (1 / 2)) + 𝑁))
154153oveq1d 6808 . . . . . . . 8 (𝜑 → (((1 / 2) + (𝑁 + 𝐾)) · π) = (((𝐾 + (1 / 2)) + 𝑁) · π))
155154fveq2d 6336 . . . . . . 7 (𝜑 → (sin‘(((1 / 2) + (𝑁 + 𝐾)) · π)) = (sin‘(((𝐾 + (1 / 2)) + 𝑁) · π)))
156143, 148, 1553eqtrd 2809 . . . . . 6 (𝜑 → (sin‘((𝑁 + (1 / 2)) · 𝐴)) = (sin‘(((𝐾 + (1 / 2)) + 𝑁) · π)))
1571a1i 11 . . . . . . . . . 10 (𝜑𝐴 = (((2 · 𝐾) + 1) · π))
158157oveq1d 6808 . . . . . . . . 9 (𝜑 → (𝐴 / 2) = ((((2 · 𝐾) + 1) · π) / 2))
159106, 107, 50, 52div23d 11040 . . . . . . . . 9 (𝜑 → ((((2 · 𝐾) + 1) · π) / 2) = ((((2 · 𝐾) + 1) / 2) · π))
160104, 109, 50, 52divdird 11041 . . . . . . . . . . 11 (𝜑 → (((2 · 𝐾) + 1) / 2) = (((2 · 𝐾) / 2) + (1 / 2)))
1619, 50, 52divcan3d 11008 . . . . . . . . . . . 12 (𝜑 → ((2 · 𝐾) / 2) = 𝐾)
162161oveq1d 6808 . . . . . . . . . . 11 (𝜑 → (((2 · 𝐾) / 2) + (1 / 2)) = (𝐾 + (1 / 2)))
163160, 162eqtrd 2805 . . . . . . . . . 10 (𝜑 → (((2 · 𝐾) + 1) / 2) = (𝐾 + (1 / 2)))
164163oveq1d 6808 . . . . . . . . 9 (𝜑 → ((((2 · 𝐾) + 1) / 2) · π) = ((𝐾 + (1 / 2)) · π))
165158, 159, 1643eqtrd 2809 . . . . . . . 8 (𝜑 → (𝐴 / 2) = ((𝐾 + (1 / 2)) · π))
166165fveq2d 6336 . . . . . . 7 (𝜑 → (sin‘(𝐴 / 2)) = (sin‘((𝐾 + (1 / 2)) · π)))
167166oveq2d 6809 . . . . . 6 (𝜑 → ((2 · π) · (sin‘(𝐴 / 2))) = ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π))))
168156, 167oveq12d 6811 . . . . 5 (𝜑 → ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))) = ((sin‘(((𝐾 + (1 / 2)) + 𝑁) · π)) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
169168adantr 466 . . . 4 ((𝜑 ∧ (𝑁 mod 2) = 0) → ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))) = ((sin‘(((𝐾 + (1 / 2)) + 𝑁) · π)) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
170151, 49, 107adddird 10267 . . . . . . 7 (𝜑 → (((𝐾 + (1 / 2)) + 𝑁) · π) = (((𝐾 + (1 / 2)) · π) + (𝑁 · π)))
171170fveq2d 6336 . . . . . 6 (𝜑 → (sin‘(((𝐾 + (1 / 2)) + 𝑁) · π)) = (sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))))
172171oveq1d 6808 . . . . 5 (𝜑 → ((sin‘(((𝐾 + (1 / 2)) + 𝑁) · π)) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = ((sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
173172adantr 466 . . . 4 ((𝜑 ∧ (𝑁 mod 2) = 0) → ((sin‘(((𝐾 + (1 / 2)) + 𝑁) · π)) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = ((sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
17449halfcld 11479 . . . . . . . . . . . . . 14 (𝜑 → (𝑁 / 2) ∈ ℂ)
17550, 174mulcomd 10263 . . . . . . . . . . . . 13 (𝜑 → (2 · (𝑁 / 2)) = ((𝑁 / 2) · 2))
17653, 175eqtr3d 2807 . . . . . . . . . . . 12 (𝜑𝑁 = ((𝑁 / 2) · 2))
177176oveq1d 6808 . . . . . . . . . . 11 (𝜑 → (𝑁 · π) = (((𝑁 / 2) · 2) · π))
178174, 50, 107mulassd 10265 . . . . . . . . . . 11 (𝜑 → (((𝑁 / 2) · 2) · π) = ((𝑁 / 2) · (2 · π)))
179177, 178eqtrd 2805 . . . . . . . . . 10 (𝜑 → (𝑁 · π) = ((𝑁 / 2) · (2 · π)))
180179oveq2d 6809 . . . . . . . . 9 (𝜑 → (((𝐾 + (1 / 2)) · π) + (𝑁 · π)) = (((𝐾 + (1 / 2)) · π) + ((𝑁 / 2) · (2 · π))))
181180fveq2d 6336 . . . . . . . 8 (𝜑 → (sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) = (sin‘(((𝐾 + (1 / 2)) · π) + ((𝑁 / 2) · (2 · π)))))
182181adantr 466 . . . . . . 7 ((𝜑 ∧ (𝑁 mod 2) = 0) → (sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) = (sin‘(((𝐾 + (1 / 2)) · π) + ((𝑁 / 2) · (2 · π)))))
1839adantr 466 . . . . . . . . . 10 ((𝜑 ∧ (𝑁 mod 2) = 0) → 𝐾 ∈ ℂ)
184 1cnd 10258 . . . . . . . . . . 11 ((𝜑 ∧ (𝑁 mod 2) = 0) → 1 ∈ ℂ)
185184halfcld 11479 . . . . . . . . . 10 ((𝜑 ∧ (𝑁 mod 2) = 0) → (1 / 2) ∈ ℂ)
186183, 185addcld 10261 . . . . . . . . 9 ((𝜑 ∧ (𝑁 mod 2) = 0) → (𝐾 + (1 / 2)) ∈ ℂ)
18714a1i 11 . . . . . . . . 9 ((𝜑 ∧ (𝑁 mod 2) = 0) → π ∈ ℂ)
188186, 187mulcld 10262 . . . . . . . 8 ((𝜑 ∧ (𝑁 mod 2) = 0) → ((𝐾 + (1 / 2)) · π) ∈ ℂ)
189 sinper 24454 . . . . . . . 8 ((((𝐾 + (1 / 2)) · π) ∈ ℂ ∧ (𝑁 / 2) ∈ ℤ) → (sin‘(((𝐾 + (1 / 2)) · π) + ((𝑁 / 2) · (2 · π)))) = (sin‘((𝐾 + (1 / 2)) · π)))
190188, 72, 189syl2anc 573 . . . . . . 7 ((𝜑 ∧ (𝑁 mod 2) = 0) → (sin‘(((𝐾 + (1 / 2)) · π) + ((𝑁 / 2) · (2 · π)))) = (sin‘((𝐾 + (1 / 2)) · π)))
191182, 190eqtrd 2805 . . . . . 6 ((𝜑 ∧ (𝑁 mod 2) = 0) → (sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) = (sin‘((𝐾 + (1 / 2)) · π)))
19250, 107mulcld 10262 . . . . . . . 8 (𝜑 → (2 · π) ∈ ℂ)
193151, 107mulcld 10262 . . . . . . . . 9 (𝜑 → ((𝐾 + (1 / 2)) · π) ∈ ℂ)
194193sincld 15066 . . . . . . . 8 (𝜑 → (sin‘((𝐾 + (1 / 2)) · π)) ∈ ℂ)
195192, 194mulcomd 10263 . . . . . . 7 (𝜑 → ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π))) = ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π)))
196195adantr 466 . . . . . 6 ((𝜑 ∧ (𝑁 mod 2) = 0) → ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π))) = ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π)))
197191, 196oveq12d 6811 . . . . 5 ((𝜑 ∧ (𝑁 mod 2) = 0) → ((sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = ((sin‘((𝐾 + (1 / 2)) · π)) / ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π))))
19894a1i 11 . . . . . . . . . . . 12 (𝜑 → π ≠ 0)
199151, 107, 198divcan4d 11009 . . . . . . . . . . 11 (𝜑 → (((𝐾 + (1 / 2)) · π) / π) = (𝐾 + (1 / 2)))
2008zred 11684 . . . . . . . . . . . . 13 (𝜑𝐾 ∈ ℝ)
20169a1i 11 . . . . . . . . . . . . . 14 (𝜑 → 2 ∈ ℝ+)
202201rpreccld 12085 . . . . . . . . . . . . 13 (𝜑 → (1 / 2) ∈ ℝ+)
203200, 202ltaddrpd 12108 . . . . . . . . . . . 12 (𝜑𝐾 < (𝐾 + (1 / 2)))
204 1red 10257 . . . . . . . . . . . . . 14 (𝜑 → 1 ∈ ℝ)
205204rehalfcld 11481 . . . . . . . . . . . . 13 (𝜑 → (1 / 2) ∈ ℝ)
206 halflt1 11452 . . . . . . . . . . . . . 14 (1 / 2) < 1
207206a1i 11 . . . . . . . . . . . . 13 (𝜑 → (1 / 2) < 1)
208205, 204, 200, 207ltadd2dd 10398 . . . . . . . . . . . 12 (𝜑 → (𝐾 + (1 / 2)) < (𝐾 + 1))
209 btwnnz 11655 . . . . . . . . . . . 12 ((𝐾 ∈ ℤ ∧ 𝐾 < (𝐾 + (1 / 2)) ∧ (𝐾 + (1 / 2)) < (𝐾 + 1)) → ¬ (𝐾 + (1 / 2)) ∈ ℤ)
2108, 203, 208, 209syl3anc 1476 . . . . . . . . . . 11 (𝜑 → ¬ (𝐾 + (1 / 2)) ∈ ℤ)
211199, 210eqneltrd 2869 . . . . . . . . . 10 (𝜑 → ¬ (((𝐾 + (1 / 2)) · π) / π) ∈ ℤ)
212 sineq0 24494 . . . . . . . . . . 11 (((𝐾 + (1 / 2)) · π) ∈ ℂ → ((sin‘((𝐾 + (1 / 2)) · π)) = 0 ↔ (((𝐾 + (1 / 2)) · π) / π) ∈ ℤ))
213193, 212syl 17 . . . . . . . . . 10 (𝜑 → ((sin‘((𝐾 + (1 / 2)) · π)) = 0 ↔ (((𝐾 + (1 / 2)) · π) / π) ∈ ℤ))
214211, 213mtbird 314 . . . . . . . . 9 (𝜑 → ¬ (sin‘((𝐾 + (1 / 2)) · π)) = 0)
215214neqned 2950 . . . . . . . 8 (𝜑 → (sin‘((𝐾 + (1 / 2)) · π)) ≠ 0)
21650, 107, 52, 198mulne0d 10881 . . . . . . . 8 (𝜑 → (2 · π) ≠ 0)
217194, 194, 192, 215, 216divdiv1d 11034 . . . . . . 7 (𝜑 → (((sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) / (2 · π)) = ((sin‘((𝐾 + (1 / 2)) · π)) / ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π))))
218194, 215dividd 11001 . . . . . . . 8 (𝜑 → ((sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) = 1)
219218oveq1d 6808 . . . . . . 7 (𝜑 → (((sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) / (2 · π)) = (1 / (2 · π)))
220217, 219eqtr3d 2807 . . . . . 6 (𝜑 → ((sin‘((𝐾 + (1 / 2)) · π)) / ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π))) = (1 / (2 · π)))
221220adantr 466 . . . . 5 ((𝜑 ∧ (𝑁 mod 2) = 0) → ((sin‘((𝐾 + (1 / 2)) · π)) / ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π))) = (1 / (2 · π)))
222197, 221eqtrd 2805 . . . 4 ((𝜑 ∧ (𝑁 mod 2) = 0) → ((sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = (1 / (2 · π)))
223169, 173, 2223eqtrrd 2810 . . 3 ((𝜑 ∧ (𝑁 mod 2) = 0) → (1 / (2 · π)) = ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))))
22499, 223eqtrd 2805 . 2 ((𝜑 ∧ (𝑁 mod 2) = 0) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) / π) = ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))))
22546adantr 466 . . 3 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) / π) = (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) / π))
226145adantr 466 . . . . . . . . 9 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → 𝑁 ∈ ℤ)
227 simpr 471 . . . . . . . . . 10 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ¬ (𝑁 mod 2) = 0)
228227neqned 2950 . . . . . . . . 9 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (𝑁 mod 2) ≠ 0)
229 oddfl 40007 . . . . . . . . 9 ((𝑁 ∈ ℤ ∧ (𝑁 mod 2) ≠ 0) → 𝑁 = ((2 · (⌊‘(𝑁 / 2))) + 1))
230226, 228, 229syl2anc 573 . . . . . . . 8 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → 𝑁 = ((2 · (⌊‘(𝑁 / 2))) + 1))
231230oveq2d 6809 . . . . . . 7 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (1...𝑁) = (1...((2 · (⌊‘(𝑁 / 2))) + 1)))
232231sumeq1d 14639 . . . . . 6 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛)) = Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)))
233 fvoveq1 6816 . . . . . . . . . . . . . . . . 17 (𝑁 = 1 → (⌊‘(𝑁 / 2)) = (⌊‘(1 / 2)))
234 halffl 40027 . . . . . . . . . . . . . . . . 17 (⌊‘(1 / 2)) = 0
235233, 234syl6eq 2821 . . . . . . . . . . . . . . . 16 (𝑁 = 1 → (⌊‘(𝑁 / 2)) = 0)
236235oveq2d 6809 . . . . . . . . . . . . . . 15 (𝑁 = 1 → (2 · (⌊‘(𝑁 / 2))) = (2 · 0))
237 2t0e0 11385 . . . . . . . . . . . . . . 15 (2 · 0) = 0
238236, 237syl6eq 2821 . . . . . . . . . . . . . 14 (𝑁 = 1 → (2 · (⌊‘(𝑁 / 2))) = 0)
239238oveq1d 6808 . . . . . . . . . . . . 13 (𝑁 = 1 → ((2 · (⌊‘(𝑁 / 2))) + 1) = (0 + 1))
24090addid2i 10426 . . . . . . . . . . . . 13 (0 + 1) = 1
241239, 240syl6eq 2821 . . . . . . . . . . . 12 (𝑁 = 1 → ((2 · (⌊‘(𝑁 / 2))) + 1) = 1)
242241oveq2d 6809 . . . . . . . . . . 11 (𝑁 = 1 → (1...((2 · (⌊‘(𝑁 / 2))) + 1)) = (1...1))
243242sumeq1d 14639 . . . . . . . . . 10 (𝑁 = 1 → Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)) = Σ𝑛 ∈ (1...1)(cos‘(π · 𝑛)))
244 1z 11609 . . . . . . . . . . . 12 1 ∈ ℤ
245 coscl 15063 . . . . . . . . . . . . 13 (π ∈ ℂ → (cos‘π) ∈ ℂ)
24614, 245ax-mp 5 . . . . . . . . . . . 12 (cos‘π) ∈ ℂ
247 oveq2 6801 . . . . . . . . . . . . . . 15 (𝑛 = 1 → (π · 𝑛) = (π · 1))
24814mulid1i 10244 . . . . . . . . . . . . . . 15 (π · 1) = π
249247, 248syl6eq 2821 . . . . . . . . . . . . . 14 (𝑛 = 1 → (π · 𝑛) = π)
250249fveq2d 6336 . . . . . . . . . . . . 13 (𝑛 = 1 → (cos‘(π · 𝑛)) = (cos‘π))
251250fsum1 14684 . . . . . . . . . . . 12 ((1 ∈ ℤ ∧ (cos‘π) ∈ ℂ) → Σ𝑛 ∈ (1...1)(cos‘(π · 𝑛)) = (cos‘π))
252244, 246, 251mp2an 672 . . . . . . . . . . 11 Σ𝑛 ∈ (1...1)(cos‘(π · 𝑛)) = (cos‘π)
253252a1i 11 . . . . . . . . . 10 (𝑁 = 1 → Σ𝑛 ∈ (1...1)(cos‘(π · 𝑛)) = (cos‘π))
254 cospi 24445 . . . . . . . . . . 11 (cos‘π) = -1
255254a1i 11 . . . . . . . . . 10 (𝑁 = 1 → (cos‘π) = -1)
256243, 253, 2553eqtrd 2809 . . . . . . . . 9 (𝑁 = 1 → Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)) = -1)
257256adantl 467 . . . . . . . 8 ((𝜑𝑁 = 1) → Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)) = -1)
258 2nn 11387 . . . . . . . . . . . . 13 2 ∈ ℕ
259258a1i 11 . . . . . . . . . . . 12 ((𝜑 ∧ ¬ 𝑁 = 1) → 2 ∈ ℕ)
26067rehalfcld 11481 . . . . . . . . . . . . . . 15 (𝜑 → (𝑁 / 2) ∈ ℝ)
261260flcld 12807 . . . . . . . . . . . . . 14 (𝜑 → (⌊‘(𝑁 / 2)) ∈ ℤ)
262261adantr 466 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ 𝑁 = 1) → (⌊‘(𝑁 / 2)) ∈ ℤ)
263 2div2e1 11352 . . . . . . . . . . . . . . 15 (2 / 2) = 1
26473a1i 11 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ ¬ 𝑁 = 1) → 2 ∈ ℝ)
26567adantr 466 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ ¬ 𝑁 = 1) → 𝑁 ∈ ℝ)
26669a1i 11 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ ¬ 𝑁 = 1) → 2 ∈ ℝ+)
267 neqne 2951 . . . . . . . . . . . . . . . . 17 𝑁 = 1 → 𝑁 ≠ 1)
268 nnne1ge2 40022 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ ℕ ∧ 𝑁 ≠ 1) → 2 ≤ 𝑁)
26948, 267, 268syl2an 583 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ ¬ 𝑁 = 1) → 2 ≤ 𝑁)
270264, 265, 266, 269lediv1dd 12133 . . . . . . . . . . . . . . 15 ((𝜑 ∧ ¬ 𝑁 = 1) → (2 / 2) ≤ (𝑁 / 2))
271263, 270syl5eqbrr 4822 . . . . . . . . . . . . . 14 ((𝜑 ∧ ¬ 𝑁 = 1) → 1 ≤ (𝑁 / 2))
272260adantr 466 . . . . . . . . . . . . . . 15 ((𝜑 ∧ ¬ 𝑁 = 1) → (𝑁 / 2) ∈ ℝ)
273 flge 12814 . . . . . . . . . . . . . . 15 (((𝑁 / 2) ∈ ℝ ∧ 1 ∈ ℤ) → (1 ≤ (𝑁 / 2) ↔ 1 ≤ (⌊‘(𝑁 / 2))))
274272, 244, 273sylancl 574 . . . . . . . . . . . . . 14 ((𝜑 ∧ ¬ 𝑁 = 1) → (1 ≤ (𝑁 / 2) ↔ 1 ≤ (⌊‘(𝑁 / 2))))
275271, 274mpbid 222 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ 𝑁 = 1) → 1 ≤ (⌊‘(𝑁 / 2)))
276 elnnz1 11605 . . . . . . . . . . . . 13 ((⌊‘(𝑁 / 2)) ∈ ℕ ↔ ((⌊‘(𝑁 / 2)) ∈ ℤ ∧ 1 ≤ (⌊‘(𝑁 / 2))))
277262, 275, 276sylanbrc 572 . . . . . . . . . . . 12 ((𝜑 ∧ ¬ 𝑁 = 1) → (⌊‘(𝑁 / 2)) ∈ ℕ)
278259, 277nnmulcld 11270 . . . . . . . . . . 11 ((𝜑 ∧ ¬ 𝑁 = 1) → (2 · (⌊‘(𝑁 / 2))) ∈ ℕ)
279 nnuz 11925 . . . . . . . . . . 11 ℕ = (ℤ‘1)
280278, 279syl6eleq 2860 . . . . . . . . . 10 ((𝜑 ∧ ¬ 𝑁 = 1) → (2 · (⌊‘(𝑁 / 2))) ∈ (ℤ‘1))
28114a1i 11 . . . . . . . . . . . 12 (((𝜑 ∧ ¬ 𝑁 = 1) ∧ 𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))) → π ∈ ℂ)
282 elfzelz 12549 . . . . . . . . . . . . . 14 (𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1)) → 𝑛 ∈ ℤ)
283282zcnd 11685 . . . . . . . . . . . . 13 (𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1)) → 𝑛 ∈ ℂ)
284283adantl 467 . . . . . . . . . . . 12 (((𝜑 ∧ ¬ 𝑁 = 1) ∧ 𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))) → 𝑛 ∈ ℂ)
285281, 284mulcld 10262 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 𝑁 = 1) ∧ 𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))) → (π · 𝑛) ∈ ℂ)
286285coscld 15067 . . . . . . . . . 10 (((𝜑 ∧ ¬ 𝑁 = 1) ∧ 𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))) → (cos‘(π · 𝑛)) ∈ ℂ)
287 oveq2 6801 . . . . . . . . . . 11 (𝑛 = ((2 · (⌊‘(𝑁 / 2))) + 1) → (π · 𝑛) = (π · ((2 · (⌊‘(𝑁 / 2))) + 1)))
288287fveq2d 6336 . . . . . . . . . 10 (𝑛 = ((2 · (⌊‘(𝑁 / 2))) + 1) → (cos‘(π · 𝑛)) = (cos‘(π · ((2 · (⌊‘(𝑁 / 2))) + 1))))
289280, 286, 288fsump1 14695 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝑁 = 1) → Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)) = (Σ𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2))))(cos‘(π · 𝑛)) + (cos‘(π · ((2 · (⌊‘(𝑁 / 2))) + 1)))))
29014a1i 11 . . . . . . . . . . . . . 14 (𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2)))) → π ∈ ℂ)
291 elfzelz 12549 . . . . . . . . . . . . . . 15 (𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2)))) → 𝑛 ∈ ℤ)
292291zcnd 11685 . . . . . . . . . . . . . 14 (𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2)))) → 𝑛 ∈ ℂ)
293290, 292mulcomd 10263 . . . . . . . . . . . . 13 (𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2)))) → (π · 𝑛) = (𝑛 · π))
294293fveq2d 6336 . . . . . . . . . . . 12 (𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2)))) → (cos‘(π · 𝑛)) = (cos‘(𝑛 · π)))
295294sumeq2i 14637 . . . . . . . . . . 11 Σ𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2))))(cos‘(π · 𝑛)) = Σ𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2))))(cos‘(𝑛 · π))
296 dirkertrigeqlem1 40832 . . . . . . . . . . . 12 ((⌊‘(𝑁 / 2)) ∈ ℕ → Σ𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2))))(cos‘(𝑛 · π)) = 0)
297277, 296syl 17 . . . . . . . . . . 11 ((𝜑 ∧ ¬ 𝑁 = 1) → Σ𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2))))(cos‘(𝑛 · π)) = 0)
298295, 297syl5eq 2817 . . . . . . . . . 10 ((𝜑 ∧ ¬ 𝑁 = 1) → Σ𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2))))(cos‘(π · 𝑛)) = 0)
299261zcnd 11685 . . . . . . . . . . . . . . . 16 (𝜑 → (⌊‘(𝑁 / 2)) ∈ ℂ)
30050, 299mulcld 10262 . . . . . . . . . . . . . . 15 (𝜑 → (2 · (⌊‘(𝑁 / 2))) ∈ ℂ)
301107, 300, 109adddid 10266 . . . . . . . . . . . . . 14 (𝜑 → (π · ((2 · (⌊‘(𝑁 / 2))) + 1)) = ((π · (2 · (⌊‘(𝑁 / 2)))) + (π · 1)))
302107, 50, 299mul13d 40009 . . . . . . . . . . . . . . 15 (𝜑 → (π · (2 · (⌊‘(𝑁 / 2)))) = ((⌊‘(𝑁 / 2)) · (2 · π)))
303248a1i 11 . . . . . . . . . . . . . . 15 (𝜑 → (π · 1) = π)
304302, 303oveq12d 6811 . . . . . . . . . . . . . 14 (𝜑 → ((π · (2 · (⌊‘(𝑁 / 2)))) + (π · 1)) = (((⌊‘(𝑁 / 2)) · (2 · π)) + π))
305299, 192mulcld 10262 . . . . . . . . . . . . . . 15 (𝜑 → ((⌊‘(𝑁 / 2)) · (2 · π)) ∈ ℂ)
306305, 107addcomd 10440 . . . . . . . . . . . . . 14 (𝜑 → (((⌊‘(𝑁 / 2)) · (2 · π)) + π) = (π + ((⌊‘(𝑁 / 2)) · (2 · π))))
307301, 304, 3063eqtrd 2809 . . . . . . . . . . . . 13 (𝜑 → (π · ((2 · (⌊‘(𝑁 / 2))) + 1)) = (π + ((⌊‘(𝑁 / 2)) · (2 · π))))
308307fveq2d 6336 . . . . . . . . . . . 12 (𝜑 → (cos‘(π · ((2 · (⌊‘(𝑁 / 2))) + 1))) = (cos‘(π + ((⌊‘(𝑁 / 2)) · (2 · π)))))
309 cosper 24455 . . . . . . . . . . . . 13 ((π ∈ ℂ ∧ (⌊‘(𝑁 / 2)) ∈ ℤ) → (cos‘(π + ((⌊‘(𝑁 / 2)) · (2 · π)))) = (cos‘π))
310107, 261, 309syl2anc 573 . . . . . . . . . . . 12 (𝜑 → (cos‘(π + ((⌊‘(𝑁 / 2)) · (2 · π)))) = (cos‘π))
311254a1i 11 . . . . . . . . . . . 12 (𝜑 → (cos‘π) = -1)
312308, 310, 3113eqtrd 2809 . . . . . . . . . . 11 (𝜑 → (cos‘(π · ((2 · (⌊‘(𝑁 / 2))) + 1))) = -1)
313312adantr 466 . . . . . . . . . 10 ((𝜑 ∧ ¬ 𝑁 = 1) → (cos‘(π · ((2 · (⌊‘(𝑁 / 2))) + 1))) = -1)
314298, 313oveq12d 6811 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝑁 = 1) → (Σ𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2))))(cos‘(π · 𝑛)) + (cos‘(π · ((2 · (⌊‘(𝑁 / 2))) + 1)))) = (0 + -1))
315 neg1cn 11326 . . . . . . . . . . 11 -1 ∈ ℂ
316315addid2i 10426 . . . . . . . . . 10 (0 + -1) = -1
317316a1i 11 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝑁 = 1) → (0 + -1) = -1)
318289, 314, 3173eqtrd 2809 . . . . . . . 8 ((𝜑 ∧ ¬ 𝑁 = 1) → Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)) = -1)
319257, 318pm2.61dan 814 . . . . . . 7 (𝜑 → Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)) = -1)
320319adantr 466 . . . . . 6 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)) = -1)
321232, 320eqtrd 2805 . . . . 5 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛)) = -1)
322321oveq2d 6809 . . . 4 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) = ((1 / 2) + -1))
323322oveq1d 6808 . . 3 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) / π) = (((1 / 2) + -1) / π))
324168, 172eqtrd 2805 . . . . 5 (𝜑 → ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))) = ((sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
325324adantr 466 . . . 4 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))) = ((sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
326230oveq1d 6808 . . . . . . . . 9 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (𝑁 · π) = (((2 · (⌊‘(𝑁 / 2))) + 1) · π))
327300, 109, 107adddird 10267 . . . . . . . . . . 11 (𝜑 → (((2 · (⌊‘(𝑁 / 2))) + 1) · π) = (((2 · (⌊‘(𝑁 / 2))) · π) + (1 · π)))
328107mulid2d 10260 . . . . . . . . . . . 12 (𝜑 → (1 · π) = π)
329328oveq2d 6809 . . . . . . . . . . 11 (𝜑 → (((2 · (⌊‘(𝑁 / 2))) · π) + (1 · π)) = (((2 · (⌊‘(𝑁 / 2))) · π) + π))
330300, 107mulcld 10262 . . . . . . . . . . . 12 (𝜑 → ((2 · (⌊‘(𝑁 / 2))) · π) ∈ ℂ)
331330, 107addcomd 10440 . . . . . . . . . . 11 (𝜑 → (((2 · (⌊‘(𝑁 / 2))) · π) + π) = (π + ((2 · (⌊‘(𝑁 / 2))) · π)))
332327, 329, 3313eqtrd 2809 . . . . . . . . . 10 (𝜑 → (((2 · (⌊‘(𝑁 / 2))) + 1) · π) = (π + ((2 · (⌊‘(𝑁 / 2))) · π)))
333332adantr 466 . . . . . . . . 9 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (((2 · (⌊‘(𝑁 / 2))) + 1) · π) = (π + ((2 · (⌊‘(𝑁 / 2))) · π)))
33450, 299mulcomd 10263 . . . . . . . . . . . . 13 (𝜑 → (2 · (⌊‘(𝑁 / 2))) = ((⌊‘(𝑁 / 2)) · 2))
335334oveq1d 6808 . . . . . . . . . . . 12 (𝜑 → ((2 · (⌊‘(𝑁 / 2))) · π) = (((⌊‘(𝑁 / 2)) · 2) · π))
336299, 50, 107mulassd 10265 . . . . . . . . . . . 12 (𝜑 → (((⌊‘(𝑁 / 2)) · 2) · π) = ((⌊‘(𝑁 / 2)) · (2 · π)))
337335, 336eqtrd 2805 . . . . . . . . . . 11 (𝜑 → ((2 · (⌊‘(𝑁 / 2))) · π) = ((⌊‘(𝑁 / 2)) · (2 · π)))
338337oveq2d 6809 . . . . . . . . . 10 (𝜑 → (π + ((2 · (⌊‘(𝑁 / 2))) · π)) = (π + ((⌊‘(𝑁 / 2)) · (2 · π))))
339338adantr 466 . . . . . . . . 9 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (π + ((2 · (⌊‘(𝑁 / 2))) · π)) = (π + ((⌊‘(𝑁 / 2)) · (2 · π))))
340326, 333, 3393eqtrd 2809 . . . . . . . 8 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (𝑁 · π) = (π + ((⌊‘(𝑁 / 2)) · (2 · π))))
341340oveq2d 6809 . . . . . . 7 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (((𝐾 + (1 / 2)) · π) + (𝑁 · π)) = (((𝐾 + (1 / 2)) · π) + (π + ((⌊‘(𝑁 / 2)) · (2 · π)))))
342193adantr 466 . . . . . . . 8 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ((𝐾 + (1 / 2)) · π) ∈ ℂ)
34314a1i 11 . . . . . . . 8 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → π ∈ ℂ)
344305adantr 466 . . . . . . . 8 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ((⌊‘(𝑁 / 2)) · (2 · π)) ∈ ℂ)
345342, 343, 344addassd 10264 . . . . . . 7 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π))) = (((𝐾 + (1 / 2)) · π) + (π + ((⌊‘(𝑁 / 2)) · (2 · π)))))
346341, 345eqtr4d 2808 . . . . . 6 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (((𝐾 + (1 / 2)) · π) + (𝑁 · π)) = ((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π))))
347346fveq2d 6336 . . . . 5 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) = (sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))))
348347oveq1d 6808 . . . 4 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ((sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = ((sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
349193, 107addcld 10261 . . . . . . . . 9 (𝜑 → (((𝐾 + (1 / 2)) · π) + π) ∈ ℂ)
350 sinper 24454 . . . . . . . . 9 (((((𝐾 + (1 / 2)) · π) + π) ∈ ℂ ∧ (⌊‘(𝑁 / 2)) ∈ ℤ) → (sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))) = (sin‘(((𝐾 + (1 / 2)) · π) + π)))
351349, 261, 350syl2anc 573 . . . . . . . 8 (𝜑 → (sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))) = (sin‘(((𝐾 + (1 / 2)) · π) + π)))
352 sinppi 24462 . . . . . . . . 9 (((𝐾 + (1 / 2)) · π) ∈ ℂ → (sin‘(((𝐾 + (1 / 2)) · π) + π)) = -(sin‘((𝐾 + (1 / 2)) · π)))
353193, 352syl 17 . . . . . . . 8 (𝜑 → (sin‘(((𝐾 + (1 / 2)) · π) + π)) = -(sin‘((𝐾 + (1 / 2)) · π)))
354351, 353eqtrd 2805 . . . . . . 7 (𝜑 → (sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))) = -(sin‘((𝐾 + (1 / 2)) · π)))
355354oveq1d 6808 . . . . . 6 (𝜑 → ((sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = (-(sin‘((𝐾 + (1 / 2)) · π)) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
356195oveq2d 6809 . . . . . 6 (𝜑 → (-(sin‘((𝐾 + (1 / 2)) · π)) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = (-(sin‘((𝐾 + (1 / 2)) · π)) / ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π))))
357194, 194, 215divnegd 11016 . . . . . . . . 9 (𝜑 → -((sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) = (-(sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))))
358218negeqd 10477 . . . . . . . . 9 (𝜑 → -((sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) = -1)
359357, 358eqtr3d 2807 . . . . . . . 8 (𝜑 → (-(sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) = -1)
360359oveq1d 6808 . . . . . . 7 (𝜑 → ((-(sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) / (2 · π)) = (-1 / (2 · π)))
361194negcld 10581 . . . . . . . 8 (𝜑 → -(sin‘((𝐾 + (1 / 2)) · π)) ∈ ℂ)
362361, 194, 192, 215, 216divdiv1d 11034 . . . . . . 7 (𝜑 → ((-(sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) / (2 · π)) = (-(sin‘((𝐾 + (1 / 2)) · π)) / ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π))))
36386, 90negsubi 10561 . . . . . . . . . . 11 ((1 / 2) + -1) = ((1 / 2) − 1)
36490, 86negsubdi2i 10569 . . . . . . . . . . 11 -(1 − (1 / 2)) = ((1 / 2) − 1)
365 1mhlfehlf 11453 . . . . . . . . . . . . 13 (1 − (1 / 2)) = (1 / 2)
366365negeqi 10476 . . . . . . . . . . . 12 -(1 − (1 / 2)) = -(1 / 2)
367 divneg 10921 . . . . . . . . . . . . 13 ((1 ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0) → -(1 / 2) = (-1 / 2))
36890, 118, 51, 367mp3an 1572 . . . . . . . . . . . 12 -(1 / 2) = (-1 / 2)
369366, 368eqtri 2793 . . . . . . . . . . 11 -(1 − (1 / 2)) = (-1 / 2)
370363, 364, 3693eqtr2i 2799 . . . . . . . . . 10 ((1 / 2) + -1) = (-1 / 2)
371370oveq1i 6803 . . . . . . . . 9 (((1 / 2) + -1) / π) = ((-1 / 2) / π)
372 divdiv1 10938 . . . . . . . . . 10 ((-1 ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 ≠ 0) ∧ (π ∈ ℂ ∧ π ≠ 0)) → ((-1 / 2) / π) = (-1 / (2 · π)))
373315, 91, 95, 372mp3an 1572 . . . . . . . . 9 ((-1 / 2) / π) = (-1 / (2 · π))
374371, 373eqtr2i 2794 . . . . . . . 8 (-1 / (2 · π)) = (((1 / 2) + -1) / π)
375374a1i 11 . . . . . . 7 (𝜑 → (-1 / (2 · π)) = (((1 / 2) + -1) / π))
376360, 362, 3753eqtr3d 2813 . . . . . 6 (𝜑 → (-(sin‘((𝐾 + (1 / 2)) · π)) / ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π))) = (((1 / 2) + -1) / π))
377355, 356, 3763eqtrd 2809 . . . . 5 (𝜑 → ((sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = (((1 / 2) + -1) / π))
378377adantr 466 . . . 4 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ((sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = (((1 / 2) + -1) / π))
379325, 348, 3783eqtrrd 2810 . . 3 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (((1 / 2) + -1) / π) = ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))))
380225, 323, 3793eqtrd 2809 . 2 ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) / π) = ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))))
381224, 380pm2.61dan 814 1 (𝜑 → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) / π) = ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wa 382   = wceq 1631  wcel 2145  wne 2943  wral 3061   class class class wbr 4786  cfv 6031  (class class class)co 6793  cc 10136  cr 10137  0cc0 10138  1c1 10139   + caddc 10141   · cmul 10143   < clt 10276  cle 10277  cmin 10468  -cneg 10469   / cdiv 10886  cn 11222  2c2 11272  cz 11579  cuz 11888  +crp 12035  ...cfz 12533  cfl 12799   mod cmo 12876  Σcsu 14624  sincsin 15000  cosccos 15001  πcpi 15003
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1870  ax-4 1885  ax-5 1991  ax-6 2057  ax-7 2093  ax-8 2147  ax-9 2154  ax-10 2174  ax-11 2190  ax-12 2203  ax-13 2408  ax-ext 2751  ax-rep 4904  ax-sep 4915  ax-nul 4923  ax-pow 4974  ax-pr 5034  ax-un 7096  ax-inf2 8702  ax-cnex 10194  ax-resscn 10195  ax-1cn 10196  ax-icn 10197  ax-addcl 10198  ax-addrcl 10199  ax-mulcl 10200  ax-mulrcl 10201  ax-mulcom 10202  ax-addass 10203  ax-mulass 10204  ax-distr 10205  ax-i2m1 10206  ax-1ne0 10207  ax-1rid 10208  ax-rnegex 10209  ax-rrecex 10210  ax-cnre 10211  ax-pre-lttri 10212  ax-pre-lttrn 10213  ax-pre-ltadd 10214  ax-pre-mulgt0 10215  ax-pre-sup 10216  ax-addf 10217  ax-mulf 10218
This theorem depends on definitions:  df-bi 197  df-an 383  df-or 837  df-3or 1072  df-3an 1073  df-tru 1634  df-fal 1637  df-ex 1853  df-nf 1858  df-sb 2050  df-eu 2622  df-mo 2623  df-clab 2758  df-cleq 2764  df-clel 2767  df-nfc 2902  df-ne 2944  df-nel 3047  df-ral 3066  df-rex 3067  df-reu 3068  df-rmo 3069  df-rab 3070  df-v 3353  df-sbc 3588  df-csb 3683  df-dif 3726  df-un 3728  df-in 3730  df-ss 3737  df-pss 3739  df-nul 4064  df-if 4226  df-pw 4299  df-sn 4317  df-pr 4319  df-tp 4321  df-op 4323  df-uni 4575  df-int 4612  df-iun 4656  df-iin 4657  df-br 4787  df-opab 4847  df-mpt 4864  df-tr 4887  df-id 5157  df-eprel 5162  df-po 5170  df-so 5171  df-fr 5208  df-se 5209  df-we 5210  df-xp 5255  df-rel 5256  df-cnv 5257  df-co 5258  df-dm 5259  df-rn 5260  df-res 5261  df-ima 5262  df-pred 5823  df-ord 5869  df-on 5870  df-lim 5871  df-suc 5872  df-iota 5994  df-fun 6033  df-fn 6034  df-f 6035  df-f1 6036  df-fo 6037  df-f1o 6038  df-fv 6039  df-isom 6040  df-riota 6754  df-ov 6796  df-oprab 6797  df-mpt2 6798  df-of 7044  df-om 7213  df-1st 7315  df-2nd 7316  df-supp 7447  df-wrecs 7559  df-recs 7621  df-rdg 7659  df-1o 7713  df-2o 7714  df-oadd 7717  df-er 7896  df-map 8011  df-pm 8012  df-ixp 8063  df-en 8110  df-dom 8111  df-sdom 8112  df-fin 8113  df-fsupp 8432  df-fi 8473  df-sup 8504  df-inf 8505  df-oi 8571  df-card 8965  df-cda 9192  df-pnf 10278  df-mnf 10279  df-xr 10280  df-ltxr 10281  df-le 10282  df-sub 10470  df-neg 10471  df-div 10887  df-nn 11223  df-2 11281  df-3 11282  df-4 11283  df-5 11284  df-6 11285  df-7 11286  df-8 11287  df-9 11288  df-n0 11495  df-z 11580  df-dec 11696  df-uz 11889  df-q 11992  df-rp 12036  df-xneg 12151  df-xadd 12152  df-xmul 12153  df-ioo 12384  df-ioc 12385  df-ico 12386  df-icc 12387  df-fz 12534  df-fzo 12674  df-fl 12801  df-mod 12877  df-seq 13009  df-exp 13068  df-fac 13265  df-bc 13294  df-hash 13322  df-shft 14015  df-cj 14047  df-re 14048  df-im 14049  df-sqrt 14183  df-abs 14184  df-limsup 14410  df-clim 14427  df-rlim 14428  df-sum 14625  df-ef 15004  df-sin 15006  df-cos 15007  df-pi 15009  df-struct 16066  df-ndx 16067  df-slot 16068  df-base 16070  df-sets 16071  df-ress 16072  df-plusg 16162  df-mulr 16163  df-starv 16164  df-sca 16165  df-vsca 16166  df-ip 16167  df-tset 16168  df-ple 16169  df-ds 16172  df-unif 16173  df-hom 16174  df-cco 16175  df-rest 16291  df-topn 16292  df-0g 16310  df-gsum 16311  df-topgen 16312  df-pt 16313  df-prds 16316  df-xrs 16370  df-qtop 16375  df-imas 16376  df-xps 16378  df-mre 16454  df-mrc 16455  df-acs 16457  df-mgm 17450  df-sgrp 17492  df-mnd 17503  df-submnd 17544  df-mulg 17749  df-cntz 17957  df-cmn 18402  df-psmet 19953  df-xmet 19954  df-met 19955  df-bl 19956  df-mopn 19957  df-fbas 19958  df-fg 19959  df-cnfld 19962  df-top 20919  df-topon 20936  df-topsp 20958  df-bases 20971  df-cld 21044  df-ntr 21045  df-cls 21046  df-nei 21123  df-lp 21161  df-perf 21162  df-cn 21252  df-cnp 21253  df-haus 21340  df-tx 21586  df-hmeo 21779  df-fil 21870  df-fm 21962  df-flim 21963  df-flf 21964  df-xms 22345  df-ms 22346  df-tms 22347  df-cncf 22901  df-limc 23850  df-dv 23851
This theorem is referenced by:  dirkertrigeq  40835
  Copyright terms: Public domain W3C validator