Metamath Proof Explorer


Theorem dirker2re

Description: The Dirichlet kernel value is a real if the argument is not a multiple of π . (Contributed by Glauco Siliprandi, 11-Dec-2019)

Ref Expression
Assertion dirker2re ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → sin ⁡ N + 1 2 ⁢ S 2 ⁢ π ⁢ sin ⁡ S 2 ∈ ℝ

Proof

Step Hyp Ref Expression
1 nnre ⊢ N ∈ ℕ → N ∈ ℝ
2 1 ad2antrr ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → N ∈ ℝ
3 1red ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → 1 ∈ ℝ
4 3 rehalfcld ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → 1 2 ∈ ℝ
5 2 4 readdcld ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → N + 1 2 ∈ ℝ
6 simplr ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → S ∈ ℝ
7 5 6 remulcld ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → N + 1 2 ⁢ S ∈ ℝ
8 7 resincld ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → sin ⁡ N + 1 2 ⁢ S ∈ ℝ
9 2re ⊢ 2 ∈ ℝ
10 9 a1i ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → 2 ∈ ℝ
11 pire ⊢ π ∈ ℝ
12 11 a1i ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → π ∈ ℝ
13 10 12 remulcld ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → 2 ⁢ π ∈ ℝ
14 6 rehalfcld ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → S 2 ∈ ℝ
15 14 resincld ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → sin ⁡ S 2 ∈ ℝ
16 13 15 remulcld ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → 2 ⁢ π ⁢ sin ⁡ S 2 ∈ ℝ
17 2cnd ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → 2 ∈ ℂ
18 picn ⊢ π ∈ ℂ
19 18 a1i ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → π ∈ ℂ
20 17 19 mulcld ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → 2 ⁢ π ∈ ℂ
21 recn ⊢ S ∈ ℝ → S ∈ ℂ
22 21 adantr ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → S ∈ ℂ
23 22 halfcld ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → S 2 ∈ ℂ
24 23 sincld ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → sin ⁡ S 2 ∈ ℂ
25 2ne0 ⊢ 2 ≠ 0
26 25 a1i ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → 2 ≠ 0
27 0re ⊢ 0 ∈ ℝ
28 pipos ⊢ 0 < π
29 27 28 gtneii ⊢ π ≠ 0
30 29 a1i ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → π ≠ 0
31 17 19 26 30 mulne0d ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → 2 ⁢ π ≠ 0
32 22 17 19 26 30 divdiv1d ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → S 2 π = S 2 ⁢ π
33 simpr ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → ¬ S mod 2 ⁢ π = 0
34 2rp ⊢ 2 ∈ ℝ +
35 pirp ⊢ π ∈ ℝ +
36 rpmulcl ⊢ 2 ∈ ℝ + ∧ π ∈ ℝ + → 2 ⁢ π ∈ ℝ +
37 34 35 36 mp2an ⊢ 2 ⁢ π ∈ ℝ +
38 mod0 ⊢ S ∈ ℝ ∧ 2 ⁢ π ∈ ℝ + → S mod 2 ⁢ π = 0 ↔ S 2 ⁢ π ∈ ℤ
39 37 38 mpan2 ⊢ S ∈ ℝ → S mod 2 ⁢ π = 0 ↔ S 2 ⁢ π ∈ ℤ
40 39 adantr ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → S mod 2 ⁢ π = 0 ↔ S 2 ⁢ π ∈ ℤ
41 33 40 mtbid ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → ¬ S 2 ⁢ π ∈ ℤ
42 32 41 eqneltrd ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → ¬ S 2 π ∈ ℤ
43 sineq0 ⊢ S 2 ∈ ℂ → sin ⁡ S 2 = 0 ↔ S 2 π ∈ ℤ
44 23 43 syl ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → sin ⁡ S 2 = 0 ↔ S 2 π ∈ ℤ
45 42 44 mtbird ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → ¬ sin ⁡ S 2 = 0
46 45 neqned ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → sin ⁡ S 2 ≠ 0
47 20 24 31 46 mulne0d ⊢ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → 2 ⁢ π ⁢ sin ⁡ S 2 ≠ 0
48 47 adantll ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → 2 ⁢ π ⁢ sin ⁡ S 2 ≠ 0
49 8 16 48 redivcld ⊢ N ∈ ℕ ∧ S ∈ ℝ ∧ ¬ S mod 2 ⁢ π = 0 → sin ⁡ N + 1 2 ⁢ S 2 ⁢ π ⁢ sin ⁡ S 2 ∈ ℝ