Metamath Proof Explorer


Theorem sin5tlem2

Description: Lemma 2 for quintupled angle sine calculation, multiplicating triple angle cosine by cosine straight and converting into sine. (Contributed by Ender Ting, 16-Apr-2026)

Ref Expression
Assertion sin5tlem2 ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 4 ⁢ N 3 − 3 ⋅ N ⋅ N = 4 ⁢ 1 - 2 ⁢ M 2 + M 4 − 3 ⁢ 1 − M 2

Proof

Step Hyp Ref Expression
1 4cn ⊢ 4 ∈ ℂ
2 1 a1i ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 4 ∈ ℂ
3 simp1 ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → N ∈ ℂ
4 3nn0 ⊢ 3 ∈ ℕ 0
5 4 a1i ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 3 ∈ ℕ 0
6 3 5 expcld ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → N 3 ∈ ℂ
7 2 6 mulcld ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 4 ⁢ N 3 ∈ ℂ
8 3cn ⊢ 3 ∈ ℂ
9 8 a1i ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 3 ∈ ℂ
10 9 3 mulcld ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 3 ⋅ N ∈ ℂ
11 7 10 3 subdird ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 4 ⁢ N 3 − 3 ⋅ N ⋅ N = 4 ⁢ N 3 ⋅ N − 3 ⋅ N ⋅ N
12 2 6 3 mulassd ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 4 ⁢ N 3 ⋅ N = 4 ⁢ N 3 ⋅ N
13 2t2e4 ⊢ 2 ⋅ 2 = 4
14 df-4 ⊢ 4 = 3 + 1
15 13 14 eqtri ⊢ 2 ⋅ 2 = 3 + 1
16 15 a1i ⊢ N ∈ ℂ → 2 ⋅ 2 = 3 + 1
17 16 oveq2d ⊢ N ∈ ℂ → N 2 ⋅ 2 = N 3 + 1
18 id ⊢ N ∈ ℂ → N ∈ ℂ
19 2nn0 ⊢ 2 ∈ ℕ 0
20 19 a1i ⊢ N ∈ ℂ → 2 ∈ ℕ 0
21 18 20 20 expmuld ⊢ N ∈ ℂ → N 2 ⋅ 2 = N 2 2
22 4 a1i ⊢ N ∈ ℂ → 3 ∈ ℕ 0
23 18 22 expp1d ⊢ N ∈ ℂ → N 3 + 1 = N 3 ⋅ N
24 17 21 23 3eqtr3rd ⊢ N ∈ ℂ → N 3 ⋅ N = N 2 2
25 24 3ad2ant1 ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → N 3 ⋅ N = N 2 2
26 25 oveq2d ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 4 ⁢ N 3 ⋅ N = 4 ⁢ N 2 2
27 oveq1 ⊢ N 2 = 1 − M 2 → N 2 2 = 1 − M 2 2
28 27 oveq2d ⊢ N 2 = 1 − M 2 → 4 ⁢ N 2 2 = 4 ⁢ 1 − M 2 2
29 28 3ad2ant3 ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 4 ⁢ N 2 2 = 4 ⁢ 1 − M 2 2
30 12 26 29 3eqtrd ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 4 ⁢ N 3 ⋅ N = 4 ⁢ 1 − M 2 2
31 1cnd ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 1 ∈ ℂ
32 simp2 ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → M ∈ ℂ
33 19 a1i ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 2 ∈ ℕ 0
34 32 33 expcld ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → M 2 ∈ ℂ
35 binom2sub ⊢ 1 ∈ ℂ ∧ M 2 ∈ ℂ → 1 − M 2 2 = 1 2 - 2 ⁢ 1 ⁢ M 2 + M 2 2
36 31 34 35 syl2anc ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 1 − M 2 2 = 1 2 - 2 ⁢ 1 ⁢ M 2 + M 2 2
37 sq1 ⊢ 1 2 = 1
38 37 a1i ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 1 2 = 1
39 34 mullidd ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 1 ⁢ M 2 = M 2
40 39 oveq2d ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 2 ⁢ 1 ⁢ M 2 = 2 ⁢ M 2
41 38 40 oveq12d ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 1 2 − 2 ⁢ 1 ⁢ M 2 = 1 − 2 ⁢ M 2
42 13 eqcomi ⊢ 4 = 2 ⋅ 2
43 42 a1i ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 4 = 2 ⋅ 2
44 43 oveq2d ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → M 4 = M 2 ⋅ 2
45 32 33 33 expmuld ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → M 2 ⋅ 2 = M 2 2
46 44 45 eqtr2d ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → M 2 2 = M 4
47 41 46 oveq12d ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 1 2 - 2 ⁢ 1 ⁢ M 2 + M 2 2 = 1 - 2 ⁢ M 2 + M 4
48 36 47 eqtrd ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 1 − M 2 2 = 1 - 2 ⁢ M 2 + M 4
49 48 oveq2d ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 4 ⁢ 1 − M 2 2 = 4 ⁢ 1 - 2 ⁢ M 2 + M 4
50 30 49 eqtrd ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 4 ⁢ N 3 ⋅ N = 4 ⁢ 1 - 2 ⁢ M 2 + M 4
51 9 3 3 mulassd ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 3 ⋅ N ⋅ N = 3 ⁢ N ⋅ N
52 sqval ⊢ N ∈ ℂ → N 2 = N ⋅ N
53 52 eqcomd ⊢ N ∈ ℂ → N ⋅ N = N 2
54 53 3ad2ant1 ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → N ⋅ N = N 2
55 54 oveq2d ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 3 ⁢ N ⋅ N = 3 ⁢ N 2
56 oveq2 ⊢ N 2 = 1 − M 2 → 3 ⁢ N 2 = 3 ⁢ 1 − M 2
57 56 3ad2ant3 ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 3 ⁢ N 2 = 3 ⁢ 1 − M 2
58 51 55 57 3eqtrd ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 3 ⋅ N ⋅ N = 3 ⁢ 1 − M 2
59 50 58 oveq12d ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 4 ⁢ N 3 ⋅ N − 3 ⋅ N ⋅ N = 4 ⁢ 1 - 2 ⁢ M 2 + M 4 − 3 ⁢ 1 − M 2
60 11 59 eqtrd ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ N 2 = 1 − M 2 → 4 ⁢ N 3 − 3 ⋅ N ⋅ N = 4 ⁢ 1 - 2 ⁢ M 2 + M 4 − 3 ⁢ 1 − M 2