itgsinexp - Mathbox for Glauco Siliprandi

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

Theorem itgsinexp 46791

Description: A recursive formula for the integral of sin^N on the interval (0,π) . (Contributed by Glauco Siliprandi, 29-Jun-2017.)

**Hypotheses**
Ref	Expression
itgsinexp.1	⊢ 𝐼 = (𝑛 ∈ ℕ₀ ↦ ∫(0(,)π)((sin‘𝑥)↑𝑛) d𝑥)
itgsinexp.2	⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘2))

**Assertion**
Ref	Expression
itgsinexp	⊢ (𝜑 → (𝐼‘𝑁) = (((𝑁 − 1) / 𝑁) · (𝐼‘(𝑁 − 2))))

Distinct variable groups: 𝑥,𝑛,𝑁 𝜑,𝑛,𝑥 Allowed substitution hints: 𝐼(𝑥, 𝑛)

**Proof of Theorem itgsinexp**
Step	Hyp	Ref	Expression
1		itgsinexp.2	. . . . . . . 8 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘2))
2		eluzelz 12901	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 𝑁 ∈ ℤ)
3		zcn 12624	. . . . . . . 8 ⊢ (𝑁 ∈ ℤ → 𝑁 ∈ ℂ)
4	1, 2, 3	3syl 19	. . . . . . 7 ⊢ (𝜑 → 𝑁 ∈ ℂ)
5		1cnd 11230	. . . . . . 7 ⊢ (𝜑 → 1 ∈ ℂ)
6	4, 5	npcand 11601	. . . . . 6 ⊢ (𝜑 → ((𝑁 − 1) + 1) = 𝑁)
7	6	eqcomd 2768	. . . . 5 ⊢ (𝜑 → 𝑁 = ((𝑁 − 1) + 1))
8	7	oveq1d 7432	. . . 4 ⊢ (𝜑 → (𝑁 · (𝐼‘𝑁)) = (((𝑁 − 1) + 1) · (𝐼‘𝑁)))
9		uz2m1nn 12976	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − 1) ∈ ℕ)
10	1, 9	syl 18	. . . . . 6 ⊢ (𝜑 → (𝑁 − 1) ∈ ℕ)
11	10	nncnd 12277	. . . . 5 ⊢ (𝜑 → (𝑁 − 1) ∈ ℂ)
12		itgsinexp.1	. . . . . . . 8 ⊢ 𝐼 = (𝑛 ∈ ℕ₀ ↦ ∫(0(,)π)((sin‘𝑥)↑𝑛) d𝑥)
13	12	a1i 11	. . . . . . 7 ⊢ (𝜑 → 𝐼 = (𝑛 ∈ ℕ₀ ↦ ∫(0(,)π)((sin‘𝑥)↑𝑛) d𝑥))
14		oveq2 7425	. . . . . . . . 9 ⊢ (𝑛 = 𝑁 → ((sin‘𝑥)↑𝑛) = ((sin‘𝑥)↑𝑁))
15	14	ad2antlr 740	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 = 𝑁) ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑𝑛) = ((sin‘𝑥)↑𝑁))
16	15	itgeq2dv 26016	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 = 𝑁) → ∫(0(,)π)((sin‘𝑥)↑𝑛) d𝑥 = ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)
17		2cnd 12347	. . . . . . . . 9 ⊢ (𝜑 → 2 ∈ ℂ)
18		npcan 11494	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℂ ∧ 2 ∈ ℂ) → ((𝑁 − 2) + 2) = 𝑁)
19	18	eqcomd 2768	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℂ ∧ 2 ∈ ℂ) → 𝑁 = ((𝑁 − 2) + 2))
20	4, 17, 19	syl2anc 596	. . . . . . . 8 ⊢ (𝜑 → 𝑁 = ((𝑁 − 2) + 2))
21		uznn0sub 12926	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − 2) ∈ ℕ₀)
22	1, 21	syl 18	. . . . . . . . 9 ⊢ (𝜑 → (𝑁 − 2) ∈ ℕ₀)
23		2nn0 12549	. . . . . . . . . 10 ⊢ 2 ∈ ℕ₀
24	23	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 2 ∈ ℕ₀)
25	22, 24	nn0addcld 12597	. . . . . . . 8 ⊢ (𝜑 → ((𝑁 − 2) + 2) ∈ ℕ₀)
26	20, 25	eqeltrd 2862	. . . . . . 7 ⊢ (𝜑 → 𝑁 ∈ ℕ₀)
27		itgex 26004	. . . . . . . 8 ⊢ ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥 ∈ V
28	27	a1i 11	. . . . . . 7 ⊢ (𝜑 → ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥 ∈ V)
29	13, 16, 26, 28	fvmptd 6998	. . . . . 6 ⊢ (𝜑 → (𝐼‘𝑁) = ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)
30		ioosscn 13465	. . . . . . . . . . 11 ⊢ (0(,)π) ⊆ ℂ
31	30	sseli 3930	. . . . . . . . . 10 ⊢ (𝑥 ∈ (0(,)π) → 𝑥 ∈ ℂ)
32	31	sincld 16224	. . . . . . . . 9 ⊢ (𝑥 ∈ (0(,)π) → (sin‘𝑥) ∈ ℂ)
33	32	adantl 487	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (sin‘𝑥) ∈ ℂ)
34	26	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → 𝑁 ∈ ℕ₀)
35	33, 34	expcld 14214	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑𝑁) ∈ ℂ)
36		ioossicc 13490	. . . . . . . . 9 ⊢ (0(,)π) ⊆ (0[,]π)
37	36	a1i 11	. . . . . . . 8 ⊢ (𝜑 → (0(,)π) ⊆ (0[,]π))
38		ioombl 25799	. . . . . . . . 9 ⊢ (0(,)π) ∈ dom vol
39	38	a1i 11	. . . . . . . 8 ⊢ (𝜑 → (0(,)π) ∈ dom vol)
40		0re 11238	. . . . . . . . . . . . . 14 ⊢ 0 ∈ ℝ
41		pire 26699	. . . . . . . . . . . . . 14 ⊢ π ∈ ℝ
42		iccssre 13486	. . . . . . . . . . . . . 14 ⊢ ((0 ∈ ℝ ∧ π ∈ ℝ) → (0[,]π) ⊆ ℝ)
43	40, 41, 42	mp2an 705	. . . . . . . . . . . . 13 ⊢ (0[,]π) ⊆ ℝ
44		ax-resscn 11185	. . . . . . . . . . . . 13 ⊢ ℝ ⊆ ℂ
45	43, 44	sstri 3943	. . . . . . . . . . . 12 ⊢ (0[,]π) ⊆ ℂ
46	45	sseli 3930	. . . . . . . . . . 11 ⊢ (𝑥 ∈ (0[,]π) → 𝑥 ∈ ℂ)
47	46	sincld 16224	. . . . . . . . . 10 ⊢ (𝑥 ∈ (0[,]π) → (sin‘𝑥) ∈ ℂ)
48	47	adantl 487	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → (sin‘𝑥) ∈ ℂ)
49	26	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → 𝑁 ∈ ℕ₀)
50	48, 49	expcld 14214	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → ((sin‘𝑥)↑𝑁) ∈ ℂ)
51	40	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 0 ∈ ℝ)
52	41	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → π ∈ ℝ)
53	46	adantl 487	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → 𝑥 ∈ ℂ)
54		eqid 2762	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁)) = (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁))
55	54	fvmpt2 7002	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ ℂ ∧ ((sin‘𝑥)↑𝑁) ∈ ℂ) → ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁))‘𝑥) = ((sin‘𝑥)↑𝑁))
56	53, 50, 55	syl2anc 596	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁))‘𝑥) = ((sin‘𝑥)↑𝑁))
57	56	eqcomd 2768	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → ((sin‘𝑥)↑𝑁) = ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁))‘𝑥))
58	57	mpteq2dva 5202	. . . . . . . . . 10 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑𝑁)) = (𝑥 ∈ (0[,]π) ↦ ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁))‘𝑥)))
59		nfmpt1 5208	. . . . . . . . . . 11 ⊢ Ⅎ𝑥(𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁))
60		nfcv 2924	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥sin
61		sincn 26687	. . . . . . . . . . . . 13 ⊢ sin ∈ (ℂ–cn→ℂ)
62	61	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → sin ∈ (ℂ–cn→ℂ))
63	60, 62, 26	expcnfg 46429	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁)) ∈ (ℂ–cn→ℂ))
64	45	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → (0[,]π) ⊆ ℂ)
65	59, 63, 64	cncfmptss 46425	. . . . . . . . . 10 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁))‘𝑥)) ∈ ((0[,]π)–cn→ℂ))
66	58, 65	eqeltrd 2862	. . . . . . . . 9 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑𝑁)) ∈ ((0[,]π)–cn→ℂ))
67		cniccibl 26075	. . . . . . . . 9 ⊢ ((0 ∈ ℝ ∧ π ∈ ℝ ∧ (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑𝑁)) ∈ ((0[,]π)–cn→ℂ)) → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑𝑁)) ∈ 𝐿¹)
68	51, 52, 66, 67	syl3anc 1398	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑𝑁)) ∈ 𝐿¹)
69	37, 39, 50, 68	iblss 26039	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ (0(,)π) ↦ ((sin‘𝑥)↑𝑁)) ∈ 𝐿¹)
70	35, 69	itgcl 26018	. . . . . 6 ⊢ (𝜑 → ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥 ∈ ℂ)
71	29, 70	eqeltrd 2862	. . . . 5 ⊢ (𝜑 → (𝐼‘𝑁) ∈ ℂ)
72	11, 71	adddirp1d 11263	. . . 4 ⊢ (𝜑 → (((𝑁 − 1) + 1) · (𝐼‘𝑁)) = (((𝑁 − 1) · (𝐼‘𝑁)) + (𝐼‘𝑁)))
73		eluz2b2 12974	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘2) ↔ (𝑁 ∈ ℕ ∧ 1 < 𝑁))
74	1, 73	sylib 221	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑁 ∈ ℕ ∧ 1 < 𝑁))
75	74	simpld 500	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ ℕ)
76		expm1t 14158	. . . . . . . . . 10 ⊢ (((sin‘𝑥) ∈ ℂ ∧ 𝑁 ∈ ℕ) → ((sin‘𝑥)↑𝑁) = (((sin‘𝑥)↑(𝑁 − 1)) · (sin‘𝑥)))
77	32, 75, 76	syl2anr 609	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑𝑁) = (((sin‘𝑥)↑(𝑁 − 1)) · (sin‘𝑥)))
78	77	itgeq2dv 26016	. . . . . . . 8 ⊢ (𝜑 → ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥 = ∫(0(,)π)(((sin‘𝑥)↑(𝑁 − 1)) · (sin‘𝑥)) d𝑥)
79		eqid 2762	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 1))) = (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 1)))
80		eqid 2762	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ -(cos‘𝑥)) = (𝑥 ∈ ℂ ↦ -(cos‘𝑥))
81		eqid 2762	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ (((𝑁 − 1) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) · (cos‘𝑥))) = (𝑥 ∈ ℂ ↦ (((𝑁 − 1) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) · (cos‘𝑥)))
82		eqid 2762	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ (((sin‘𝑥)↑(𝑁 − 1)) · (sin‘𝑥))) = (𝑥 ∈ ℂ ↦ (((sin‘𝑥)↑(𝑁 − 1)) · (sin‘𝑥)))
83		eqid 2762	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ ((((𝑁 − 1) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) · (cos‘𝑥)) · -(cos‘𝑥))) = (𝑥 ∈ ℂ ↦ ((((𝑁 − 1) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) · (cos‘𝑥)) · -(cos‘𝑥)))
84		eqid 2762	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ (((cos‘𝑥)↑2) · ((sin‘𝑥)↑((𝑁 − 1) − 1)))) = (𝑥 ∈ ℂ ↦ (((cos‘𝑥)↑2) · ((sin‘𝑥)↑((𝑁 − 1) − 1))))
85	79, 80, 81, 82, 83, 84, 10	itgsinexplem1 46790	. . . . . . . . 9 ⊢ (𝜑 → ∫(0(,)π)(((sin‘𝑥)↑(𝑁 − 1)) · (sin‘𝑥)) d𝑥 = ((𝑁 − 1) · ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) d𝑥))
86	4, 5, 5	subsub4d 11628	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((𝑁 − 1) − 1) = (𝑁 − (1 + 1)))
87		1p1e2 12392	. . . . . . . . . . . . . . . . 17 ⊢ (1 + 1) = 2
88	87	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (1 + 1) = 2)
89	88	oveq2d 7433	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑁 − (1 + 1)) = (𝑁 − 2))
90	86, 89	eqtrd 2797	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑁 − 1) − 1) = (𝑁 − 2))
91	90	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((𝑁 − 1) − 1) = (𝑁 − 2))
92	91	oveq2d 7433	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑((𝑁 − 1) − 1)) = ((sin‘𝑥)↑(𝑁 − 2)))
93	92	oveq2d 7433	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (((cos‘𝑥)↑2) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) = (((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))))
94	93	itgeq2dv 26016	. . . . . . . . . 10 ⊢ (𝜑 → ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) d𝑥 = ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) d𝑥)
95	94	oveq2d 7433	. . . . . . . . 9 ⊢ (𝜑 → ((𝑁 − 1) · ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) d𝑥) = ((𝑁 − 1) · ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) d𝑥))
96		sincossq 16270	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ ℂ → (((sin‘𝑥)↑2) + ((cos‘𝑥)↑2)) = 1)
97		1cnd 11230	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 ∈ ℂ → 1 ∈ ℂ)
98		sincl 16220	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ ℂ → (sin‘𝑥) ∈ ℂ)
99	98	sqcld 14212	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 ∈ ℂ → ((sin‘𝑥)↑2) ∈ ℂ)
100		coscl 16221	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ ℂ → (cos‘𝑥) ∈ ℂ)
101	100	sqcld 14212	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 ∈ ℂ → ((cos‘𝑥)↑2) ∈ ℂ)
102	97, 99, 101	subaddd 11615	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ ℂ → ((1 − ((sin‘𝑥)↑2)) = ((cos‘𝑥)↑2) ↔ (((sin‘𝑥)↑2) + ((cos‘𝑥)↑2)) = 1))
103	96, 102	mpbird 260	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ℂ → (1 − ((sin‘𝑥)↑2)) = ((cos‘𝑥)↑2))
104	103	eqcomd 2768	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ ℂ → ((cos‘𝑥)↑2) = (1 − ((sin‘𝑥)↑2)))
105	31, 104	syl 18	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ (0(,)π) → ((cos‘𝑥)↑2) = (1 − ((sin‘𝑥)↑2)))
106	105	oveq1d 7432	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ (0(,)π) → (((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) = ((1 − ((sin‘𝑥)↑2)) · ((sin‘𝑥)↑(𝑁 − 2))))
107	106	adantl 487	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) = ((1 − ((sin‘𝑥)↑2)) · ((sin‘𝑥)↑(𝑁 − 2))))
108	107	itgeq2dv 26016	. . . . . . . . . . 11 ⊢ (𝜑 → ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) d𝑥 = ∫(0(,)π)((1 − ((sin‘𝑥)↑2)) · ((sin‘𝑥)↑(𝑁 − 2))) d𝑥)
109		1cnd 11230	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → 1 ∈ ℂ)
110	32	sqcld 14212	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (0(,)π) → ((sin‘𝑥)↑2) ∈ ℂ)
111	110	adantl 487	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑2) ∈ ℂ)
112	90	eqcomd 2768	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝑁 − 2) = ((𝑁 − 1) − 1))
113		nnm1nn0 12573	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 − 1) ∈ ℕ → ((𝑁 − 1) − 1) ∈ ℕ₀)
114	10, 113	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((𝑁 − 1) − 1) ∈ ℕ₀)
115	112, 114	eqeltrd 2862	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑁 − 2) ∈ ℕ₀)
116	115	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (𝑁 − 2) ∈ ℕ₀)
117	33, 116	expcld 14214	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑(𝑁 − 2)) ∈ ℂ)
118	109, 111, 117	subdird 11699	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((1 − ((sin‘𝑥)↑2)) · ((sin‘𝑥)↑(𝑁 − 2))) = ((1 · ((sin‘𝑥)↑(𝑁 − 2))) − (((sin‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2)))))
119	117	mullidd 11255	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (1 · ((sin‘𝑥)↑(𝑁 − 2))) = ((sin‘𝑥)↑(𝑁 − 2)))
120	23	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → 2 ∈ ℕ₀)
121	33, 116, 120	expaddd 14216	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑(2 + (𝑁 − 2))) = (((sin‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))))
122	17, 4	pncan3d 11600	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (2 + (𝑁 − 2)) = 𝑁)
123	122	oveq2d 7433	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((sin‘𝑥)↑(2 + (𝑁 − 2))) = ((sin‘𝑥)↑𝑁))
124	123	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑(2 + (𝑁 − 2))) = ((sin‘𝑥)↑𝑁))
125	121, 124	eqtr3d 2799	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (((sin‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) = ((sin‘𝑥)↑𝑁))
126	119, 125	oveq12d 7435	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((1 · ((sin‘𝑥)↑(𝑁 − 2))) − (((sin‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2)))) = (((sin‘𝑥)↑(𝑁 − 2)) − ((sin‘𝑥)↑𝑁)))
127	118, 126	eqtrd 2797	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((1 − ((sin‘𝑥)↑2)) · ((sin‘𝑥)↑(𝑁 − 2))) = (((sin‘𝑥)↑(𝑁 − 2)) − ((sin‘𝑥)↑𝑁)))
128	127	itgeq2dv 26016	. . . . . . . . . . 11 ⊢ (𝜑 → ∫(0(,)π)((1 − ((sin‘𝑥)↑2)) · ((sin‘𝑥)↑(𝑁 − 2))) d𝑥 = ∫(0(,)π)(((sin‘𝑥)↑(𝑁 − 2)) − ((sin‘𝑥)↑𝑁)) d𝑥)
129	115	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → (𝑁 − 2) ∈ ℕ₀)
130	48, 129	expcld 14214	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → ((sin‘𝑥)↑(𝑁 − 2)) ∈ ℂ)
131		eqid 2762	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2))) = (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2)))
132	131	fvmpt2 7002	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑥 ∈ ℂ ∧ ((sin‘𝑥)↑(𝑁 − 2)) ∈ ℂ) → ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2)))‘𝑥) = ((sin‘𝑥)↑(𝑁 − 2)))
133	53, 130, 132	syl2anc 596	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2)))‘𝑥) = ((sin‘𝑥)↑(𝑁 − 2)))
134	133	eqcomd 2768	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → ((sin‘𝑥)↑(𝑁 − 2)) = ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2)))‘𝑥))
135	134	mpteq2dva 5202	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑(𝑁 − 2))) = (𝑥 ∈ (0[,]π) ↦ ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2)))‘𝑥)))
136		nfmpt1 5208	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑥(𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2)))
137	60, 62, 115	expcnfg 46429	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2))) ∈ (ℂ–cn→ℂ))
138	136, 137, 64	cncfmptss 46425	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2)))‘𝑥)) ∈ ((0[,]π)–cn→ℂ))
139	135, 138	eqeltrd 2862	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑(𝑁 − 2))) ∈ ((0[,]π)–cn→ℂ))
140		cniccibl 26075	. . . . . . . . . . . . . 14 ⊢ ((0 ∈ ℝ ∧ π ∈ ℝ ∧ (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑(𝑁 − 2))) ∈ ((0[,]π)–cn→ℂ)) → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑(𝑁 − 2))) ∈ 𝐿¹)
141	51, 52, 139, 140	syl3anc 1398	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑(𝑁 − 2))) ∈ 𝐿¹)
142	37, 39, 130, 141	iblss 26039	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑥 ∈ (0(,)π) ↦ ((sin‘𝑥)↑(𝑁 − 2))) ∈ 𝐿¹)
143	117, 142, 35, 69	itgsub 26060	. . . . . . . . . . 11 ⊢ (𝜑 → ∫(0(,)π)(((sin‘𝑥)↑(𝑁 − 2)) − ((sin‘𝑥)↑𝑁)) d𝑥 = (∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 − ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥))
144	108, 128, 143	3eqtrd 2801	. . . . . . . . . 10 ⊢ (𝜑 → ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) d𝑥 = (∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 − ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥))
145	144	oveq2d 7433	. . . . . . . . 9 ⊢ (𝜑 → ((𝑁 − 1) · ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) d𝑥) = ((𝑁 − 1) · (∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 − ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)))
146	85, 95, 145	3eqtrd 2801	. . . . . . . 8 ⊢ (𝜑 → ∫(0(,)π)(((sin‘𝑥)↑(𝑁 − 1)) · (sin‘𝑥)) d𝑥 = ((𝑁 − 1) · (∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 − ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)))
147	29, 78, 146	3eqtrd 2801	. . . . . . 7 ⊢ (𝜑 → (𝐼‘𝑁) = ((𝑁 − 1) · (∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 − ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)))
148		oveq2 7425	. . . . . . . . . . . 12 ⊢ (𝑛 = (𝑁 − 2) → ((sin‘𝑥)↑𝑛) = ((sin‘𝑥)↑(𝑁 − 2)))
149	148	adantr 486	. . . . . . . . . . 11 ⊢ ((𝑛 = (𝑁 − 2) ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑𝑛) = ((sin‘𝑥)↑(𝑁 − 2)))
150	149	itgeq2dv 26016	. . . . . . . . . 10 ⊢ (𝑛 = (𝑁 − 2) → ∫(0(,)π)((sin‘𝑥)↑𝑛) d𝑥 = ∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥)
151		itgex 26004	. . . . . . . . . . 11 ⊢ ∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 ∈ V
152	151	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → ∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 ∈ V)
153	12, 150, 115, 152	fvmptd3 7014	. . . . . . . . 9 ⊢ (𝜑 → (𝐼‘(𝑁 − 2)) = ∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥)
154	153, 29	oveq12d 7435	. . . . . . . 8 ⊢ (𝜑 → ((𝐼‘(𝑁 − 2)) − (𝐼‘𝑁)) = (∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 − ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥))
155	154	oveq2d 7433	. . . . . . 7 ⊢ (𝜑 → ((𝑁 − 1) · ((𝐼‘(𝑁 − 2)) − (𝐼‘𝑁))) = ((𝑁 − 1) · (∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 − ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)))
156	117, 142	itgcl 26018	. . . . . . . . 9 ⊢ (𝜑 → ∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 ∈ ℂ)
157	153, 156	eqeltrd 2862	. . . . . . . 8 ⊢ (𝜑 → (𝐼‘(𝑁 − 2)) ∈ ℂ)
158	11, 157, 71	subdid 11698	. . . . . . 7 ⊢ (𝜑 → ((𝑁 − 1) · ((𝐼‘(𝑁 − 2)) − (𝐼‘𝑁))) = (((𝑁 − 1) · (𝐼‘(𝑁 − 2))) − ((𝑁 − 1) · (𝐼‘𝑁))))
159	147, 155, 158	3eqtr2d 2803	. . . . . 6 ⊢ (𝜑 → (𝐼‘𝑁) = (((𝑁 − 1) · (𝐼‘(𝑁 − 2))) − ((𝑁 − 1) · (𝐼‘𝑁))))
160	159	eqcomd 2768	. . . . 5 ⊢ (𝜑 → (((𝑁 − 1) · (𝐼‘(𝑁 − 2))) − ((𝑁 − 1) · (𝐼‘𝑁))) = (𝐼‘𝑁))
161	11, 157	mulcld 11257	. . . . . 6 ⊢ (𝜑 → ((𝑁 − 1) · (𝐼‘(𝑁 − 2))) ∈ ℂ)
162	11, 71	mulcld 11257	. . . . . 6 ⊢ (𝜑 → ((𝑁 − 1) · (𝐼‘𝑁)) ∈ ℂ)
163	161, 162, 71	subaddd 11615	. . . . 5 ⊢ (𝜑 → ((((𝑁 − 1) · (𝐼‘(𝑁 − 2))) − ((𝑁 − 1) · (𝐼‘𝑁))) = (𝐼‘𝑁) ↔ (((𝑁 − 1) · (𝐼‘𝑁)) + (𝐼‘𝑁)) = ((𝑁 − 1) · (𝐼‘(𝑁 − 2)))))
164	160, 163	mpbid 235	. . . 4 ⊢ (𝜑 → (((𝑁 − 1) · (𝐼‘𝑁)) + (𝐼‘𝑁)) = ((𝑁 − 1) · (𝐼‘(𝑁 − 2))))
165	8, 72, 164	3eqtrd 2801	. . 3 ⊢ (𝜑 → (𝑁 · (𝐼‘𝑁)) = ((𝑁 − 1) · (𝐼‘(𝑁 − 2))))
166	165	oveq1d 7432	. 2 ⊢ (𝜑 → ((𝑁 · (𝐼‘𝑁)) / 𝑁) = (((𝑁 − 1) · (𝐼‘(𝑁 − 2))) / 𝑁))
167	75	nnne0d 12314	. . 3 ⊢ (𝜑 → 𝑁 ≠ 0)
168	71, 4, 167	divcan3d 12024	. 2 ⊢ (𝜑 → ((𝑁 · (𝐼‘𝑁)) / 𝑁) = (𝐼‘𝑁))
169	11, 157, 4, 167	div23d 12056	. 2 ⊢ (𝜑 → (((𝑁 − 1) · (𝐼‘(𝑁 − 2))) / 𝑁) = (((𝑁 − 1) / 𝑁) · (𝐼‘(𝑁 − 2))))
170	166, 168, 169	3eqtr3d 2805	1 ⊢ (𝜑 → (𝐼‘𝑁) = (((𝑁 − 1) / 𝑁) · (𝐼‘(𝑁 − 2))))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ∧ wa 401 = wceq 1570 ∈ wcel 2145 Vcvv 3453 ⊆ wss 3902 class class class wbr 5107 ↦ cmpt 5190 dom cdm 5659 ‘cfv 6537 (class class class)co 7417 ℂcc 11126 ℝcr 11127 0cc0 11128 1c1 11129 + caddc 11131 · cmul 11133 < clt 11271 − cmin 11469 -cneg 11470 / cdiv 11899 ℕcn 12261 2c2 12323 ℕ₀cn0 12532 ℤcz 12619 ℤ_≥cuz 12891 (,)cioo 13402 [,]cicc 13405 ↑cexp 14129 sincsin 16155 cosccos 16156 πcpi 16158 –cn→ccncf 25110 volcvol 25697 𝐿¹cibl 25851 ∫citg 25852

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2215 ax-ext 2734 ax-rep 5236 ax-sep 5255 ax-nul 5267 ax-pow 5334 ax-pr 5402 ax-un 7740 ax-inf2 9624 ax-cc 10441 ax-cnex 11184 ax-resscn 11185 ax-1cn 11186 ax-icn 11187 ax-addcl 11188 ax-addrcl 11189 ax-mulcl 11190 ax-mulrcl 11191 ax-mulcom 11192 ax-addass 11193 ax-mulass 11194 ax-distr 11195 ax-i2m1 11196 ax-1ne0 11197 ax-1rid 11198 ax-rnegex 11199 ax-rrecex 11200 ax-cnre 11201 ax-pre-lttri 11202 ax-pre-lttrn 11203 ax-pre-ltadd 11204 ax-pre-mulgt0 11205 ax-pre-sup 11206 ax-addf 11207

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2566 df-eu 2596 df-clab 2741 df-cleq 2754 df-clel 2837 df-nfc 2911 df-ne 2958 df-nel 3064 df-ral 3079 df-rex 3089 df-rmo 3367 df-reu 3368 df-rab 3415 df-v 3455 df-sbc 3743 df-csb 3851 df-dif 3905 df-un 3907 df-in 3909 df-ss 3919 df-pss 3922 df-symdif 4202 df-nul 4283 df-if 4486 df-pw 4562 df-sn 4588 df-pr 4590 df-tp 4592 df-op 4594 df-uni 4871 df-int 4911 df-iun 4956 df-iin 4957 df-disj 5075 df-br 5108 df-opab 5172 df-mpt 5191 df-tr 5217 df-id 5554 df-eprel 5559 df-po 5567 df-so 5568 df-fr 5612 df-se 5613 df-we 5614 df-xp 5665 df-rel 5666 df-cnv 5667 df-co 5668 df-dm 5669 df-rn 5670 df-res 5671 df-ima 5672 df-pred 6303 df-ord 6364 df-on 6365 df-lim 6366 df-suc 6367 df-iota 6493 df-fun 6539 df-fn 6540 df-f 6541 df-f1 6542 df-fo 6543 df-f1o 6544 df-fv 6545 df-isom 6546 df-riota 7374 df-ov 7420 df-oprab 7421 df-mpo 7422 df-of 7682 df-ofr 7683 df-om 7867 df-1st 7990 df-2nd 7991 df-supp 8163 df-frecs 8284 df-wrecs 8315 df-recs 8364 df-rdg 8403 df-1o 8459 df-2o 8460 df-oadd 8463 df-omul 8464 df-er 8700 df-map 8832 df-pm 8833 df-ixp 8909 df-en 8957 df-dom 8958 df-sdom 8959 df-fin 8960 df-fsupp 9336 df-fi 9385 df-sup 9416 df-inf 9417 df-oi 9486 df-dju 9910 df-card 9948 df-acn 9951 df-pnf 11273 df-mnf 11274 df-xr 11275 df-ltxr 11276 df-le 11277 df-sub 11471 df-neg 11472 df-div 11900 df-nn 12262 df-2 12331 df-3 12332 df-4 12333 df-5 12334 df-6 12335 df-7 12336 df-8 12337 df-9 12338 df-n0 12533 df-z 12620 df-dec 12741 df-uz 12892 df-q 13002 df-rp 13047 df-xneg 13167 df-xadd 13168 df-xmul 13169 df-ioo 13406 df-ioc 13407 df-ico 13408 df-icc 13409 df-fz 13566 df-fzo 13714 df-fl 13857 df-mod 13935 df-seq 14070 df-exp 14130 df-fac 14342 df-bc 14371 df-hash 14399 df-shft 15144 df-cj 15190 df-re 15191 df-im 15192 df-sqrt 15326 df-abs 15327 df-limsup 15562 df-clim 15579 df-rlim 15580 df-sum 15778 df-ef 16159 df-sin 16161 df-cos 16162 df-pi 16164 df-struct 17245 df-sets 17262 df-slot 17280 df-ndx 17292 df-base 17308 df-ress 17329 df-plusg 17361 df-mulr 17362 df-starv 17363 df-sca 17364 df-vsca 17365 df-ip 17366 df-tset 17367 df-ple 17368 df-ds 17370 df-unif 17371 df-hom 17372 df-cco 17373 df-rest 17513 df-topn 17514 df-0g 17532 df-gsum 17533 df-topgen 17534 df-pt 17535 df-prds 17538 df-xrs 17594 df-qtop 17599 df-imas 17600 df-xps 17602 df-mre 17676 df-mrc 17677 df-acs 17679 df-mgm 18736 df-sgrp 18827 df-mnd 18843 df-submnd 18898 df-mulg 19197 df-cntz 19450 df-cmn 19915 df-psmet 21583 df-xmet 21584 df-met 21585 df-bl 21586 df-mopn 21587 df-fbas 21588 df-fg 21589 df-cnfld 21592 df-top 23125 df-topon 23142 df-topsp 23164 df-bases 23177 df-cld 23250 df-ntr 23251 df-cls 23252 df-nei 23329 df-lp 23367 df-perf 23368 df-cn 23458 df-cnp 23459 df-haus 23546 df-cmp 23618 df-tx 23794 df-hmeo 23987 df-fil 24078 df-fm 24170 df-flim 24171 df-flf 24172 df-xms 24552 df-ms 24553 df-tms 24554 df-cncf 25112 df-ovol 25698 df-vol 25699 df-mbf 25853 df-itg1 25854 df-itg2 25855 df-ibl 25856 df-itg 25857 df-0p 25904 df-limc 26100 df-dv 26101

This theorem is used by: wallispilem2 46902 wallispilem4 46904 wallispilem5 46905

W3C validator