Metamath Proof Explorer


Theorem basellem3

Description: Lemma for basel . Using the binomial theorem and de Moivre's formula, we have the identity _e ^i N x / ( sin x ) ^ n = sum m e. ( 0 ... N ) ( NC m ) ( i ^ m ) ( cot x ) ^ ( N - m ) , so taking imaginary parts yields sin ( N x ) / ( sin x ) ^ N = sum_ j e. ( 0 ... M ) ( N _C 2 j ) ( -u 1 ) ^ ( M - j ) ( cot x ) ^ ( -u 2 j ) = P ( ( cot x ) ^ 2 ) , where N = 2 M + 1 . (Contributed by Mario Carneiro, 30-Jul-2014)

Ref Expression
Hypotheses basel.n ⊢ N = 2 ⋅ M + 1
basel.p ⊢ P = t ∈ ℂ ⟼ ∑ j = 0 M ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ t j
Assertion basellem3 ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → P ⁡ tan ⁡ A − 2 = sin ⁡ N ⁢ A sin ⁡ A N

Proof

Step Hyp Ref Expression
1 basel.n ⊢ N = 2 ⋅ M + 1
2 basel.p ⊢ P = t ∈ ℂ ⟼ ∑ j = 0 M ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ t j
3 tanrpcl ⊢ A ∈ 0 π 2 → tan ⁡ A ∈ ℝ +
4 3 adantl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → tan ⁡ A ∈ ℝ +
5 4 rpreccld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 1 tan ⁡ A ∈ ℝ +
6 5 rpcnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 1 tan ⁡ A ∈ ℂ
7 ax-icn ⊢ i ∈ ℂ
8 7 a1i ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → i ∈ ℂ
9 2nn ⊢ 2 ∈ ℕ
10 simpl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → M ∈ ℕ
11 nnmulcl ⊢ 2 ∈ ℕ ∧ M ∈ ℕ → 2 ⋅ M ∈ ℕ
12 9 10 11 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 2 ⋅ M ∈ ℕ
13 12 peano2nnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 2 ⋅ M + 1 ∈ ℕ
14 1 13 eqeltrid ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → N ∈ ℕ
15 14 nnnn0d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → N ∈ ℕ 0
16 binom ⊢ 1 tan ⁡ A ∈ ℂ ∧ i ∈ ℂ ∧ N ∈ ℕ 0 → 1 tan ⁡ A + i N = ∑ m = 0 N ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m
17 6 8 15 16 syl3anc ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 1 tan ⁡ A + i N = ∑ m = 0 N ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m
18 elioore ⊢ A ∈ 0 π 2 → A ∈ ℝ
19 18 adantl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → A ∈ ℝ
20 19 recoscld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ A ∈ ℝ
21 20 recnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ A ∈ ℂ
22 19 resincld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → sin ⁡ A ∈ ℝ
23 22 recnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → sin ⁡ A ∈ ℂ
24 mulcl ⊢ i ∈ ℂ ∧ sin ⁡ A ∈ ℂ → i ⁢ sin ⁡ A ∈ ℂ
25 7 23 24 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → i ⁢ sin ⁡ A ∈ ℂ
26 21 25 addcld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ A + i ⁢ sin ⁡ A ∈ ℂ
27 sincosq1sgn ⊢ A ∈ 0 π 2 → 0 < sin ⁡ A ∧ 0 < cos ⁡ A
28 27 adantl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 0 < sin ⁡ A ∧ 0 < cos ⁡ A
29 28 simpld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 0 < sin ⁡ A
30 29 gt0ne0d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → sin ⁡ A ≠ 0
31 26 23 30 15 expdivd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ A + i ⁢ sin ⁡ A sin ⁡ A N = cos ⁡ A + i ⁢ sin ⁡ A N sin ⁡ A N
32 21 25 23 30 divdird ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ A + i ⁢ sin ⁡ A sin ⁡ A = cos ⁡ A sin ⁡ A + i ⁢ sin ⁡ A sin ⁡ A
33 19 recnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → A ∈ ℂ
34 28 simprd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 0 < cos ⁡ A
35 34 gt0ne0d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ A ≠ 0
36 tanval ⊢ A ∈ ℂ ∧ cos ⁡ A ≠ 0 → tan ⁡ A = sin ⁡ A cos ⁡ A
37 33 35 36 syl2anc ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → tan ⁡ A = sin ⁡ A cos ⁡ A
38 37 oveq2d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 1 tan ⁡ A = 1 sin ⁡ A cos ⁡ A
39 23 21 30 35 recdivd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 1 sin ⁡ A cos ⁡ A = cos ⁡ A sin ⁡ A
40 38 39 eqtr2d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ A sin ⁡ A = 1 tan ⁡ A
41 8 23 30 divcan4d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → i ⁢ sin ⁡ A sin ⁡ A = i
42 40 41 oveq12d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ A sin ⁡ A + i ⁢ sin ⁡ A sin ⁡ A = 1 tan ⁡ A + i
43 32 42 eqtrd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ A + i ⁢ sin ⁡ A sin ⁡ A = 1 tan ⁡ A + i
44 43 oveq1d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ A + i ⁢ sin ⁡ A sin ⁡ A N = 1 tan ⁡ A + i N
45 14 nnzd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → N ∈ ℤ
46 demoivre ⊢ A ∈ ℂ ∧ N ∈ ℤ → cos ⁡ A + i ⁢ sin ⁡ A N = cos ⁡ N ⁢ A + i ⁢ sin ⁡ N ⁢ A
47 33 45 46 syl2anc ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ A + i ⁢ sin ⁡ A N = cos ⁡ N ⁢ A + i ⁢ sin ⁡ N ⁢ A
48 47 oveq1d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ A + i ⁢ sin ⁡ A N sin ⁡ A N = cos ⁡ N ⁢ A + i ⁢ sin ⁡ N ⁢ A sin ⁡ A N
49 31 44 48 3eqtr3d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 1 tan ⁡ A + i N = cos ⁡ N ⁢ A + i ⁢ sin ⁡ N ⁢ A sin ⁡ A N
50 14 nnred ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → N ∈ ℝ
51 50 19 remulcld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → N ⁢ A ∈ ℝ
52 51 recoscld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ N ⁢ A ∈ ℝ
53 52 recnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ N ⁢ A ∈ ℂ
54 51 resincld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → sin ⁡ N ⁢ A ∈ ℝ
55 54 recnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → sin ⁡ N ⁢ A ∈ ℂ
56 mulcl ⊢ i ∈ ℂ ∧ sin ⁡ N ⁢ A ∈ ℂ → i ⁢ sin ⁡ N ⁢ A ∈ ℂ
57 7 55 56 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → i ⁢ sin ⁡ N ⁢ A ∈ ℂ
58 22 29 elrpd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → sin ⁡ A ∈ ℝ +
59 58 45 rpexpcld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → sin ⁡ A N ∈ ℝ +
60 59 rpcnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → sin ⁡ A N ∈ ℂ
61 59 rpne0d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → sin ⁡ A N ≠ 0
62 53 57 60 61 divdird ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ N ⁢ A + i ⁢ sin ⁡ N ⁢ A sin ⁡ A N = cos ⁡ N ⁢ A sin ⁡ A N + i ⁢ sin ⁡ N ⁢ A sin ⁡ A N
63 8 55 60 61 divassd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → i ⁢ sin ⁡ N ⁢ A sin ⁡ A N = i ⁢ sin ⁡ N ⁢ A sin ⁡ A N
64 63 oveq2d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ N ⁢ A sin ⁡ A N + i ⁢ sin ⁡ N ⁢ A sin ⁡ A N = cos ⁡ N ⁢ A sin ⁡ A N + i ⁢ sin ⁡ N ⁢ A sin ⁡ A N
65 49 62 64 3eqtrd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 1 tan ⁡ A + i N = cos ⁡ N ⁢ A sin ⁡ A N + i ⁢ sin ⁡ N ⁢ A sin ⁡ A N
66 17 65 eqtr3d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → ∑ m = 0 N ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m = cos ⁡ N ⁢ A sin ⁡ A N + i ⁢ sin ⁡ N ⁢ A sin ⁡ A N
67 66 fveq2d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → ℑ ⁡ ∑ m = 0 N ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m = ℑ ⁡ cos ⁡ N ⁢ A sin ⁡ A N + i ⁢ sin ⁡ N ⁢ A sin ⁡ A N
68 oveq2 ⊢ m = N − 2 ⁢ j → ( N m) = ( N N − 2 ⁢ j )
69 oveq2 ⊢ m = N − 2 ⁢ j → N − m = N − N − 2 ⁢ j
70 69 oveq2d ⊢ m = N − 2 ⁢ j → 1 tan ⁡ A N − m = 1 tan ⁡ A N − N − 2 ⁢ j
71 oveq2 ⊢ m = N − 2 ⁢ j → i m = i N − 2 ⁢ j
72 70 71 oveq12d ⊢ m = N − 2 ⁢ j → 1 tan ⁡ A N − m ⁢ i m = 1 tan ⁡ A N − N − 2 ⁢ j ⁢ i N − 2 ⁢ j
73 68 72 oveq12d ⊢ m = N − 2 ⁢ j → ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m = ( N N − 2 ⁢ j ) ⁢ 1 tan ⁡ A N − N − 2 ⁢ j ⁢ i N − 2 ⁢ j
74 73 fveq2d ⊢ m = N − 2 ⁢ j → ℑ ⁡ ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m = ℑ ⁡ ( N N − 2 ⁢ j ) ⁢ 1 tan ⁡ A N − N − 2 ⁢ j ⁢ i N − 2 ⁢ j
75 fzfid ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 0 … M ∈ Fin
76 2nn0 ⊢ 2 ∈ ℕ 0
77 elfznn0 ⊢ k ∈ 0 … M → k ∈ ℕ 0
78 77 adantl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → k ∈ ℕ 0
79 nn0mulcl ⊢ 2 ∈ ℕ 0 ∧ k ∈ ℕ 0 → 2 ⁢ k ∈ ℕ 0
80 76 78 79 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → 2 ⁢ k ∈ ℕ 0
81 80 nn0red ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → 2 ⁢ k ∈ ℝ
82 12 nnred ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 2 ⋅ M ∈ ℝ
83 82 adantr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → 2 ⋅ M ∈ ℝ
84 50 adantr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → N ∈ ℝ
85 elfzle2 ⊢ k ∈ 0 … M → k ≤ M
86 85 adantl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → k ≤ M
87 78 nn0red ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → k ∈ ℝ
88 nnre ⊢ M ∈ ℕ → M ∈ ℝ
89 88 ad2antrr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → M ∈ ℝ
90 2re ⊢ 2 ∈ ℝ
91 2pos ⊢ 0 < 2
92 90 91 pm3.2i ⊢ 2 ∈ ℝ ∧ 0 < 2
93 92 a1i ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → 2 ∈ ℝ ∧ 0 < 2
94 lemul2 ⊢ k ∈ ℝ ∧ M ∈ ℝ ∧ 2 ∈ ℝ ∧ 0 < 2 → k ≤ M ↔ 2 ⁢ k ≤ 2 ⋅ M
95 87 89 93 94 syl3anc ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → k ≤ M ↔ 2 ⁢ k ≤ 2 ⋅ M
96 86 95 mpbid ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → 2 ⁢ k ≤ 2 ⋅ M
97 83 lep1d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → 2 ⋅ M ≤ 2 ⋅ M + 1
98 97 1 breqtrrdi ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → 2 ⋅ M ≤ N
99 81 83 84 96 98 letrd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → 2 ⁢ k ≤ N
100 nn0uz ⊢ ℕ 0 = ℤ ≥ 0
101 80 100 eleqtrdi ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → 2 ⁢ k ∈ ℤ ≥ 0
102 45 adantr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → N ∈ ℤ
103 elfz5 ⊢ 2 ⁢ k ∈ ℤ ≥ 0 ∧ N ∈ ℤ → 2 ⁢ k ∈ 0 … N ↔ 2 ⁢ k ≤ N
104 101 102 103 syl2anc ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → 2 ⁢ k ∈ 0 … N ↔ 2 ⁢ k ≤ N
105 99 104 mpbird ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → 2 ⁢ k ∈ 0 … N
106 fznn0sub2 ⊢ 2 ⁢ k ∈ 0 … N → N − 2 ⁢ k ∈ 0 … N
107 105 106 syl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M → N − 2 ⁢ k ∈ 0 … N
108 107 ex ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → k ∈ 0 … M → N − 2 ⁢ k ∈ 0 … N
109 14 nncnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → N ∈ ℂ
110 109 adantr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M ∧ m ∈ 0 … M → N ∈ ℂ
111 2cn ⊢ 2 ∈ ℂ
112 elfzelz ⊢ k ∈ 0 … M → k ∈ ℤ
113 112 zcnd ⊢ k ∈ 0 … M → k ∈ ℂ
114 113 ad2antrl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M ∧ m ∈ 0 … M → k ∈ ℂ
115 mulcl ⊢ 2 ∈ ℂ ∧ k ∈ ℂ → 2 ⁢ k ∈ ℂ
116 111 114 115 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M ∧ m ∈ 0 … M → 2 ⁢ k ∈ ℂ
117 113 ssriv ⊢ 0 … M ⊆ ℂ
118 simprr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M ∧ m ∈ 0 … M → m ∈ 0 … M
119 117 118 sselid ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M ∧ m ∈ 0 … M → m ∈ ℂ
120 mulcl ⊢ 2 ∈ ℂ ∧ m ∈ ℂ → 2 ⁢ m ∈ ℂ
121 111 119 120 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M ∧ m ∈ 0 … M → 2 ⁢ m ∈ ℂ
122 110 116 121 subcanad ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M ∧ m ∈ 0 … M → N − 2 ⁢ k = N − 2 ⁢ m ↔ 2 ⁢ k = 2 ⁢ m
123 2cnne0 ⊢ 2 ∈ ℂ ∧ 2 ≠ 0
124 123 a1i ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M ∧ m ∈ 0 … M → 2 ∈ ℂ ∧ 2 ≠ 0
125 mulcan ⊢ k ∈ ℂ ∧ m ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0 → 2 ⁢ k = 2 ⁢ m ↔ k = m
126 114 119 124 125 syl3anc ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M ∧ m ∈ 0 … M → 2 ⁢ k = 2 ⁢ m ↔ k = m
127 122 126 bitrd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ k ∈ 0 … M ∧ m ∈ 0 … M → N − 2 ⁢ k = N − 2 ⁢ m ↔ k = m
128 127 ex ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → k ∈ 0 … M ∧ m ∈ 0 … M → N − 2 ⁢ k = N − 2 ⁢ m ↔ k = m
129 108 128 dom2lem ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → k ∈ 0 … M ⟼ N − 2 ⁢ k : 0 … M ⟶ 1-1 0 … N
130 f1f1orn ⊢ k ∈ 0 … M ⟼ N − 2 ⁢ k : 0 … M ⟶ 1-1 0 … N → k ∈ 0 … M ⟼ N − 2 ⁢ k : 0 … M ⟶ 1-1 onto ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k
131 129 130 syl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → k ∈ 0 … M ⟼ N − 2 ⁢ k : 0 … M ⟶ 1-1 onto ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k
132 oveq2 ⊢ k = j → 2 ⁢ k = 2 ⁢ j
133 132 oveq2d ⊢ k = j → N − 2 ⁢ k = N − 2 ⁢ j
134 eqid ⊢ k ∈ 0 … M ⟼ N − 2 ⁢ k = k ∈ 0 … M ⟼ N − 2 ⁢ k
135 ovex ⊢ N − 2 ⁢ j ∈ V
136 133 134 135 fvmpt ⊢ j ∈ 0 … M → k ∈ 0 … M ⟼ N − 2 ⁢ k ⁡ j = N − 2 ⁢ j
137 136 adantl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → k ∈ 0 … M ⟼ N − 2 ⁢ k ⁡ j = N − 2 ⁢ j
138 107 fmpttd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → k ∈ 0 … M ⟼ N − 2 ⁢ k : 0 … M ⟶ 0 … N
139 138 frnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k ⊆ 0 … N
140 139 sselda ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k → m ∈ 0 … N
141 bccl2 ⊢ m ∈ 0 … N → ( N m) ∈ ℕ
142 141 adantl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → ( N m) ∈ ℕ
143 142 nncnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → ( N m) ∈ ℂ
144 4 rprecred ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 1 tan ⁡ A ∈ ℝ
145 fznn0sub ⊢ m ∈ 0 … N → N − m ∈ ℕ 0
146 reexpcl ⊢ 1 tan ⁡ A ∈ ℝ ∧ N − m ∈ ℕ 0 → 1 tan ⁡ A N − m ∈ ℝ
147 144 145 146 syl2an ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → 1 tan ⁡ A N − m ∈ ℝ
148 147 recnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → 1 tan ⁡ A N − m ∈ ℂ
149 elfznn0 ⊢ m ∈ 0 … N → m ∈ ℕ 0
150 149 adantl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → m ∈ ℕ 0
151 expcl ⊢ i ∈ ℂ ∧ m ∈ ℕ 0 → i m ∈ ℂ
152 7 150 151 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → i m ∈ ℂ
153 148 152 mulcld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → 1 tan ⁡ A N − m ⁢ i m ∈ ℂ
154 143 153 mulcld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m ∈ ℂ
155 140 154 syldan ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k → ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m ∈ ℂ
156 155 imcld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k → ℑ ⁡ ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m ∈ ℝ
157 156 recnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k → ℑ ⁡ ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m ∈ ℂ
158 74 75 131 137 157 fsumf1o ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → ∑ m ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k ℑ ⁡ ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m = ∑ j = 0 M ℑ ⁡ ( N N − 2 ⁢ j ) ⁢ 1 tan ⁡ A N − N − 2 ⁢ j ⁢ i N − 2 ⁢ j
159 eldifi ⊢ m ∈ 0 … N ∖ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k → m ∈ 0 … N
160 142 nnred ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → ( N m) ∈ ℝ
161 159 160 sylan2 ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∖ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k → ( N m) ∈ ℝ
162 159 147 sylan2 ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∖ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k → 1 tan ⁡ A N − m ∈ ℝ
163 eldif ⊢ m ∈ 0 … N ∖ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k ↔ m ∈ 0 … N ∧ ¬ m ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k
164 elfzelz ⊢ m ∈ 0 … N → m ∈ ℤ
165 164 adantl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → m ∈ ℤ
166 zeo ⊢ m ∈ ℤ → m 2 ∈ ℤ ∨ m + 1 2 ∈ ℤ
167 165 166 syl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → m 2 ∈ ℤ ∨ m + 1 2 ∈ ℤ
168 i2 ⊢ i 2 = − 1
169 168 oveq1i ⊢ i 2 m 2 = − 1 m 2
170 simprr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m 2 ∈ ℤ → m 2 ∈ ℤ
171 149 ad2antrl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m 2 ∈ ℤ → m ∈ ℕ 0
172 nn0re ⊢ m ∈ ℕ 0 → m ∈ ℝ
173 nn0ge0 ⊢ m ∈ ℕ 0 → 0 ≤ m
174 divge0 ⊢ m ∈ ℝ ∧ 0 ≤ m ∧ 2 ∈ ℝ ∧ 0 < 2 → 0 ≤ m 2
175 90 91 174 mpanr12 ⊢ m ∈ ℝ ∧ 0 ≤ m → 0 ≤ m 2
176 172 173 175 syl2anc ⊢ m ∈ ℕ 0 → 0 ≤ m 2
177 171 176 syl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m 2 ∈ ℤ → 0 ≤ m 2
178 elnn0z ⊢ m 2 ∈ ℕ 0 ↔ m 2 ∈ ℤ ∧ 0 ≤ m 2
179 170 177 178 sylanbrc ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m 2 ∈ ℤ → m 2 ∈ ℕ 0
180 expmul ⊢ i ∈ ℂ ∧ 2 ∈ ℕ 0 ∧ m 2 ∈ ℕ 0 → i 2 ⁢ m 2 = i 2 m 2
181 7 76 179 180 mp3an12i ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m 2 ∈ ℤ → i 2 ⁢ m 2 = i 2 m 2
182 171 nn0cnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m 2 ∈ ℤ → m ∈ ℂ
183 2ne0 ⊢ 2 ≠ 0
184 divcan2 ⊢ m ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0 → 2 ⁢ m 2 = m
185 111 183 184 mp3an23 ⊢ m ∈ ℂ → 2 ⁢ m 2 = m
186 182 185 syl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m 2 ∈ ℤ → 2 ⁢ m 2 = m
187 186 oveq2d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m 2 ∈ ℤ → i 2 ⁢ m 2 = i m
188 181 187 eqtr3d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m 2 ∈ ℤ → i 2 m 2 = i m
189 169 188 eqtr3id ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m 2 ∈ ℤ → − 1 m 2 = i m
190 neg1rr ⊢ − 1 ∈ ℝ
191 reexpcl ⊢ − 1 ∈ ℝ ∧ m 2 ∈ ℕ 0 → − 1 m 2 ∈ ℝ
192 190 179 191 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m 2 ∈ ℤ → − 1 m 2 ∈ ℝ
193 189 192 eqeltrrd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m 2 ∈ ℤ → i m ∈ ℝ
194 193 expr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → m 2 ∈ ℤ → i m ∈ ℝ
195 0zd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 0 ∈ ℤ
196 nnz ⊢ M ∈ ℕ → M ∈ ℤ
197 196 ad2antrr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → M ∈ ℤ
198 109 adantr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N ∈ ℂ
199 149 ad2antrl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → m ∈ ℕ 0
200 199 nn0cnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → m ∈ ℂ
201 1cnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 1 ∈ ℂ
202 198 200 201 pnpcan2d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N + 1 - m + 1 = N − m
203 2t1e2 ⊢ 2 ⋅ 1 = 2
204 df-2 ⊢ 2 = 1 + 1
205 203 204 eqtr2i ⊢ 1 + 1 = 2 ⋅ 1
206 205 oveq2i ⊢ 2 ⋅ M + 1 + 1 = 2 ⋅ M + 2 ⋅ 1
207 1 oveq1i ⊢ N + 1 = 2 ⋅ M + 1 + 1
208 12 nncnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 2 ⋅ M ∈ ℂ
209 208 adantr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 2 ⋅ M ∈ ℂ
210 209 201 201 addassd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 2 ⋅ M + 1 + 1 = 2 ⋅ M + 1 + 1
211 207 210 eqtrid ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N + 1 = 2 ⋅ M + 1 + 1
212 2cnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 2 ∈ ℂ
213 nncn ⊢ M ∈ ℕ → M ∈ ℂ
214 213 ad2antrr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → M ∈ ℂ
215 212 214 201 adddid ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 2 ⁢ M + 1 = 2 ⋅ M + 2 ⋅ 1
216 206 211 215 3eqtr4a ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N + 1 = 2 ⁢ M + 1
217 216 oveq1d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N + 1 - m + 1 = 2 ⁢ M + 1 − m + 1
218 202 217 eqtr3d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − m = 2 ⁢ M + 1 − m + 1
219 218 oveq1d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − m 2 = 2 ⁢ M + 1 − m + 1 2
220 197 peano2zd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → M + 1 ∈ ℤ
221 220 zcnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → M + 1 ∈ ℂ
222 mulcl ⊢ 2 ∈ ℂ ∧ M + 1 ∈ ℂ → 2 ⁢ M + 1 ∈ ℂ
223 111 221 222 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 2 ⁢ M + 1 ∈ ℂ
224 peano2cn ⊢ m ∈ ℂ → m + 1 ∈ ℂ
225 200 224 syl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → m + 1 ∈ ℂ
226 123 a1i ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 2 ∈ ℂ ∧ 2 ≠ 0
227 divsubdir ⊢ 2 ⁢ M + 1 ∈ ℂ ∧ m + 1 ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0 → 2 ⁢ M + 1 − m + 1 2 = 2 ⁢ M + 1 2 − m + 1 2
228 223 225 226 227 syl3anc ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 2 ⁢ M + 1 − m + 1 2 = 2 ⁢ M + 1 2 − m + 1 2
229 183 a1i ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 2 ≠ 0
230 221 212 229 divcan3d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 2 ⁢ M + 1 2 = M + 1
231 230 oveq1d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 2 ⁢ M + 1 2 − m + 1 2 = M + 1 - m + 1 2
232 219 228 231 3eqtrd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − m 2 = M + 1 - m + 1 2
233 simprr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → m + 1 2 ∈ ℤ
234 220 233 zsubcld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → M + 1 - m + 1 2 ∈ ℤ
235 232 234 eqeltrd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − m 2 ∈ ℤ
236 145 ad2antrl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − m ∈ ℕ 0
237 nn0re ⊢ N − m ∈ ℕ 0 → N − m ∈ ℝ
238 nn0ge0 ⊢ N − m ∈ ℕ 0 → 0 ≤ N − m
239 divge0 ⊢ N − m ∈ ℝ ∧ 0 ≤ N − m ∧ 2 ∈ ℝ ∧ 0 < 2 → 0 ≤ N − m 2
240 90 91 239 mpanr12 ⊢ N − m ∈ ℝ ∧ 0 ≤ N − m → 0 ≤ N − m 2
241 237 238 240 syl2anc ⊢ N − m ∈ ℕ 0 → 0 ≤ N − m 2
242 236 241 syl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 0 ≤ N − m 2
243 236 nn0red ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − m ∈ ℝ
244 50 adantr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N ∈ ℝ
245 peano2re ⊢ N ∈ ℝ → N + 1 ∈ ℝ
246 244 245 syl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N + 1 ∈ ℝ
247 199 173 syl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 0 ≤ m
248 199 nn0red ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → m ∈ ℝ
249 244 248 subge02d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 0 ≤ m ↔ N − m ≤ N
250 247 249 mpbid ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − m ≤ N
251 244 ltp1d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N < N + 1
252 243 244 246 250 251 lelttrd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − m < N + 1
253 252 216 breqtrd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − m < 2 ⁢ M + 1
254 220 zred ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → M + 1 ∈ ℝ
255 92 a1i ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 2 ∈ ℝ ∧ 0 < 2
256 ltdivmul ⊢ N − m ∈ ℝ ∧ M + 1 ∈ ℝ ∧ 2 ∈ ℝ ∧ 0 < 2 → N − m 2 < M + 1 ↔ N − m < 2 ⁢ M + 1
257 243 254 255 256 syl3anc ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − m 2 < M + 1 ↔ N − m < 2 ⁢ M + 1
258 253 257 mpbird ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − m 2 < M + 1
259 zleltp1 ⊢ N − m 2 ∈ ℤ ∧ M ∈ ℤ → N − m 2 ≤ M ↔ N − m 2 < M + 1
260 235 197 259 syl2anc ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − m 2 ≤ M ↔ N − m 2 < M + 1
261 258 260 mpbird ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − m 2 ≤ M
262 195 197 235 242 261 elfzd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − m 2 ∈ 0 … M
263 oveq2 ⊢ k = N − m 2 → 2 ⁢ k = 2 ⁢ N − m 2
264 263 oveq2d ⊢ k = N − m 2 → N − 2 ⁢ k = N − 2 ⁢ N − m 2
265 ovex ⊢ N − 2 ⁢ N − m 2 ∈ V
266 264 134 265 fvmpt ⊢ N − m 2 ∈ 0 … M → k ∈ 0 … M ⟼ N − 2 ⁢ k ⁡ N − m 2 = N − 2 ⁢ N − m 2
267 262 266 syl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → k ∈ 0 … M ⟼ N − 2 ⁢ k ⁡ N − m 2 = N − 2 ⁢ N − m 2
268 236 nn0cnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − m ∈ ℂ
269 268 212 229 divcan2d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → 2 ⁢ N − m 2 = N − m
270 269 oveq2d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − 2 ⁢ N − m 2 = N − N − m
271 198 200 nncand ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → N − N − m = m
272 267 270 271 3eqtrd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → k ∈ 0 … M ⟼ N − 2 ⁢ k ⁡ N − m 2 = m
273 138 ffnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → k ∈ 0 … M ⟼ N − 2 ⁢ k Fn 0 … M
274 fnfvelrn ⊢ k ∈ 0 … M ⟼ N − 2 ⁢ k Fn 0 … M ∧ N − m 2 ∈ 0 … M → k ∈ 0 … M ⟼ N − 2 ⁢ k ⁡ N − m 2 ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k
275 273 262 274 syl2an2r ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → k ∈ 0 … M ⟼ N − 2 ⁢ k ⁡ N − m 2 ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k
276 272 275 eqeltrrd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ m + 1 2 ∈ ℤ → m ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k
277 276 expr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → m + 1 2 ∈ ℤ → m ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k
278 194 277 orim12d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → m 2 ∈ ℤ ∨ m + 1 2 ∈ ℤ → i m ∈ ℝ ∨ m ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k
279 167 278 mpd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → i m ∈ ℝ ∨ m ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k
280 279 orcomd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → m ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k ∨ i m ∈ ℝ
281 280 ord ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N → ¬ m ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k → i m ∈ ℝ
282 281 impr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∧ ¬ m ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k → i m ∈ ℝ
283 163 282 sylan2b ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∖ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k → i m ∈ ℝ
284 162 283 remulcld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∖ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k → 1 tan ⁡ A N − m ⁢ i m ∈ ℝ
285 161 284 remulcld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∖ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k → ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m ∈ ℝ
286 285 reim0d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ m ∈ 0 … N ∖ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k → ℑ ⁡ ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m = 0
287 fzfid ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → 0 … N ∈ Fin
288 139 157 286 287 fsumss ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → ∑ m ∈ ran ⁡ k ∈ 0 … M ⟼ N − 2 ⁢ k ℑ ⁡ ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m = ∑ m = 0 N ℑ ⁡ ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m
289 elfznn0 ⊢ j ∈ 0 … M → j ∈ ℕ 0
290 289 adantl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → j ∈ ℕ 0
291 nn0mulcl ⊢ 2 ∈ ℕ 0 ∧ j ∈ ℕ 0 → 2 ⁢ j ∈ ℕ 0
292 76 290 291 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 2 ⁢ j ∈ ℕ 0
293 292 nn0zd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 2 ⁢ j ∈ ℤ
294 bccl ⊢ N ∈ ℕ 0 ∧ 2 ⁢ j ∈ ℤ → ( N 2 ⁢ j ) ∈ ℕ 0
295 15 293 294 syl2an2r ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → ( N 2 ⁢ j ) ∈ ℕ 0
296 295 nn0red ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → ( N 2 ⁢ j ) ∈ ℝ
297 fznn0sub ⊢ j ∈ 0 … M → M − j ∈ ℕ 0
298 297 adantl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → M − j ∈ ℕ 0
299 reexpcl ⊢ − 1 ∈ ℝ ∧ M − j ∈ ℕ 0 → − 1 M − j ∈ ℝ
300 190 298 299 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → − 1 M − j ∈ ℝ
301 296 300 remulcld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → ( N 2 ⁢ j ) ⁢ − 1 M − j ∈ ℝ
302 2z ⊢ 2 ∈ ℤ
303 znegcl ⊢ 2 ∈ ℤ → − 2 ∈ ℤ
304 302 303 ax-mp ⊢ − 2 ∈ ℤ
305 rpexpcl ⊢ tan ⁡ A ∈ ℝ + ∧ − 2 ∈ ℤ → tan ⁡ A − 2 ∈ ℝ +
306 4 304 305 sylancl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → tan ⁡ A − 2 ∈ ℝ +
307 306 rpred ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → tan ⁡ A − 2 ∈ ℝ
308 reexpcl ⊢ tan ⁡ A − 2 ∈ ℝ ∧ j ∈ ℕ 0 → tan ⁡ A − 2 j ∈ ℝ
309 307 289 308 syl2an ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → tan ⁡ A − 2 j ∈ ℝ
310 301 309 remulcld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j ∈ ℝ
311 310 recnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j ∈ ℂ
312 mulcl ⊢ i ∈ ℂ ∧ ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j ∈ ℂ → i ⁢ ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j ∈ ℂ
313 7 311 312 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i ⁢ ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j ∈ ℂ
314 313 addlidd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 0 + i ⁢ ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j = i ⁢ ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j
315 295 nn0cnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → ( N 2 ⁢ j ) ∈ ℂ
316 300 recnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → − 1 M − j ∈ ℂ
317 309 recnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → tan ⁡ A − 2 j ∈ ℂ
318 315 316 317 mulassd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j = ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j
319 318 oveq2d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i ⁢ ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j = i ⁢ ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j
320 7 a1i ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i ∈ ℂ
321 316 317 mulcld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → − 1 M − j ⁢ tan ⁡ A − 2 j ∈ ℂ
322 320 315 321 mul12d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i ⁢ ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j = ( N 2 ⁢ j ) ⁢ i ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j
323 319 322 eqtrd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i ⁢ ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j = ( N 2 ⁢ j ) ⁢ i ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j
324 bccmpl ⊢ N ∈ ℕ 0 ∧ 2 ⁢ j ∈ ℤ → ( N 2 ⁢ j ) = ( N N − 2 ⁢ j )
325 15 293 324 syl2an2r ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → ( N 2 ⁢ j ) = ( N N − 2 ⁢ j )
326 109 adantr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → N ∈ ℂ
327 292 nn0cnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 2 ⁢ j ∈ ℂ
328 326 327 nncand ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → N − N − 2 ⁢ j = 2 ⁢ j
329 328 oveq2d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 1 tan ⁡ A N − N − 2 ⁢ j = 1 tan ⁡ A 2 ⁢ j
330 4 adantr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → tan ⁡ A ∈ ℝ +
331 330 rpcnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → tan ⁡ A ∈ ℂ
332 expneg ⊢ tan ⁡ A ∈ ℂ ∧ 2 ⁢ j ∈ ℕ 0 → tan ⁡ A − 2 ⁢ j = 1 tan ⁡ A 2 ⁢ j
333 331 292 332 syl2anc ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → tan ⁡ A − 2 ⁢ j = 1 tan ⁡ A 2 ⁢ j
334 290 nn0cnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → j ∈ ℂ
335 mulneg1 ⊢ 2 ∈ ℂ ∧ j ∈ ℂ → -2 ⁢ j = − 2 ⁢ j
336 111 334 335 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → -2 ⁢ j = − 2 ⁢ j
337 336 oveq2d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → tan ⁡ A -2 ⁢ j = tan ⁡ A − 2 ⁢ j
338 330 rpne0d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → tan ⁡ A ≠ 0
339 331 338 293 exprecd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 1 tan ⁡ A 2 ⁢ j = 1 tan ⁡ A 2 ⁢ j
340 333 337 339 3eqtr4d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → tan ⁡ A -2 ⁢ j = 1 tan ⁡ A 2 ⁢ j
341 304 a1i ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → − 2 ∈ ℤ
342 290 nn0zd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → j ∈ ℤ
343 expmulz ⊢ tan ⁡ A ∈ ℂ ∧ tan ⁡ A ≠ 0 ∧ − 2 ∈ ℤ ∧ j ∈ ℤ → tan ⁡ A -2 ⁢ j = tan ⁡ A − 2 j
344 331 338 341 342 343 syl22anc ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → tan ⁡ A -2 ⁢ j = tan ⁡ A − 2 j
345 329 340 344 3eqtr2d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 1 tan ⁡ A N − N − 2 ⁢ j = tan ⁡ A − 2 j
346 1 oveq1i ⊢ N − 2 ⁢ j = 2 ⋅ M + 1 - 2 ⁢ j
347 12 adantr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 2 ⋅ M ∈ ℕ
348 347 nncnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 2 ⋅ M ∈ ℂ
349 1cnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 1 ∈ ℂ
350 348 349 327 addsubd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 2 ⋅ M + 1 - 2 ⁢ j = 2 ⋅ M - 2 ⁢ j + 1
351 2cnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 2 ∈ ℂ
352 213 ad2antrr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → M ∈ ℂ
353 351 352 334 subdid ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 2 ⁢ M − j = 2 ⋅ M − 2 ⁢ j
354 353 oveq1d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 2 ⁢ M − j + 1 = 2 ⋅ M - 2 ⁢ j + 1
355 350 354 eqtr4d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 2 ⋅ M + 1 - 2 ⁢ j = 2 ⁢ M − j + 1
356 346 355 eqtrid ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → N − 2 ⁢ j = 2 ⁢ M − j + 1
357 356 oveq2d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i N − 2 ⁢ j = i 2 ⁢ M − j + 1
358 nn0mulcl ⊢ 2 ∈ ℕ 0 ∧ M − j ∈ ℕ 0 → 2 ⁢ M − j ∈ ℕ 0
359 76 298 358 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 2 ⁢ M − j ∈ ℕ 0
360 expp1 ⊢ i ∈ ℂ ∧ 2 ⁢ M − j ∈ ℕ 0 → i 2 ⁢ M − j + 1 = i 2 ⁢ M − j ⁢ i
361 7 359 360 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i 2 ⁢ M − j + 1 = i 2 ⁢ M − j ⁢ i
362 76 a1i ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 2 ∈ ℕ 0
363 320 298 362 expmuld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i 2 ⁢ M − j = i 2 M − j
364 168 oveq1i ⊢ i 2 M − j = − 1 M − j
365 363 364 eqtrdi ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i 2 ⁢ M − j = − 1 M − j
366 365 oveq1d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i 2 ⁢ M − j ⁢ i = − 1 M − j ⁢ i
367 357 361 366 3eqtrd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i N − 2 ⁢ j = − 1 M − j ⁢ i
368 mulcom ⊢ − 1 M − j ∈ ℂ ∧ i ∈ ℂ → − 1 M − j ⁢ i = i ⁢ − 1 M − j
369 316 7 368 sylancl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → − 1 M − j ⁢ i = i ⁢ − 1 M − j
370 367 369 eqtrd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i N − 2 ⁢ j = i ⁢ − 1 M − j
371 345 370 oveq12d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 1 tan ⁡ A N − N − 2 ⁢ j ⁢ i N − 2 ⁢ j = tan ⁡ A − 2 j ⁢ i ⁢ − 1 M − j
372 mulcl ⊢ i ∈ ℂ ∧ − 1 M − j ∈ ℂ → i ⁢ − 1 M − j ∈ ℂ
373 7 316 372 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i ⁢ − 1 M − j ∈ ℂ
374 373 317 mulcomd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j = tan ⁡ A − 2 j ⁢ i ⁢ − 1 M − j
375 320 316 317 mulassd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j = i ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j
376 371 374 375 3eqtr2rd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → i ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j = 1 tan ⁡ A N − N − 2 ⁢ j ⁢ i N − 2 ⁢ j
377 325 376 oveq12d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → ( N 2 ⁢ j ) ⁢ i ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j = ( N N − 2 ⁢ j ) ⁢ 1 tan ⁡ A N − N − 2 ⁢ j ⁢ i N − 2 ⁢ j
378 314 323 377 3eqtrd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → 0 + i ⁢ ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j = ( N N − 2 ⁢ j ) ⁢ 1 tan ⁡ A N − N − 2 ⁢ j ⁢ i N − 2 ⁢ j
379 378 fveq2d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → ℑ ⁡ 0 + i ⁢ ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j = ℑ ⁡ ( N N − 2 ⁢ j ) ⁢ 1 tan ⁡ A N − N − 2 ⁢ j ⁢ i N − 2 ⁢ j
380 0re ⊢ 0 ∈ ℝ
381 crim ⊢ 0 ∈ ℝ ∧ ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j ∈ ℝ → ℑ ⁡ 0 + i ⁢ ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j = ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j
382 380 310 381 sylancr ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → ℑ ⁡ 0 + i ⁢ ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j = ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j
383 379 382 eqtr3d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 ∧ j ∈ 0 … M → ℑ ⁡ ( N N − 2 ⁢ j ) ⁢ 1 tan ⁡ A N − N − 2 ⁢ j ⁢ i N − 2 ⁢ j = ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j
384 383 sumeq2dv ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → ∑ j = 0 M ℑ ⁡ ( N N − 2 ⁢ j ) ⁢ 1 tan ⁡ A N − N − 2 ⁢ j ⁢ i N − 2 ⁢ j = ∑ j = 0 M ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j
385 158 288 384 3eqtr3d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → ∑ m = 0 N ℑ ⁡ ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m = ∑ j = 0 M ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j
386 287 154 fsumim ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → ℑ ⁡ ∑ m = 0 N ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m = ∑ m = 0 N ℑ ⁡ ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m
387 306 rpcnd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → tan ⁡ A − 2 ∈ ℂ
388 oveq1 ⊢ t = tan ⁡ A − 2 → t j = tan ⁡ A − 2 j
389 388 oveq2d ⊢ t = tan ⁡ A − 2 → ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ t j = ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j
390 389 sumeq2sdv ⊢ t = tan ⁡ A − 2 → ∑ j = 0 M ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ t j = ∑ j = 0 M ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j
391 sumex ⊢ ∑ j = 0 M ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j ∈ V
392 390 2 391 fvmpt ⊢ tan ⁡ A − 2 ∈ ℂ → P ⁡ tan ⁡ A − 2 = ∑ j = 0 M ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j
393 387 392 syl ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → P ⁡ tan ⁡ A − 2 = ∑ j = 0 M ( N 2 ⁢ j ) ⁢ − 1 M − j ⁢ tan ⁡ A − 2 j
394 385 386 393 3eqtr4d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → ℑ ⁡ ∑ m = 0 N ( N m) ⁢ 1 tan ⁡ A N − m ⁢ i m = P ⁡ tan ⁡ A − 2
395 52 59 rerpdivcld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → cos ⁡ N ⁢ A sin ⁡ A N ∈ ℝ
396 54 59 rerpdivcld ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → sin ⁡ N ⁢ A sin ⁡ A N ∈ ℝ
397 395 396 crimd ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → ℑ ⁡ cos ⁡ N ⁢ A sin ⁡ A N + i ⁢ sin ⁡ N ⁢ A sin ⁡ A N = sin ⁡ N ⁢ A sin ⁡ A N
398 67 394 397 3eqtr3d ⊢ M ∈ ℕ ∧ A ∈ 0 π 2 → P ⁡ tan ⁡ A − 2 = sin ⁡ N ⁢ A sin ⁡ A N