dirkertrigeqlem3 - Mathbox for Glauco Siliprandi

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

Theorem dirkertrigeqlem3 46077

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**
Step	Hyp	Ref	Expression
1		dirkertrigeqlem3.a	. . . . . . . . . . . . 13 ⊢ 𝐴 = (((2 · 𝐾) + 1) · π)
2	1	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → 𝐴 = (((2 · 𝐾) + 1) · π))
3	2	oveq2d 7419	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (𝑛 · 𝐴) = (𝑛 · (((2 · 𝐾) + 1) · π)))
4		elfzelz 13539	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ (1...𝑁) → 𝑛 ∈ ℤ)
5	4	zcnd 12696	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (1...𝑁) → 𝑛 ∈ ℂ)
6	5	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → 𝑛 ∈ ℂ)
7		2cnd 12316	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → 2 ∈ ℂ)
8		dirkertrigeqlem3.k	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐾 ∈ ℤ)
9	8	zcnd 12696	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐾 ∈ ℂ)
10	9	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → 𝐾 ∈ ℂ)
11	7, 10	mulcld 11253	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (2 · 𝐾) ∈ ℂ)
12		1cnd 11228	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → 1 ∈ ℂ)
13	11, 12	addcld 11252	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → ((2 · 𝐾) + 1) ∈ ℂ)
14		picn 26417	. . . . . . . . . . . . . 14 ⊢ π ∈ ℂ
15	14	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → π ∈ ℂ)
16	13, 15	mulcld 11253	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (((2 · 𝐾) + 1) · π) ∈ ℂ)
17	6, 16	mulcomd 11254	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (𝑛 · (((2 · 𝐾) + 1) · π)) = ((((2 · 𝐾) + 1) · π) · 𝑛))
18	13, 15, 6	mulassd 11256	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → ((((2 · 𝐾) + 1) · π) · 𝑛) = (((2 · 𝐾) + 1) · (π · 𝑛)))
19	15, 6	mulcld 11253	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (π · 𝑛) ∈ ℂ)
20	11, 12, 19	adddird 11258	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (((2 · 𝐾) + 1) · (π · 𝑛)) = (((2 · 𝐾) · (π · 𝑛)) + (1 · (π · 𝑛))))
21	11, 19	mulcld 11253	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → ((2 · 𝐾) · (π · 𝑛)) ∈ ℂ)
22	12, 19	mulcld 11253	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (1 · (π · 𝑛)) ∈ ℂ)
23	21, 22	addcomd 11435	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (((2 · 𝐾) · (π · 𝑛)) + (1 · (π · 𝑛))) = ((1 · (π · 𝑛)) + ((2 · 𝐾) · (π · 𝑛))))
24	14	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ (1...𝑁) → π ∈ ℂ)
25	24, 5	mulcld 11253	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ (1...𝑁) → (π · 𝑛) ∈ ℂ)
26	25	mullidd 11251	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ∈ (1...𝑁) → (1 · (π · 𝑛)) = (π · 𝑛))
27	26	adantl 481	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (1 · (π · 𝑛)) = (π · 𝑛))
28	7, 10, 15, 6	mul4d 11445	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → ((2 · 𝐾) · (π · 𝑛)) = ((2 · π) · (𝐾 · 𝑛)))
29	7, 15	mulcld 11253	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (2 · π) ∈ ℂ)
30	10, 6	mulcld 11253	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (𝐾 · 𝑛) ∈ ℂ)
31	29, 30	mulcomd 11254	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → ((2 · π) · (𝐾 · 𝑛)) = ((𝐾 · 𝑛) · (2 · π)))
32	28, 31	eqtrd 2770	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → ((2 · 𝐾) · (π · 𝑛)) = ((𝐾 · 𝑛) · (2 · π)))
33	27, 32	oveq12d 7421	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → ((1 · (π · 𝑛)) + ((2 · 𝐾) · (π · 𝑛))) = ((π · 𝑛) + ((𝐾 · 𝑛) · (2 · π))))
34	23, 33	eqtrd 2770	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (((2 · 𝐾) · (π · 𝑛)) + (1 · (π · 𝑛))) = ((π · 𝑛) + ((𝐾 · 𝑛) · (2 · π))))
35	18, 20, 34	3eqtrd 2774	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → ((((2 · 𝐾) + 1) · π) · 𝑛) = ((π · 𝑛) + ((𝐾 · 𝑛) · (2 · π))))
36	3, 17, 35	3eqtrd 2774	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (𝑛 · 𝐴) = ((π · 𝑛) + ((𝐾 · 𝑛) · (2 · π))))
37	36	fveq2d 6879	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (cos‘(𝑛 · 𝐴)) = (cos‘((π · 𝑛) + ((𝐾 · 𝑛) · (2 · π)))))
38	8	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → 𝐾 ∈ ℤ)
39	4	adantl 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → 𝑛 ∈ ℤ)
40	38, 39	zmulcld 12701	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (𝐾 · 𝑛) ∈ ℤ)
41		cosper 26441	. . . . . . . . . 10 ⊢ (((π · 𝑛) ∈ ℂ ∧ (𝐾 · 𝑛) ∈ ℤ) → (cos‘((π · 𝑛) + ((𝐾 · 𝑛) · (2 · π)))) = (cos‘(π · 𝑛)))
42	19, 40, 41	syl2anc 584	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (cos‘((π · 𝑛) + ((𝐾 · 𝑛) · (2 · π)))) = (cos‘(π · 𝑛)))
43	37, 42	eqtrd 2770	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝑁)) → (cos‘(𝑛 · 𝐴)) = (cos‘(π · 𝑛)))
44	43	sumeq2dv 15716	. . . . . . 7 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴)) = Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛)))
45	44	oveq2d 7419	. . . . . 6 ⊢ (𝜑 → ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) = ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))))
46	45	oveq1d 7418	. . . . 5 ⊢ (𝜑 → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) / π) = (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) / π))
47	46	adantr 480	. . . 4 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) / π) = (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) / π))
48		dirkertrigeqlem3.n	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑁 ∈ ℕ)
49	48	nncnd 12254	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑁 ∈ ℂ)
50		2cnd 12316	. . . . . . . . . . . . 13 ⊢ (𝜑 → 2 ∈ ℂ)
51		2ne0 12342	. . . . . . . . . . . . . 14 ⊢ 2 ≠ 0
52	51	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝜑 → 2 ≠ 0)
53	49, 50, 52	divcan2d 12017	. . . . . . . . . . . 12 ⊢ (𝜑 → (2 · (𝑁 / 2)) = 𝑁)
54	53	eqcomd 2741	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑁 = (2 · (𝑁 / 2)))
55	54	oveq2d 7419	. . . . . . . . . 10 ⊢ (𝜑 → (1...𝑁) = (1...(2 · (𝑁 / 2))))
56	55	sumeq1d 15714	. . . . . . . . 9 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛)) = Σ𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(π · 𝑛)))
57	56	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛)) = Σ𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(π · 𝑛)))
58	14	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (1...(2 · (𝑁 / 2))) → π ∈ ℂ)
59		elfzelz 13539	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ (1...(2 · (𝑁 / 2))) → 𝑛 ∈ ℤ)
60	59	zcnd 12696	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (1...(2 · (𝑁 / 2))) → 𝑛 ∈ ℂ)
61	58, 60	mulcomd 11254	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ (1...(2 · (𝑁 / 2))) → (π · 𝑛) = (𝑛 · π))
62	61	fveq2d 6879	. . . . . . . . . . 11 ⊢ (𝑛 ∈ (1...(2 · (𝑁 / 2))) → (cos‘(π · 𝑛)) = (cos‘(𝑛 · π)))
63	62	rgen 3053	. . . . . . . . . 10 ⊢ ∀𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(π · 𝑛)) = (cos‘(𝑛 · π))
64	63	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → ∀𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(π · 𝑛)) = (cos‘(𝑛 · π)))
65	64	sumeq2d 15715	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → Σ𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(π · 𝑛)) = Σ𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(𝑛 · π)))
66		simpr 484	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → (𝑁 mod 2) = 0)
67	48	nnred 12253	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑁 ∈ ℝ)
68	67	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → 𝑁 ∈ ℝ)
69		2rp 13011	. . . . . . . . . . . 12 ⊢ 2 ∈ ℝ⁺
70		mod0 13891	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ ℝ ∧ 2 ∈ ℝ⁺) → ((𝑁 mod 2) = 0 ↔ (𝑁 / 2) ∈ ℤ))
71	68, 69, 70	sylancl 586	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → ((𝑁 mod 2) = 0 ↔ (𝑁 / 2) ∈ ℤ))
72	66, 71	mpbid 232	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → (𝑁 / 2) ∈ ℤ)
73		2re 12312	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℝ
74	73	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → 2 ∈ ℝ)
75	48	nngt0d 12287	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 < 𝑁)
76		2pos 12341	. . . . . . . . . . . . 13 ⊢ 0 < 2
77	76	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 < 2)
78	67, 74, 75, 77	divgt0d 12175	. . . . . . . . . . 11 ⊢ (𝜑 → 0 < (𝑁 / 2))
79	78	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → 0 < (𝑁 / 2))
80		elnnz 12596	. . . . . . . . . 10 ⊢ ((𝑁 / 2) ∈ ℕ ↔ ((𝑁 / 2) ∈ ℤ ∧ 0 < (𝑁 / 2)))
81	72, 79, 80	sylanbrc 583	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → (𝑁 / 2) ∈ ℕ)
82		dirkertrigeqlem1 46075	. . . . . . . . 9 ⊢ ((𝑁 / 2) ∈ ℕ → Σ𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(𝑛 · π)) = 0)
83	81, 82	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → Σ𝑛 ∈ (1...(2 · (𝑁 / 2)))(cos‘(𝑛 · π)) = 0)
84	57, 65, 83	3eqtrd 2774	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛)) = 0)
85	84	oveq2d 7419	. . . . . 6 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) = ((1 / 2) + 0))
86		halfcn 12453	. . . . . . 7 ⊢ (1 / 2) ∈ ℂ
87	86	addridi 11420	. . . . . 6 ⊢ ((1 / 2) + 0) = (1 / 2)
88	85, 87	eqtrdi 2786	. . . . 5 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) = (1 / 2))
89	88	oveq1d 7418	. . . 4 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) / π) = ((1 / 2) / π))
90		ax-1cn 11185	. . . . . 6 ⊢ 1 ∈ ℂ
91		2cnne0 12448	. . . . . 6 ⊢ (2 ∈ ℂ ∧ 2 ≠ 0)
92		pire 26416	. . . . . . . 8 ⊢ π ∈ ℝ
93		pipos 26418	. . . . . . . 8 ⊢ 0 < π
94	92, 93	gt0ne0ii 11771	. . . . . . 7 ⊢ π ≠ 0
95	14, 94	pm3.2i 470	. . . . . 6 ⊢ (π ∈ ℂ ∧ π ≠ 0)
96		divdiv1 11950	. . . . . 6 ⊢ ((1 ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 ≠ 0) ∧ (π ∈ ℂ ∧ π ≠ 0)) → ((1 / 2) / π) = (1 / (2 · π)))
97	90, 91, 95, 96	mp3an 1463	. . . . 5 ⊢ ((1 / 2) / π) = (1 / (2 · π))
98	97	a1i 11	. . . 4 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → ((1 / 2) / π) = (1 / (2 · π)))
99	47, 89, 98	3eqtrd 2774	. . 3 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) / π) = (1 / (2 · π)))
100	1	oveq2i 7414	. . . . . . . . . 10 ⊢ ((𝑁 + (1 / 2)) · 𝐴) = ((𝑁 + (1 / 2)) · (((2 · 𝐾) + 1) · π))
101	100	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → ((𝑁 + (1 / 2)) · 𝐴) = ((𝑁 + (1 / 2)) · (((2 · 𝐾) + 1) · π)))
102	86	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → (1 / 2) ∈ ℂ)
103	49, 102	addcld 11252	. . . . . . . . . 10 ⊢ (𝜑 → (𝑁 + (1 / 2)) ∈ ℂ)
104	50, 9	mulcld 11253	. . . . . . . . . . 11 ⊢ (𝜑 → (2 · 𝐾) ∈ ℂ)
105		peano2cn 11405	. . . . . . . . . . 11 ⊢ ((2 · 𝐾) ∈ ℂ → ((2 · 𝐾) + 1) ∈ ℂ)
106	104, 105	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → ((2 · 𝐾) + 1) ∈ ℂ)
107	14	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → π ∈ ℂ)
108	103, 106, 107	mulassd 11256	. . . . . . . . 9 ⊢ (𝜑 → (((𝑁 + (1 / 2)) · ((2 · 𝐾) + 1)) · π) = ((𝑁 + (1 / 2)) · (((2 · 𝐾) + 1) · π)))
109		1cnd 11228	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 1 ∈ ℂ)
110	49, 102, 104, 109	muladdd 11693	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝑁 + (1 / 2)) · ((2 · 𝐾) + 1)) = (((𝑁 · (2 · 𝐾)) + (1 · (1 / 2))) + ((𝑁 · 1) + ((2 · 𝐾) · (1 / 2)))))
111	49, 50, 9	mul12d 11442	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑁 · (2 · 𝐾)) = (2 · (𝑁 · 𝐾)))
112	102	mullidd 11251	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (1 · (1 / 2)) = (1 / 2))
113	111, 112	oveq12d 7421	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑁 · (2 · 𝐾)) + (1 · (1 / 2))) = ((2 · (𝑁 · 𝐾)) + (1 / 2)))
114	49	mulridd 11250	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑁 · 1) = 𝑁)
115	50, 9	mulcomd 11254	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (2 · 𝐾) = (𝐾 · 2))
116	115	oveq1d 7418	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((2 · 𝐾) · (1 / 2)) = ((𝐾 · 2) · (1 / 2)))
117	9, 50, 102	mulassd 11256	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((𝐾 · 2) · (1 / 2)) = (𝐾 · (2 · (1 / 2))))
118		2cn 12313	. . . . . . . . . . . . . . . . . . 19 ⊢ 2 ∈ ℂ
119	118, 51	recidi 11970	. . . . . . . . . . . . . . . . . 18 ⊢ (2 · (1 / 2)) = 1
120	119	oveq2i 7414	. . . . . . . . . . . . . . . . 17 ⊢ (𝐾 · (2 · (1 / 2))) = (𝐾 · 1)
121	9	mulridd 11250	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝐾 · 1) = 𝐾)
122	120, 121	eqtrid 2782	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝐾 · (2 · (1 / 2))) = 𝐾)
123	116, 117, 122	3eqtrd 2774	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((2 · 𝐾) · (1 / 2)) = 𝐾)
124	114, 123	oveq12d 7421	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑁 · 1) + ((2 · 𝐾) · (1 / 2))) = (𝑁 + 𝐾))
125	113, 124	oveq12d 7421	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((𝑁 · (2 · 𝐾)) + (1 · (1 / 2))) + ((𝑁 · 1) + ((2 · 𝐾) · (1 / 2)))) = (((2 · (𝑁 · 𝐾)) + (1 / 2)) + (𝑁 + 𝐾)))
126	49, 9	mulcld 11253	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑁 · 𝐾) ∈ ℂ)
127	50, 126	mulcld 11253	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (2 · (𝑁 · 𝐾)) ∈ ℂ)
128	49, 9	addcld 11252	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑁 + 𝐾) ∈ ℂ)
129	127, 102, 128	addassd 11255	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((2 · (𝑁 · 𝐾)) + (1 / 2)) + (𝑁 + 𝐾)) = ((2 · (𝑁 · 𝐾)) + ((1 / 2) + (𝑁 + 𝐾))))
130	110, 125, 129	3eqtrd 2774	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑁 + (1 / 2)) · ((2 · 𝐾) + 1)) = ((2 · (𝑁 · 𝐾)) + ((1 / 2) + (𝑁 + 𝐾))))
131	102, 128	addcld 11252	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((1 / 2) + (𝑁 + 𝐾)) ∈ ℂ)
132	127, 131	addcomd 11435	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2 · (𝑁 · 𝐾)) + ((1 / 2) + (𝑁 + 𝐾))) = (((1 / 2) + (𝑁 + 𝐾)) + (2 · (𝑁 · 𝐾))))
133	50, 126	mulcomd 11254	. . . . . . . . . . . . 13 ⊢ (𝜑 → (2 · (𝑁 · 𝐾)) = ((𝑁 · 𝐾) · 2))
134	133	oveq2d 7419	. . . . . . . . . . . 12 ⊢ (𝜑 → (((1 / 2) + (𝑁 + 𝐾)) + (2 · (𝑁 · 𝐾))) = (((1 / 2) + (𝑁 + 𝐾)) + ((𝑁 · 𝐾) · 2)))
135	130, 132, 134	3eqtrd 2774	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑁 + (1 / 2)) · ((2 · 𝐾) + 1)) = (((1 / 2) + (𝑁 + 𝐾)) + ((𝑁 · 𝐾) · 2)))
136	135	oveq1d 7418	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑁 + (1 / 2)) · ((2 · 𝐾) + 1)) · π) = ((((1 / 2) + (𝑁 + 𝐾)) + ((𝑁 · 𝐾) · 2)) · π))
137	126, 50	mulcld 11253	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑁 · 𝐾) · 2) ∈ ℂ)
138	131, 137, 107	adddird 11258	. . . . . . . . . 10 ⊢ (𝜑 → ((((1 / 2) + (𝑁 + 𝐾)) + ((𝑁 · 𝐾) · 2)) · π) = ((((1 / 2) + (𝑁 + 𝐾)) · π) + (((𝑁 · 𝐾) · 2) · π)))
139	126, 50, 107	mulassd 11256	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝑁 · 𝐾) · 2) · π) = ((𝑁 · 𝐾) · (2 · π)))
140	139	oveq2d 7419	. . . . . . . . . 10 ⊢ (𝜑 → ((((1 / 2) + (𝑁 + 𝐾)) · π) + (((𝑁 · 𝐾) · 2) · π)) = ((((1 / 2) + (𝑁 + 𝐾)) · π) + ((𝑁 · 𝐾) · (2 · π))))
141	136, 138, 140	3eqtrd 2774	. . . . . . . . 9 ⊢ (𝜑 → (((𝑁 + (1 / 2)) · ((2 · 𝐾) + 1)) · π) = ((((1 / 2) + (𝑁 + 𝐾)) · π) + ((𝑁 · 𝐾) · (2 · π))))
142	101, 108, 141	3eqtr2d 2776	. . . . . . . 8 ⊢ (𝜑 → ((𝑁 + (1 / 2)) · 𝐴) = ((((1 / 2) + (𝑁 + 𝐾)) · π) + ((𝑁 · 𝐾) · (2 · π))))
143	142	fveq2d 6879	. . . . . . 7 ⊢ (𝜑 → (sin‘((𝑁 + (1 / 2)) · 𝐴)) = (sin‘((((1 / 2) + (𝑁 + 𝐾)) · π) + ((𝑁 · 𝐾) · (2 · π)))))
144	131, 107	mulcld 11253	. . . . . . . 8 ⊢ (𝜑 → (((1 / 2) + (𝑁 + 𝐾)) · π) ∈ ℂ)
145	48	nnzd 12613	. . . . . . . . 9 ⊢ (𝜑 → 𝑁 ∈ ℤ)
146	145, 8	zmulcld 12701	. . . . . . . 8 ⊢ (𝜑 → (𝑁 · 𝐾) ∈ ℤ)
147		sinper 26440	. . . . . . . 8 ⊢ (((((1 / 2) + (𝑁 + 𝐾)) · π) ∈ ℂ ∧ (𝑁 · 𝐾) ∈ ℤ) → (sin‘((((1 / 2) + (𝑁 + 𝐾)) · π) + ((𝑁 · 𝐾) · (2 · π)))) = (sin‘(((1 / 2) + (𝑁 + 𝐾)) · π)))
148	144, 146, 147	syl2anc 584	. . . . . . 7 ⊢ (𝜑 → (sin‘((((1 / 2) + (𝑁 + 𝐾)) · π) + ((𝑁 · 𝐾) · (2 · π)))) = (sin‘(((1 / 2) + (𝑁 + 𝐾)) · π)))
149	102, 128	addcomd 11435	. . . . . . . . . 10 ⊢ (𝜑 → ((1 / 2) + (𝑁 + 𝐾)) = ((𝑁 + 𝐾) + (1 / 2)))
150	49, 9, 102	addassd 11255	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑁 + 𝐾) + (1 / 2)) = (𝑁 + (𝐾 + (1 / 2))))
151	9, 102	addcld 11252	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐾 + (1 / 2)) ∈ ℂ)
152	49, 151	addcomd 11435	. . . . . . . . . 10 ⊢ (𝜑 → (𝑁 + (𝐾 + (1 / 2))) = ((𝐾 + (1 / 2)) + 𝑁))
153	149, 150, 152	3eqtrd 2774	. . . . . . . . 9 ⊢ (𝜑 → ((1 / 2) + (𝑁 + 𝐾)) = ((𝐾 + (1 / 2)) + 𝑁))
154	153	oveq1d 7418	. . . . . . . 8 ⊢ (𝜑 → (((1 / 2) + (𝑁 + 𝐾)) · π) = (((𝐾 + (1 / 2)) + 𝑁) · π))
155	154	fveq2d 6879	. . . . . . 7 ⊢ (𝜑 → (sin‘(((1 / 2) + (𝑁 + 𝐾)) · π)) = (sin‘(((𝐾 + (1 / 2)) + 𝑁) · π)))
156	143, 148, 155	3eqtrd 2774	. . . . . 6 ⊢ (𝜑 → (sin‘((𝑁 + (1 / 2)) · 𝐴)) = (sin‘(((𝐾 + (1 / 2)) + 𝑁) · π)))
157	1	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → 𝐴 = (((2 · 𝐾) + 1) · π))
158	157	oveq1d 7418	. . . . . . . . 9 ⊢ (𝜑 → (𝐴 / 2) = ((((2 · 𝐾) + 1) · π) / 2))
159	106, 107, 50, 52	div23d 12052	. . . . . . . . 9 ⊢ (𝜑 → ((((2 · 𝐾) + 1) · π) / 2) = ((((2 · 𝐾) + 1) / 2) · π))
160	104, 109, 50, 52	divdird 12053	. . . . . . . . . . 11 ⊢ (𝜑 → (((2 · 𝐾) + 1) / 2) = (((2 · 𝐾) / 2) + (1 / 2)))
161	9, 50, 52	divcan3d 12020	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2 · 𝐾) / 2) = 𝐾)
162	161	oveq1d 7418	. . . . . . . . . . 11 ⊢ (𝜑 → (((2 · 𝐾) / 2) + (1 / 2)) = (𝐾 + (1 / 2)))
163	160, 162	eqtrd 2770	. . . . . . . . . 10 ⊢ (𝜑 → (((2 · 𝐾) + 1) / 2) = (𝐾 + (1 / 2)))
164	163	oveq1d 7418	. . . . . . . . 9 ⊢ (𝜑 → ((((2 · 𝐾) + 1) / 2) · π) = ((𝐾 + (1 / 2)) · π))
165	158, 159, 164	3eqtrd 2774	. . . . . . . 8 ⊢ (𝜑 → (𝐴 / 2) = ((𝐾 + (1 / 2)) · π))
166	165	fveq2d 6879	. . . . . . 7 ⊢ (𝜑 → (sin‘(𝐴 / 2)) = (sin‘((𝐾 + (1 / 2)) · π)))
167	166	oveq2d 7419	. . . . . 6 ⊢ (𝜑 → ((2 · π) · (sin‘(𝐴 / 2))) = ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π))))
168	156, 167	oveq12d 7421	. . . . 5 ⊢ (𝜑 → ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))) = ((sin‘(((𝐾 + (1 / 2)) + 𝑁) · π)) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
169	168	adantr 480	. . . 4 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))) = ((sin‘(((𝐾 + (1 / 2)) + 𝑁) · π)) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
170	151, 49, 107	adddird 11258	. . . . . . 7 ⊢ (𝜑 → (((𝐾 + (1 / 2)) + 𝑁) · π) = (((𝐾 + (1 / 2)) · π) + (𝑁 · π)))
171	170	fveq2d 6879	. . . . . 6 ⊢ (𝜑 → (sin‘(((𝐾 + (1 / 2)) + 𝑁) · π)) = (sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))))
172	171	oveq1d 7418	. . . . 5 ⊢ (𝜑 → ((sin‘(((𝐾 + (1 / 2)) + 𝑁) · π)) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = ((sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
173	172	adantr 480	. . . 4 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → ((sin‘(((𝐾 + (1 / 2)) + 𝑁) · π)) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = ((sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
174	49	halfcld 12484	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑁 / 2) ∈ ℂ)
175	50, 174	mulcomd 11254	. . . . . . . . . . . . 13 ⊢ (𝜑 → (2 · (𝑁 / 2)) = ((𝑁 / 2) · 2))
176	53, 175	eqtr3d 2772	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑁 = ((𝑁 / 2) · 2))
177	176	oveq1d 7418	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑁 · π) = (((𝑁 / 2) · 2) · π))
178	174, 50, 107	mulassd 11256	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝑁 / 2) · 2) · π) = ((𝑁 / 2) · (2 · π)))
179	177, 178	eqtrd 2770	. . . . . . . . . 10 ⊢ (𝜑 → (𝑁 · π) = ((𝑁 / 2) · (2 · π)))
180	179	oveq2d 7419	. . . . . . . . 9 ⊢ (𝜑 → (((𝐾 + (1 / 2)) · π) + (𝑁 · π)) = (((𝐾 + (1 / 2)) · π) + ((𝑁 / 2) · (2 · π))))
181	180	fveq2d 6879	. . . . . . . 8 ⊢ (𝜑 → (sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) = (sin‘(((𝐾 + (1 / 2)) · π) + ((𝑁 / 2) · (2 · π)))))
182	181	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → (sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) = (sin‘(((𝐾 + (1 / 2)) · π) + ((𝑁 / 2) · (2 · π)))))
183	9	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → 𝐾 ∈ ℂ)
184		1cnd 11228	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → 1 ∈ ℂ)
185	184	halfcld 12484	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → (1 / 2) ∈ ℂ)
186	183, 185	addcld 11252	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → (𝐾 + (1 / 2)) ∈ ℂ)
187	14	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → π ∈ ℂ)
188	186, 187	mulcld 11253	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → ((𝐾 + (1 / 2)) · π) ∈ ℂ)
189		sinper 26440	. . . . . . . 8 ⊢ ((((𝐾 + (1 / 2)) · π) ∈ ℂ ∧ (𝑁 / 2) ∈ ℤ) → (sin‘(((𝐾 + (1 / 2)) · π) + ((𝑁 / 2) · (2 · π)))) = (sin‘((𝐾 + (1 / 2)) · π)))
190	188, 72, 189	syl2anc 584	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → (sin‘(((𝐾 + (1 / 2)) · π) + ((𝑁 / 2) · (2 · π)))) = (sin‘((𝐾 + (1 / 2)) · π)))
191	182, 190	eqtrd 2770	. . . . . 6 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → (sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) = (sin‘((𝐾 + (1 / 2)) · π)))
192	50, 107	mulcld 11253	. . . . . . . 8 ⊢ (𝜑 → (2 · π) ∈ ℂ)
193	151, 107	mulcld 11253	. . . . . . . . 9 ⊢ (𝜑 → ((𝐾 + (1 / 2)) · π) ∈ ℂ)
194	193	sincld 16146	. . . . . . . 8 ⊢ (𝜑 → (sin‘((𝐾 + (1 / 2)) · π)) ∈ ℂ)
195	192, 194	mulcomd 11254	. . . . . . 7 ⊢ (𝜑 → ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π))) = ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π)))
196	195	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π))) = ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π)))
197	191, 196	oveq12d 7421	. . . . 5 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → ((sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = ((sin‘((𝐾 + (1 / 2)) · π)) / ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π))))
198	94	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → π ≠ 0)
199	151, 107, 198	divcan4d 12021	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝐾 + (1 / 2)) · π) / π) = (𝐾 + (1 / 2)))
200	8	zred 12695	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐾 ∈ ℝ)
201	69	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 2 ∈ ℝ⁺)
202	201	rpreccld 13059	. . . . . . . . . . . . 13 ⊢ (𝜑 → (1 / 2) ∈ ℝ⁺)
203	200, 202	ltaddrpd 13082	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐾 < (𝐾 + (1 / 2)))
204		1red 11234	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 1 ∈ ℝ)
205	204	rehalfcld 12486	. . . . . . . . . . . . 13 ⊢ (𝜑 → (1 / 2) ∈ ℝ)
206		halflt1 12456	. . . . . . . . . . . . . 14 ⊢ (1 / 2) < 1
207	206	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝜑 → (1 / 2) < 1)
208	205, 204, 200, 207	ltadd2dd 11392	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐾 + (1 / 2)) < (𝐾 + 1))
209		btwnnz 12667	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝐾 < (𝐾 + (1 / 2)) ∧ (𝐾 + (1 / 2)) < (𝐾 + 1)) → ¬ (𝐾 + (1 / 2)) ∈ ℤ)
210	8, 203, 208, 209	syl3anc 1373	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ (𝐾 + (1 / 2)) ∈ ℤ)
211	199, 210	eqneltrd 2854	. . . . . . . . . 10 ⊢ (𝜑 → ¬ (((𝐾 + (1 / 2)) · π) / π) ∈ ℤ)
212		sineq0 26483	. . . . . . . . . . 11 ⊢ (((𝐾 + (1 / 2)) · π) ∈ ℂ → ((sin‘((𝐾 + (1 / 2)) · π)) = 0 ↔ (((𝐾 + (1 / 2)) · π) / π) ∈ ℤ))
213	193, 212	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → ((sin‘((𝐾 + (1 / 2)) · π)) = 0 ↔ (((𝐾 + (1 / 2)) · π) / π) ∈ ℤ))
214	211, 213	mtbird 325	. . . . . . . . 9 ⊢ (𝜑 → ¬ (sin‘((𝐾 + (1 / 2)) · π)) = 0)
215	214	neqned 2939	. . . . . . . 8 ⊢ (𝜑 → (sin‘((𝐾 + (1 / 2)) · π)) ≠ 0)
216	50, 107, 52, 198	mulne0d 11887	. . . . . . . 8 ⊢ (𝜑 → (2 · π) ≠ 0)
217	194, 194, 192, 215, 216	divdiv1d 12046	. . . . . . 7 ⊢ (𝜑 → (((sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) / (2 · π)) = ((sin‘((𝐾 + (1 / 2)) · π)) / ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π))))
218	194, 215	dividd 12013	. . . . . . . 8 ⊢ (𝜑 → ((sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) = 1)
219	218	oveq1d 7418	. . . . . . 7 ⊢ (𝜑 → (((sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) / (2 · π)) = (1 / (2 · π)))
220	217, 219	eqtr3d 2772	. . . . . 6 ⊢ (𝜑 → ((sin‘((𝐾 + (1 / 2)) · π)) / ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π))) = (1 / (2 · π)))
221	220	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → ((sin‘((𝐾 + (1 / 2)) · π)) / ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π))) = (1 / (2 · π)))
222	197, 221	eqtrd 2770	. . . 4 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → ((sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = (1 / (2 · π)))
223	169, 173, 222	3eqtrrd 2775	. . 3 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → (1 / (2 · π)) = ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))))
224	99, 223	eqtrd 2770	. 2 ⊢ ((𝜑 ∧ (𝑁 mod 2) = 0) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) / π) = ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))))
225	46	adantr 480	. . 3 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) / π) = (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) / π))
226	145	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → 𝑁 ∈ ℤ)
227		simpr 484	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ¬ (𝑁 mod 2) = 0)
228	227	neqned 2939	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (𝑁 mod 2) ≠ 0)
229		oddfl 45254	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℤ ∧ (𝑁 mod 2) ≠ 0) → 𝑁 = ((2 · (⌊‘(𝑁 / 2))) + 1))
230	226, 228, 229	syl2anc 584	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → 𝑁 = ((2 · (⌊‘(𝑁 / 2))) + 1))
231	230	oveq2d 7419	. . . . . . 7 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (1...𝑁) = (1...((2 · (⌊‘(𝑁 / 2))) + 1)))
232	231	sumeq1d 15714	. . . . . 6 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛)) = Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)))
233		fvoveq1 7426	. . . . . . . . . . . . . . . . 17 ⊢ (𝑁 = 1 → (⌊‘(𝑁 / 2)) = (⌊‘(1 / 2)))
234		halffl 45273	. . . . . . . . . . . . . . . . 17 ⊢ (⌊‘(1 / 2)) = 0
235	233, 234	eqtrdi 2786	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 = 1 → (⌊‘(𝑁 / 2)) = 0)
236	235	oveq2d 7419	. . . . . . . . . . . . . . 15 ⊢ (𝑁 = 1 → (2 · (⌊‘(𝑁 / 2))) = (2 · 0))
237		2t0e0 12407	. . . . . . . . . . . . . . 15 ⊢ (2 · 0) = 0
238	236, 237	eqtrdi 2786	. . . . . . . . . . . . . 14 ⊢ (𝑁 = 1 → (2 · (⌊‘(𝑁 / 2))) = 0)
239	238	oveq1d 7418	. . . . . . . . . . . . 13 ⊢ (𝑁 = 1 → ((2 · (⌊‘(𝑁 / 2))) + 1) = (0 + 1))
240	90	addlidi 11421	. . . . . . . . . . . . 13 ⊢ (0 + 1) = 1
241	239, 240	eqtrdi 2786	. . . . . . . . . . . 12 ⊢ (𝑁 = 1 → ((2 · (⌊‘(𝑁 / 2))) + 1) = 1)
242	241	oveq2d 7419	. . . . . . . . . . 11 ⊢ (𝑁 = 1 → (1...((2 · (⌊‘(𝑁 / 2))) + 1)) = (1...1))
243	242	sumeq1d 15714	. . . . . . . . . 10 ⊢ (𝑁 = 1 → Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)) = Σ𝑛 ∈ (1...1)(cos‘(π · 𝑛)))
244		1z 12620	. . . . . . . . . . . 12 ⊢ 1 ∈ ℤ
245		coscl 16143	. . . . . . . . . . . . 13 ⊢ (π ∈ ℂ → (cos‘π) ∈ ℂ)
246	14, 245	ax-mp 5	. . . . . . . . . . . 12 ⊢ (cos‘π) ∈ ℂ
247		oveq2 7411	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = 1 → (π · 𝑛) = (π · 1))
248	14	mulridi 11237	. . . . . . . . . . . . . . 15 ⊢ (π · 1) = π
249	247, 248	eqtrdi 2786	. . . . . . . . . . . . . 14 ⊢ (𝑛 = 1 → (π · 𝑛) = π)
250	249	fveq2d 6879	. . . . . . . . . . . . 13 ⊢ (𝑛 = 1 → (cos‘(π · 𝑛)) = (cos‘π))
251	250	fsum1 15761	. . . . . . . . . . . 12 ⊢ ((1 ∈ ℤ ∧ (cos‘π) ∈ ℂ) → Σ𝑛 ∈ (1...1)(cos‘(π · 𝑛)) = (cos‘π))
252	244, 246, 251	mp2an 692	. . . . . . . . . . 11 ⊢ Σ𝑛 ∈ (1...1)(cos‘(π · 𝑛)) = (cos‘π)
253	252	a1i 11	. . . . . . . . . 10 ⊢ (𝑁 = 1 → Σ𝑛 ∈ (1...1)(cos‘(π · 𝑛)) = (cos‘π))
254		cospi 26431	. . . . . . . . . . 11 ⊢ (cos‘π) = -1
255	254	a1i 11	. . . . . . . . . 10 ⊢ (𝑁 = 1 → (cos‘π) = -1)
256	243, 253, 255	3eqtrd 2774	. . . . . . . . 9 ⊢ (𝑁 = 1 → Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)) = -1)
257	256	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑁 = 1) → Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)) = -1)
258		2nn 12311	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℕ
259	258	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → 2 ∈ ℕ)
260	67	rehalfcld 12486	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑁 / 2) ∈ ℝ)
261	260	flcld 13813	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (⌊‘(𝑁 / 2)) ∈ ℤ)
262	261	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → (⌊‘(𝑁 / 2)) ∈ ℤ)
263		2div2e1 12379	. . . . . . . . . . . . . . 15 ⊢ (2 / 2) = 1
264	73	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → 2 ∈ ℝ)
265	67	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → 𝑁 ∈ ℝ)
266	69	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → 2 ∈ ℝ⁺)
267		neqne 2940	. . . . . . . . . . . . . . . . 17 ⊢ (¬ 𝑁 = 1 → 𝑁 ≠ 1)
268		nnne1ge2 45268	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑁 ∈ ℕ ∧ 𝑁 ≠ 1) → 2 ≤ 𝑁)
269	48, 267, 268	syl2an 596	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → 2 ≤ 𝑁)
270	264, 265, 266, 269	lediv1dd 13107	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → (2 / 2) ≤ (𝑁 / 2))
271	263, 270	eqbrtrrid 5155	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → 1 ≤ (𝑁 / 2))
272	260	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → (𝑁 / 2) ∈ ℝ)
273		flge 13820	. . . . . . . . . . . . . . 15 ⊢ (((𝑁 / 2) ∈ ℝ ∧ 1 ∈ ℤ) → (1 ≤ (𝑁 / 2) ↔ 1 ≤ (⌊‘(𝑁 / 2))))
274	272, 244, 273	sylancl 586	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → (1 ≤ (𝑁 / 2) ↔ 1 ≤ (⌊‘(𝑁 / 2))))
275	271, 274	mpbid 232	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → 1 ≤ (⌊‘(𝑁 / 2)))
276		elnnz1 12616	. . . . . . . . . . . . 13 ⊢ ((⌊‘(𝑁 / 2)) ∈ ℕ ↔ ((⌊‘(𝑁 / 2)) ∈ ℤ ∧ 1 ≤ (⌊‘(𝑁 / 2))))
277	262, 275, 276	sylanbrc 583	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → (⌊‘(𝑁 / 2)) ∈ ℕ)
278	259, 277	nnmulcld 12291	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → (2 · (⌊‘(𝑁 / 2))) ∈ ℕ)
279		nnuz 12893	. . . . . . . . . . 11 ⊢ ℕ = (ℤ_≥‘1)
280	278, 279	eleqtrdi 2844	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → (2 · (⌊‘(𝑁 / 2))) ∈ (ℤ_≥‘1))
281	14	a1i 11	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ ¬ 𝑁 = 1) ∧ 𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))) → π ∈ ℂ)
282		elfzelz 13539	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1)) → 𝑛 ∈ ℤ)
283	282	zcnd 12696	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1)) → 𝑛 ∈ ℂ)
284	283	adantl 481	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ ¬ 𝑁 = 1) ∧ 𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))) → 𝑛 ∈ ℂ)
285	281, 284	mulcld 11253	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ¬ 𝑁 = 1) ∧ 𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))) → (π · 𝑛) ∈ ℂ)
286	285	coscld 16147	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ¬ 𝑁 = 1) ∧ 𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))) → (cos‘(π · 𝑛)) ∈ ℂ)
287		oveq2 7411	. . . . . . . . . . 11 ⊢ (𝑛 = ((2 · (⌊‘(𝑁 / 2))) + 1) → (π · 𝑛) = (π · ((2 · (⌊‘(𝑁 / 2))) + 1)))
288	287	fveq2d 6879	. . . . . . . . . 10 ⊢ (𝑛 = ((2 · (⌊‘(𝑁 / 2))) + 1) → (cos‘(π · 𝑛)) = (cos‘(π · ((2 · (⌊‘(𝑁 / 2))) + 1))))
289	280, 286, 288	fsump1 15770	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)) = (Σ𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2))))(cos‘(π · 𝑛)) + (cos‘(π · ((2 · (⌊‘(𝑁 / 2))) + 1)))))
290	14	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2)))) → π ∈ ℂ)
291		elfzelz 13539	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2)))) → 𝑛 ∈ ℤ)
292	291	zcnd 12696	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2)))) → 𝑛 ∈ ℂ)
293	290, 292	mulcomd 11254	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2)))) → (π · 𝑛) = (𝑛 · π))
294	293	fveq2d 6879	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2)))) → (cos‘(π · 𝑛)) = (cos‘(𝑛 · π)))
295	294	sumeq2i 15712	. . . . . . . . . . 11 ⊢ Σ𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2))))(cos‘(π · 𝑛)) = Σ𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2))))(cos‘(𝑛 · π))
296		dirkertrigeqlem1 46075	. . . . . . . . . . . 12 ⊢ ((⌊‘(𝑁 / 2)) ∈ ℕ → Σ𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2))))(cos‘(𝑛 · π)) = 0)
297	277, 296	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → Σ𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2))))(cos‘(𝑛 · π)) = 0)
298	295, 297	eqtrid 2782	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → Σ𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2))))(cos‘(π · 𝑛)) = 0)
299	261	zcnd 12696	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (⌊‘(𝑁 / 2)) ∈ ℂ)
300	50, 299	mulcld 11253	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (2 · (⌊‘(𝑁 / 2))) ∈ ℂ)
301	107, 300, 109	adddid 11257	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (π · ((2 · (⌊‘(𝑁 / 2))) + 1)) = ((π · (2 · (⌊‘(𝑁 / 2)))) + (π · 1)))
302	107, 50, 299	mul13d 45256	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (π · (2 · (⌊‘(𝑁 / 2)))) = ((⌊‘(𝑁 / 2)) · (2 · π)))
303	248	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (π · 1) = π)
304	302, 303	oveq12d 7421	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((π · (2 · (⌊‘(𝑁 / 2)))) + (π · 1)) = (((⌊‘(𝑁 / 2)) · (2 · π)) + π))
305	299, 192	mulcld 11253	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((⌊‘(𝑁 / 2)) · (2 · π)) ∈ ℂ)
306	305, 107	addcomd 11435	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((⌊‘(𝑁 / 2)) · (2 · π)) + π) = (π + ((⌊‘(𝑁 / 2)) · (2 · π))))
307	301, 304, 306	3eqtrd 2774	. . . . . . . . . . . . 13 ⊢ (𝜑 → (π · ((2 · (⌊‘(𝑁 / 2))) + 1)) = (π + ((⌊‘(𝑁 / 2)) · (2 · π))))
308	307	fveq2d 6879	. . . . . . . . . . . 12 ⊢ (𝜑 → (cos‘(π · ((2 · (⌊‘(𝑁 / 2))) + 1))) = (cos‘(π + ((⌊‘(𝑁 / 2)) · (2 · π)))))
309		cosper 26441	. . . . . . . . . . . . 13 ⊢ ((π ∈ ℂ ∧ (⌊‘(𝑁 / 2)) ∈ ℤ) → (cos‘(π + ((⌊‘(𝑁 / 2)) · (2 · π)))) = (cos‘π))
310	107, 261, 309	syl2anc 584	. . . . . . . . . . . 12 ⊢ (𝜑 → (cos‘(π + ((⌊‘(𝑁 / 2)) · (2 · π)))) = (cos‘π))
311	254	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → (cos‘π) = -1)
312	308, 310, 311	3eqtrd 2774	. . . . . . . . . . 11 ⊢ (𝜑 → (cos‘(π · ((2 · (⌊‘(𝑁 / 2))) + 1))) = -1)
313	312	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → (cos‘(π · ((2 · (⌊‘(𝑁 / 2))) + 1))) = -1)
314	298, 313	oveq12d 7421	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → (Σ𝑛 ∈ (1...(2 · (⌊‘(𝑁 / 2))))(cos‘(π · 𝑛)) + (cos‘(π · ((2 · (⌊‘(𝑁 / 2))) + 1)))) = (0 + -1))
315		neg1cn 12352	. . . . . . . . . . 11 ⊢ -1 ∈ ℂ
316	315	addlidi 11421	. . . . . . . . . 10 ⊢ (0 + -1) = -1
317	316	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → (0 + -1) = -1)
318	289, 314, 317	3eqtrd 2774	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ 𝑁 = 1) → Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)) = -1)
319	257, 318	pm2.61dan 812	. . . . . . 7 ⊢ (𝜑 → Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)) = -1)
320	319	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → Σ𝑛 ∈ (1...((2 · (⌊‘(𝑁 / 2))) + 1))(cos‘(π · 𝑛)) = -1)
321	232, 320	eqtrd 2770	. . . . 5 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛)) = -1)
322	321	oveq2d 7419	. . . 4 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) = ((1 / 2) + -1))
323	322	oveq1d 7418	. . 3 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(π · 𝑛))) / π) = (((1 / 2) + -1) / π))
324	168, 172	eqtrd 2770	. . . . 5 ⊢ (𝜑 → ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))) = ((sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
325	324	adantr 480	. . . 4 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))) = ((sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
326	230	oveq1d 7418	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (𝑁 · π) = (((2 · (⌊‘(𝑁 / 2))) + 1) · π))
327	300, 109, 107	adddird 11258	. . . . . . . . . . 11 ⊢ (𝜑 → (((2 · (⌊‘(𝑁 / 2))) + 1) · π) = (((2 · (⌊‘(𝑁 / 2))) · π) + (1 · π)))
328	107	mullidd 11251	. . . . . . . . . . . 12 ⊢ (𝜑 → (1 · π) = π)
329	328	oveq2d 7419	. . . . . . . . . . 11 ⊢ (𝜑 → (((2 · (⌊‘(𝑁 / 2))) · π) + (1 · π)) = (((2 · (⌊‘(𝑁 / 2))) · π) + π))
330	300, 107	mulcld 11253	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2 · (⌊‘(𝑁 / 2))) · π) ∈ ℂ)
331	330, 107	addcomd 11435	. . . . . . . . . . 11 ⊢ (𝜑 → (((2 · (⌊‘(𝑁 / 2))) · π) + π) = (π + ((2 · (⌊‘(𝑁 / 2))) · π)))
332	327, 329, 331	3eqtrd 2774	. . . . . . . . . 10 ⊢ (𝜑 → (((2 · (⌊‘(𝑁 / 2))) + 1) · π) = (π + ((2 · (⌊‘(𝑁 / 2))) · π)))
333	332	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (((2 · (⌊‘(𝑁 / 2))) + 1) · π) = (π + ((2 · (⌊‘(𝑁 / 2))) · π)))
334	50, 299	mulcomd 11254	. . . . . . . . . . . . 13 ⊢ (𝜑 → (2 · (⌊‘(𝑁 / 2))) = ((⌊‘(𝑁 / 2)) · 2))
335	334	oveq1d 7418	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2 · (⌊‘(𝑁 / 2))) · π) = (((⌊‘(𝑁 / 2)) · 2) · π))
336	299, 50, 107	mulassd 11256	. . . . . . . . . . . 12 ⊢ (𝜑 → (((⌊‘(𝑁 / 2)) · 2) · π) = ((⌊‘(𝑁 / 2)) · (2 · π)))
337	335, 336	eqtrd 2770	. . . . . . . . . . 11 ⊢ (𝜑 → ((2 · (⌊‘(𝑁 / 2))) · π) = ((⌊‘(𝑁 / 2)) · (2 · π)))
338	337	oveq2d 7419	. . . . . . . . . 10 ⊢ (𝜑 → (π + ((2 · (⌊‘(𝑁 / 2))) · π)) = (π + ((⌊‘(𝑁 / 2)) · (2 · π))))
339	338	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (π + ((2 · (⌊‘(𝑁 / 2))) · π)) = (π + ((⌊‘(𝑁 / 2)) · (2 · π))))
340	326, 333, 339	3eqtrd 2774	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (𝑁 · π) = (π + ((⌊‘(𝑁 / 2)) · (2 · π))))
341	340	oveq2d 7419	. . . . . . 7 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (((𝐾 + (1 / 2)) · π) + (𝑁 · π)) = (((𝐾 + (1 / 2)) · π) + (π + ((⌊‘(𝑁 / 2)) · (2 · π)))))
342	193	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ((𝐾 + (1 / 2)) · π) ∈ ℂ)
343	14	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → π ∈ ℂ)
344	305	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ((⌊‘(𝑁 / 2)) · (2 · π)) ∈ ℂ)
345	342, 343, 344	addassd 11255	. . . . . . 7 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π))) = (((𝐾 + (1 / 2)) · π) + (π + ((⌊‘(𝑁 / 2)) · (2 · π)))))
346	341, 345	eqtr4d 2773	. . . . . 6 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (((𝐾 + (1 / 2)) · π) + (𝑁 · π)) = ((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π))))
347	346	fveq2d 6879	. . . . 5 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) = (sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))))
348	347	oveq1d 7418	. . . 4 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ((sin‘(((𝐾 + (1 / 2)) · π) + (𝑁 · π))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = ((sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
349	193, 107	addcld 11252	. . . . . . . . 9 ⊢ (𝜑 → (((𝐾 + (1 / 2)) · π) + π) ∈ ℂ)
350		sinper 26440	. . . . . . . . 9 ⊢ (((((𝐾 + (1 / 2)) · π) + π) ∈ ℂ ∧ (⌊‘(𝑁 / 2)) ∈ ℤ) → (sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))) = (sin‘(((𝐾 + (1 / 2)) · π) + π)))
351	349, 261, 350	syl2anc 584	. . . . . . . 8 ⊢ (𝜑 → (sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))) = (sin‘(((𝐾 + (1 / 2)) · π) + π)))
352		sinppi 26448	. . . . . . . . 9 ⊢ (((𝐾 + (1 / 2)) · π) ∈ ℂ → (sin‘(((𝐾 + (1 / 2)) · π) + π)) = -(sin‘((𝐾 + (1 / 2)) · π)))
353	193, 352	syl 17	. . . . . . . 8 ⊢ (𝜑 → (sin‘(((𝐾 + (1 / 2)) · π) + π)) = -(sin‘((𝐾 + (1 / 2)) · π)))
354	351, 353	eqtrd 2770	. . . . . . 7 ⊢ (𝜑 → (sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))) = -(sin‘((𝐾 + (1 / 2)) · π)))
355	354	oveq1d 7418	. . . . . 6 ⊢ (𝜑 → ((sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = (-(sin‘((𝐾 + (1 / 2)) · π)) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))))
356	195	oveq2d 7419	. . . . . 6 ⊢ (𝜑 → (-(sin‘((𝐾 + (1 / 2)) · π)) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = (-(sin‘((𝐾 + (1 / 2)) · π)) / ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π))))
357	194, 194, 215	divnegd 12028	. . . . . . . . 9 ⊢ (𝜑 → -((sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) = (-(sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))))
358	218	negeqd 11474	. . . . . . . . 9 ⊢ (𝜑 → -((sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) = -1)
359	357, 358	eqtr3d 2772	. . . . . . . 8 ⊢ (𝜑 → (-(sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) = -1)
360	359	oveq1d 7418	. . . . . . 7 ⊢ (𝜑 → ((-(sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) / (2 · π)) = (-1 / (2 · π)))
361	194	negcld 11579	. . . . . . . 8 ⊢ (𝜑 → -(sin‘((𝐾 + (1 / 2)) · π)) ∈ ℂ)
362	361, 194, 192, 215, 216	divdiv1d 12046	. . . . . . 7 ⊢ (𝜑 → ((-(sin‘((𝐾 + (1 / 2)) · π)) / (sin‘((𝐾 + (1 / 2)) · π))) / (2 · π)) = (-(sin‘((𝐾 + (1 / 2)) · π)) / ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π))))
363	86, 90	negsubi 11559	. . . . . . . . . . 11 ⊢ ((1 / 2) + -1) = ((1 / 2) − 1)
364	90, 86	negsubdi2i 11567	. . . . . . . . . . 11 ⊢ -(1 − (1 / 2)) = ((1 / 2) − 1)
365		1mhlfehlf 12458	. . . . . . . . . . . . 13 ⊢ (1 − (1 / 2)) = (1 / 2)
366	365	negeqi 11473	. . . . . . . . . . . 12 ⊢ -(1 − (1 / 2)) = -(1 / 2)
367		divneg 11931	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0) → -(1 / 2) = (-1 / 2))
368	90, 118, 51, 367	mp3an 1463	. . . . . . . . . . . 12 ⊢ -(1 / 2) = (-1 / 2)
369	366, 368	eqtri 2758	. . . . . . . . . . 11 ⊢ -(1 − (1 / 2)) = (-1 / 2)
370	363, 364, 369	3eqtr2i 2764	. . . . . . . . . 10 ⊢ ((1 / 2) + -1) = (-1 / 2)
371	370	oveq1i 7413	. . . . . . . . 9 ⊢ (((1 / 2) + -1) / π) = ((-1 / 2) / π)
372		divdiv1 11950	. . . . . . . . . 10 ⊢ ((-1 ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 ≠ 0) ∧ (π ∈ ℂ ∧ π ≠ 0)) → ((-1 / 2) / π) = (-1 / (2 · π)))
373	315, 91, 95, 372	mp3an 1463	. . . . . . . . 9 ⊢ ((-1 / 2) / π) = (-1 / (2 · π))
374	371, 373	eqtr2i 2759	. . . . . . . 8 ⊢ (-1 / (2 · π)) = (((1 / 2) + -1) / π)
375	374	a1i 11	. . . . . . 7 ⊢ (𝜑 → (-1 / (2 · π)) = (((1 / 2) + -1) / π))
376	360, 362, 375	3eqtr3d 2778	. . . . . 6 ⊢ (𝜑 → (-(sin‘((𝐾 + (1 / 2)) · π)) / ((sin‘((𝐾 + (1 / 2)) · π)) · (2 · π))) = (((1 / 2) + -1) / π))
377	355, 356, 376	3eqtrd 2774	. . . . 5 ⊢ (𝜑 → ((sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = (((1 / 2) + -1) / π))
378	377	adantr 480	. . . 4 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → ((sin‘((((𝐾 + (1 / 2)) · π) + π) + ((⌊‘(𝑁 / 2)) · (2 · π)))) / ((2 · π) · (sin‘((𝐾 + (1 / 2)) · π)))) = (((1 / 2) + -1) / π))
379	325, 348, 378	3eqtrrd 2775	. . 3 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (((1 / 2) + -1) / π) = ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))))
380	225, 323, 379	3eqtrd 2774	. 2 ⊢ ((𝜑 ∧ ¬ (𝑁 mod 2) = 0) → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) / π) = ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))))
381	224, 380	pm2.61dan 812	1 ⊢ (𝜑 → (((1 / 2) + Σ𝑛 ∈ (1...𝑁)(cos‘(𝑛 · 𝐴))) / π) = ((sin‘((𝑁 + (1 / 2)) · 𝐴)) / ((2 · π) · (sin‘(𝐴 / 2)))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 = wceq 1540 ∈ wcel 2108 ≠ wne 2932 ∀wral 3051 class class class wbr 5119 ‘cfv 6530 (class class class)co 7403 ℂcc 11125 ℝcr 11126 0cc0 11127 1c1 11128 + caddc 11130 · cmul 11132 < clt 11267 ≤ cle 11268 − cmin 11464 -cneg 11465 / cdiv 11892 ℕcn 12238 2c2 12293 ℤcz 12586 ℤ_≥cuz 12850 ℝ⁺crp 13006 ...cfz 13522 ⌊cfl 13805 mod cmo 13884 Σcsu 15700 sincsin 16077 cosccos 16078 πcpi 16080

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2007 ax-8 2110 ax-9 2118 ax-10 2141 ax-11 2157 ax-12 2177 ax-ext 2707 ax-rep 5249 ax-sep 5266 ax-nul 5276 ax-pow 5335 ax-pr 5402 ax-un 7727 ax-inf2 9653 ax-cnex 11183 ax-resscn 11184 ax-1cn 11185 ax-icn 11186 ax-addcl 11187 ax-addrcl 11188 ax-mulcl 11189 ax-mulrcl 11190 ax-mulcom 11191 ax-addass 11192 ax-mulass 11193 ax-distr 11194 ax-i2m1 11195 ax-1ne0 11196 ax-1rid 11197 ax-rnegex 11198 ax-rrecex 11199 ax-cnre 11200 ax-pre-lttri 11201 ax-pre-lttrn 11202 ax-pre-ltadd 11203 ax-pre-mulgt0 11204 ax-pre-sup 11205 ax-addf 11206

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2065 df-mo 2539 df-eu 2568 df-clab 2714 df-cleq 2727 df-clel 2809 df-nfc 2885 df-ne 2933 df-nel 3037 df-ral 3052 df-rex 3061 df-rmo 3359 df-reu 3360 df-rab 3416 df-v 3461 df-sbc 3766 df-csb 3875 df-dif 3929 df-un 3931 df-in 3933 df-ss 3943 df-pss 3946 df-nul 4309 df-if 4501 df-pw 4577 df-sn 4602 df-pr 4604 df-tp 4606 df-op 4608 df-uni 4884 df-int 4923 df-iun 4969 df-iin 4970 df-br 5120 df-opab 5182 df-mpt 5202 df-tr 5230 df-id 5548 df-eprel 5553 df-po 5561 df-so 5562 df-fr 5606 df-se 5607 df-we 5608 df-xp 5660 df-rel 5661 df-cnv 5662 df-co 5663 df-dm 5664 df-rn 5665 df-res 5666 df-ima 5667 df-pred 6290 df-ord 6355 df-on 6356 df-lim 6357 df-suc 6358 df-iota 6483 df-fun 6532 df-fn 6533 df-f 6534 df-f1 6535 df-fo 6536 df-f1o 6537 df-fv 6538 df-isom 6539 df-riota 7360 df-ov 7406 df-oprab 7407 df-mpo 7408 df-of 7669 df-om 7860 df-1st 7986 df-2nd 7987 df-supp 8158 df-frecs 8278 df-wrecs 8309 df-recs 8383 df-rdg 8422 df-1o 8478 df-2o 8479 df-er 8717 df-map 8840 df-pm 8841 df-ixp 8910 df-en 8958 df-dom 8959 df-sdom 8960 df-fin 8961 df-fsupp 9372 df-fi 9421 df-sup 9452 df-inf 9453 df-oi 9522 df-card 9951 df-pnf 11269 df-mnf 11270 df-xr 11271 df-ltxr 11272 df-le 11273 df-sub 11466 df-neg 11467 df-div 11893 df-nn 12239 df-2 12301 df-3 12302 df-4 12303 df-5 12304 df-6 12305 df-7 12306 df-8 12307 df-9 12308 df-n0 12500 df-z 12587 df-dec 12707 df-uz 12851 df-q 12963 df-rp 13007 df-xneg 13126 df-xadd 13127 df-xmul 13128 df-ioo 13364 df-ioc 13365 df-ico 13366 df-icc 13367 df-fz 13523 df-fzo 13670 df-fl 13807 df-mod 13885 df-seq 14018 df-exp 14078 df-fac 14290 df-bc 14319 df-hash 14347 df-shft 15084 df-cj 15116 df-re 15117 df-im 15118 df-sqrt 15252 df-abs 15253 df-limsup 15485 df-clim 15502 df-rlim 15503 df-sum 15701 df-ef 16081 df-sin 16083 df-cos 16084 df-pi 16086 df-struct 17164 df-sets 17181 df-slot 17199 df-ndx 17211 df-base 17227 df-ress 17250 df-plusg 17282 df-mulr 17283 df-starv 17284 df-sca 17285 df-vsca 17286 df-ip 17287 df-tset 17288 df-ple 17289 df-ds 17291 df-unif 17292 df-hom 17293 df-cco 17294 df-rest 17434 df-topn 17435 df-0g 17453 df-gsum 17454 df-topgen 17455 df-pt 17456 df-prds 17459 df-xrs 17514 df-qtop 17519 df-imas 17520 df-xps 17522 df-mre 17596 df-mrc 17597 df-acs 17599 df-mgm 18616 df-sgrp 18695 df-mnd 18711 df-submnd 18760 df-mulg 19049 df-cntz 19298 df-cmn 19761 df-psmet 21305 df-xmet 21306 df-met 21307 df-bl 21308 df-mopn 21309 df-fbas 21310 df-fg 21311 df-cnfld 21314 df-top 22830 df-topon 22847 df-topsp 22869 df-bases 22882 df-cld 22955 df-ntr 22956 df-cls 22957 df-nei 23034 df-lp 23072 df-perf 23073 df-cn 23163 df-cnp 23164 df-haus 23251 df-tx 23498 df-hmeo 23691 df-fil 23782 df-fm 23874 df-flim 23875 df-flf 23876 df-xms 24257 df-ms 24258 df-tms 24259 df-cncf 24820 df-limc 25817 df-dv 25818

This theorem is referenced by: dirkertrigeq 46078

W3C validator