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 44316

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 12782	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 𝑁 ∈ ℤ)
3		zcn 12513	. . . . . . . 8 ⊢ (𝑁 ∈ ℤ → 𝑁 ∈ ℂ)
4	1, 2, 3	3syl 18	. . . . . . 7 ⊢ (𝜑 → 𝑁 ∈ ℂ)
5		1cnd 11159	. . . . . . 7 ⊢ (𝜑 → 1 ∈ ℂ)
6	4, 5	npcand 11525	. . . . . 6 ⊢ (𝜑 → ((𝑁 − 1) + 1) = 𝑁)
7	6	eqcomd 2737	. . . . 5 ⊢ (𝜑 → 𝑁 = ((𝑁 − 1) + 1))
8	7	oveq1d 7377	. . . 4 ⊢ (𝜑 → (𝑁 · (𝐼‘𝑁)) = (((𝑁 − 1) + 1) · (𝐼‘𝑁)))
9		uz2m1nn 12857	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − 1) ∈ ℕ)
10	1, 9	syl 17	. . . . . 6 ⊢ (𝜑 → (𝑁 − 1) ∈ ℕ)
11	10	nncnd 12178	. . . . 5 ⊢ (𝜑 → (𝑁 − 1) ∈ ℂ)
12		itgsinexp.1	. . . . . . . 8 ⊢ 𝐼 = (𝑛 ∈ ℕ₀ ↦ ∫(0(,)π)((sin‘𝑥)↑𝑛) d𝑥)
13	12	a1i 11	. . . . . . 7 ⊢ (𝜑 → 𝐼 = (𝑛 ∈ ℕ₀ ↦ ∫(0(,)π)((sin‘𝑥)↑𝑛) d𝑥))
14		oveq2 7370	. . . . . . . . 9 ⊢ (𝑛 = 𝑁 → ((sin‘𝑥)↑𝑛) = ((sin‘𝑥)↑𝑁))
15	14	ad2antlr 725	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 = 𝑁) ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑𝑛) = ((sin‘𝑥)↑𝑁))
16	15	itgeq2dv 25183	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 = 𝑁) → ∫(0(,)π)((sin‘𝑥)↑𝑛) d𝑥 = ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)
17		2cnd 12240	. . . . . . . . 9 ⊢ (𝜑 → 2 ∈ ℂ)
18		npcan 11419	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℂ ∧ 2 ∈ ℂ) → ((𝑁 − 2) + 2) = 𝑁)
19	18	eqcomd 2737	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℂ ∧ 2 ∈ ℂ) → 𝑁 = ((𝑁 − 2) + 2))
20	4, 17, 19	syl2anc 584	. . . . . . . 8 ⊢ (𝜑 → 𝑁 = ((𝑁 − 2) + 2))
21		uznn0sub 12811	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − 2) ∈ ℕ₀)
22	1, 21	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (𝑁 − 2) ∈ ℕ₀)
23		2nn0 12439	. . . . . . . . . 10 ⊢ 2 ∈ ℕ₀
24	23	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 2 ∈ ℕ₀)
25	22, 24	nn0addcld 12486	. . . . . . . 8 ⊢ (𝜑 → ((𝑁 − 2) + 2) ∈ ℕ₀)
26	20, 25	eqeltrd 2832	. . . . . . 7 ⊢ (𝜑 → 𝑁 ∈ ℕ₀)
27		itgex 25172	. . . . . . . 8 ⊢ ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥 ∈ V
28	27	a1i 11	. . . . . . 7 ⊢ (𝜑 → ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥 ∈ V)
29	13, 16, 26, 28	fvmptd 6960	. . . . . 6 ⊢ (𝜑 → (𝐼‘𝑁) = ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)
30		ioosscn 13336	. . . . . . . . . . 11 ⊢ (0(,)π) ⊆ ℂ
31	30	sseli 3943	. . . . . . . . . 10 ⊢ (𝑥 ∈ (0(,)π) → 𝑥 ∈ ℂ)
32	31	sincld 16023	. . . . . . . . 9 ⊢ (𝑥 ∈ (0(,)π) → (sin‘𝑥) ∈ ℂ)
33	32	adantl 482	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (sin‘𝑥) ∈ ℂ)
34	26	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → 𝑁 ∈ ℕ₀)
35	33, 34	expcld 14061	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑𝑁) ∈ ℂ)
36		ioossicc 13360	. . . . . . . . 9 ⊢ (0(,)π) ⊆ (0[,]π)
37	36	a1i 11	. . . . . . . 8 ⊢ (𝜑 → (0(,)π) ⊆ (0[,]π))
38		ioombl 24966	. . . . . . . . 9 ⊢ (0(,)π) ∈ dom vol
39	38	a1i 11	. . . . . . . 8 ⊢ (𝜑 → (0(,)π) ∈ dom vol)
40		0re 11166	. . . . . . . . . . . . . 14 ⊢ 0 ∈ ℝ
41		pire 25852	. . . . . . . . . . . . . 14 ⊢ π ∈ ℝ
42		iccssre 13356	. . . . . . . . . . . . . 14 ⊢ ((0 ∈ ℝ ∧ π ∈ ℝ) → (0[,]π) ⊆ ℝ)
43	40, 41, 42	mp2an 690	. . . . . . . . . . . . 13 ⊢ (0[,]π) ⊆ ℝ
44		ax-resscn 11117	. . . . . . . . . . . . 13 ⊢ ℝ ⊆ ℂ
45	43, 44	sstri 3956	. . . . . . . . . . . 12 ⊢ (0[,]π) ⊆ ℂ
46	45	sseli 3943	. . . . . . . . . . 11 ⊢ (𝑥 ∈ (0[,]π) → 𝑥 ∈ ℂ)
47	46	sincld 16023	. . . . . . . . . 10 ⊢ (𝑥 ∈ (0[,]π) → (sin‘𝑥) ∈ ℂ)
48	47	adantl 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → (sin‘𝑥) ∈ ℂ)
49	26	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → 𝑁 ∈ ℕ₀)
50	48, 49	expcld 14061	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → ((sin‘𝑥)↑𝑁) ∈ ℂ)
51	40	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 0 ∈ ℝ)
52	41	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → π ∈ ℝ)
53	46	adantl 482	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → 𝑥 ∈ ℂ)
54		eqid 2731	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁)) = (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁))
55	54	fvmpt2 6964	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ ℂ ∧ ((sin‘𝑥)↑𝑁) ∈ ℂ) → ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁))‘𝑥) = ((sin‘𝑥)↑𝑁))
56	53, 50, 55	syl2anc 584	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁))‘𝑥) = ((sin‘𝑥)↑𝑁))
57	56	eqcomd 2737	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → ((sin‘𝑥)↑𝑁) = ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁))‘𝑥))
58	57	mpteq2dva 5210	. . . . . . . . . 10 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑𝑁)) = (𝑥 ∈ (0[,]π) ↦ ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁))‘𝑥)))
59		nfmpt1 5218	. . . . . . . . . . 11 ⊢ Ⅎ𝑥(𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁))
60		nfcv 2902	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥sin
61		sincn 25840	. . . . . . . . . . . . 13 ⊢ sin ∈ (ℂ–cn→ℂ)
62	61	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → sin ∈ (ℂ–cn→ℂ))
63	60, 62, 26	expcnfg 43952	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁)) ∈ (ℂ–cn→ℂ))
64	45	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → (0[,]π) ⊆ ℂ)
65	59, 63, 64	cncfmptss 43948	. . . . . . . . . 10 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑𝑁))‘𝑥)) ∈ ((0[,]π)–cn→ℂ))
66	58, 65	eqeltrd 2832	. . . . . . . . 9 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑𝑁)) ∈ ((0[,]π)–cn→ℂ))
67		cniccibl 25242	. . . . . . . . 9 ⊢ ((0 ∈ ℝ ∧ π ∈ ℝ ∧ (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑𝑁)) ∈ ((0[,]π)–cn→ℂ)) → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑𝑁)) ∈ 𝐿¹)
68	51, 52, 66, 67	syl3anc 1371	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑𝑁)) ∈ 𝐿¹)
69	37, 39, 50, 68	iblss 25206	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ (0(,)π) ↦ ((sin‘𝑥)↑𝑁)) ∈ 𝐿¹)
70	35, 69	itgcl 25185	. . . . . 6 ⊢ (𝜑 → ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥 ∈ ℂ)
71	29, 70	eqeltrd 2832	. . . . 5 ⊢ (𝜑 → (𝐼‘𝑁) ∈ ℂ)
72	11, 71	adddirp1d 11190	. . . 4 ⊢ (𝜑 → (((𝑁 − 1) + 1) · (𝐼‘𝑁)) = (((𝑁 − 1) · (𝐼‘𝑁)) + (𝐼‘𝑁)))
73		eluz2b2 12855	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ (ℤ_≥‘2) ↔ (𝑁 ∈ ℕ ∧ 1 < 𝑁))
74	1, 73	sylib 217	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑁 ∈ ℕ ∧ 1 < 𝑁))
75	74	simpld 495	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ ℕ)
76		expm1t 14006	. . . . . . . . . 10 ⊢ (((sin‘𝑥) ∈ ℂ ∧ 𝑁 ∈ ℕ) → ((sin‘𝑥)↑𝑁) = (((sin‘𝑥)↑(𝑁 − 1)) · (sin‘𝑥)))
77	32, 75, 76	syl2anr 597	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑𝑁) = (((sin‘𝑥)↑(𝑁 − 1)) · (sin‘𝑥)))
78	77	itgeq2dv 25183	. . . . . . . 8 ⊢ (𝜑 → ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥 = ∫(0(,)π)(((sin‘𝑥)↑(𝑁 − 1)) · (sin‘𝑥)) d𝑥)
79		eqid 2731	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 1))) = (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 1)))
80		eqid 2731	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ -(cos‘𝑥)) = (𝑥 ∈ ℂ ↦ -(cos‘𝑥))
81		eqid 2731	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ (((𝑁 − 1) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) · (cos‘𝑥))) = (𝑥 ∈ ℂ ↦ (((𝑁 − 1) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) · (cos‘𝑥)))
82		eqid 2731	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ (((sin‘𝑥)↑(𝑁 − 1)) · (sin‘𝑥))) = (𝑥 ∈ ℂ ↦ (((sin‘𝑥)↑(𝑁 − 1)) · (sin‘𝑥)))
83		eqid 2731	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ ((((𝑁 − 1) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) · (cos‘𝑥)) · -(cos‘𝑥))) = (𝑥 ∈ ℂ ↦ ((((𝑁 − 1) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) · (cos‘𝑥)) · -(cos‘𝑥)))
84		eqid 2731	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℂ ↦ (((cos‘𝑥)↑2) · ((sin‘𝑥)↑((𝑁 − 1) − 1)))) = (𝑥 ∈ ℂ ↦ (((cos‘𝑥)↑2) · ((sin‘𝑥)↑((𝑁 − 1) − 1))))
85	79, 80, 81, 82, 83, 84, 10	itgsinexplem1 44315	. . . . . . . . 9 ⊢ (𝜑 → ∫(0(,)π)(((sin‘𝑥)↑(𝑁 − 1)) · (sin‘𝑥)) d𝑥 = ((𝑁 − 1) · ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) d𝑥))
86	4, 5, 5	subsub4d 11552	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((𝑁 − 1) − 1) = (𝑁 − (1 + 1)))
87		1p1e2 12287	. . . . . . . . . . . . . . . . 17 ⊢ (1 + 1) = 2
88	87	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (1 + 1) = 2)
89	88	oveq2d 7378	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑁 − (1 + 1)) = (𝑁 − 2))
90	86, 89	eqtrd 2771	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑁 − 1) − 1) = (𝑁 − 2))
91	90	adantr 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((𝑁 − 1) − 1) = (𝑁 − 2))
92	91	oveq2d 7378	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑((𝑁 − 1) − 1)) = ((sin‘𝑥)↑(𝑁 − 2)))
93	92	oveq2d 7378	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (((cos‘𝑥)↑2) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) = (((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))))
94	93	itgeq2dv 25183	. . . . . . . . . 10 ⊢ (𝜑 → ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) d𝑥 = ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) d𝑥)
95	94	oveq2d 7378	. . . . . . . . 9 ⊢ (𝜑 → ((𝑁 − 1) · ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑((𝑁 − 1) − 1))) d𝑥) = ((𝑁 − 1) · ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) d𝑥))
96		sincossq 16069	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ ℂ → (((sin‘𝑥)↑2) + ((cos‘𝑥)↑2)) = 1)
97		1cnd 11159	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 ∈ ℂ → 1 ∈ ℂ)
98		sincl 16019	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ ℂ → (sin‘𝑥) ∈ ℂ)
99	98	sqcld 14059	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 ∈ ℂ → ((sin‘𝑥)↑2) ∈ ℂ)
100		coscl 16020	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ ℂ → (cos‘𝑥) ∈ ℂ)
101	100	sqcld 14059	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 ∈ ℂ → ((cos‘𝑥)↑2) ∈ ℂ)
102	97, 99, 101	subaddd 11539	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ ℂ → ((1 − ((sin‘𝑥)↑2)) = ((cos‘𝑥)↑2) ↔ (((sin‘𝑥)↑2) + ((cos‘𝑥)↑2)) = 1))
103	96, 102	mpbird 256	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ℂ → (1 − ((sin‘𝑥)↑2)) = ((cos‘𝑥)↑2))
104	103	eqcomd 2737	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ ℂ → ((cos‘𝑥)↑2) = (1 − ((sin‘𝑥)↑2)))
105	31, 104	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ (0(,)π) → ((cos‘𝑥)↑2) = (1 − ((sin‘𝑥)↑2)))
106	105	oveq1d 7377	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ (0(,)π) → (((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) = ((1 − ((sin‘𝑥)↑2)) · ((sin‘𝑥)↑(𝑁 − 2))))
107	106	adantl 482	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) = ((1 − ((sin‘𝑥)↑2)) · ((sin‘𝑥)↑(𝑁 − 2))))
108	107	itgeq2dv 25183	. . . . . . . . . . 11 ⊢ (𝜑 → ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) d𝑥 = ∫(0(,)π)((1 − ((sin‘𝑥)↑2)) · ((sin‘𝑥)↑(𝑁 − 2))) d𝑥)
109		1cnd 11159	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → 1 ∈ ℂ)
110	32	sqcld 14059	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (0(,)π) → ((sin‘𝑥)↑2) ∈ ℂ)
111	110	adantl 482	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑2) ∈ ℂ)
112	90	eqcomd 2737	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝑁 − 2) = ((𝑁 − 1) − 1))
113		nnm1nn0 12463	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑁 − 1) ∈ ℕ → ((𝑁 − 1) − 1) ∈ ℕ₀)
114	10, 113	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((𝑁 − 1) − 1) ∈ ℕ₀)
115	112, 114	eqeltrd 2832	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑁 − 2) ∈ ℕ₀)
116	115	adantr 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (𝑁 − 2) ∈ ℕ₀)
117	33, 116	expcld 14061	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑(𝑁 − 2)) ∈ ℂ)
118	109, 111, 117	subdird 11621	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((1 − ((sin‘𝑥)↑2)) · ((sin‘𝑥)↑(𝑁 − 2))) = ((1 · ((sin‘𝑥)↑(𝑁 − 2))) − (((sin‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2)))))
119	117	mullidd 11182	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (1 · ((sin‘𝑥)↑(𝑁 − 2))) = ((sin‘𝑥)↑(𝑁 − 2)))
120	23	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → 2 ∈ ℕ₀)
121	33, 116, 120	expaddd 14063	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑(2 + (𝑁 − 2))) = (((sin‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))))
122	17, 4	pncan3d 11524	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (2 + (𝑁 − 2)) = 𝑁)
123	122	oveq2d 7378	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((sin‘𝑥)↑(2 + (𝑁 − 2))) = ((sin‘𝑥)↑𝑁))
124	123	adantr 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑(2 + (𝑁 − 2))) = ((sin‘𝑥)↑𝑁))
125	121, 124	eqtr3d 2773	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (((sin‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) = ((sin‘𝑥)↑𝑁))
126	119, 125	oveq12d 7380	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((1 · ((sin‘𝑥)↑(𝑁 − 2))) − (((sin‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2)))) = (((sin‘𝑥)↑(𝑁 − 2)) − ((sin‘𝑥)↑𝑁)))
127	118, 126	eqtrd 2771	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((1 − ((sin‘𝑥)↑2)) · ((sin‘𝑥)↑(𝑁 − 2))) = (((sin‘𝑥)↑(𝑁 − 2)) − ((sin‘𝑥)↑𝑁)))
128	127	itgeq2dv 25183	. . . . . . . . . . 11 ⊢ (𝜑 → ∫(0(,)π)((1 − ((sin‘𝑥)↑2)) · ((sin‘𝑥)↑(𝑁 − 2))) d𝑥 = ∫(0(,)π)(((sin‘𝑥)↑(𝑁 − 2)) − ((sin‘𝑥)↑𝑁)) d𝑥)
129	115	adantr 481	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → (𝑁 − 2) ∈ ℕ₀)
130	48, 129	expcld 14061	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → ((sin‘𝑥)↑(𝑁 − 2)) ∈ ℂ)
131		eqid 2731	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2))) = (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2)))
132	131	fvmpt2 6964	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑥 ∈ ℂ ∧ ((sin‘𝑥)↑(𝑁 − 2)) ∈ ℂ) → ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2)))‘𝑥) = ((sin‘𝑥)↑(𝑁 − 2)))
133	53, 130, 132	syl2anc 584	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2)))‘𝑥) = ((sin‘𝑥)↑(𝑁 − 2)))
134	133	eqcomd 2737	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]π)) → ((sin‘𝑥)↑(𝑁 − 2)) = ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2)))‘𝑥))
135	134	mpteq2dva 5210	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑(𝑁 − 2))) = (𝑥 ∈ (0[,]π) ↦ ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2)))‘𝑥)))
136		nfmpt1 5218	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑥(𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2)))
137	60, 62, 115	expcnfg 43952	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2))) ∈ (ℂ–cn→ℂ))
138	136, 137, 64	cncfmptss 43948	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((𝑥 ∈ ℂ ↦ ((sin‘𝑥)↑(𝑁 − 2)))‘𝑥)) ∈ ((0[,]π)–cn→ℂ))
139	135, 138	eqeltrd 2832	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑(𝑁 − 2))) ∈ ((0[,]π)–cn→ℂ))
140		cniccibl 25242	. . . . . . . . . . . . . 14 ⊢ ((0 ∈ ℝ ∧ π ∈ ℝ ∧ (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑(𝑁 − 2))) ∈ ((0[,]π)–cn→ℂ)) → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑(𝑁 − 2))) ∈ 𝐿¹)
141	51, 52, 139, 140	syl3anc 1371	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑥 ∈ (0[,]π) ↦ ((sin‘𝑥)↑(𝑁 − 2))) ∈ 𝐿¹)
142	37, 39, 130, 141	iblss 25206	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑥 ∈ (0(,)π) ↦ ((sin‘𝑥)↑(𝑁 − 2))) ∈ 𝐿¹)
143	117, 142, 35, 69	itgsub 25227	. . . . . . . . . . 11 ⊢ (𝜑 → ∫(0(,)π)(((sin‘𝑥)↑(𝑁 − 2)) − ((sin‘𝑥)↑𝑁)) d𝑥 = (∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 − ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥))
144	108, 128, 143	3eqtrd 2775	. . . . . . . . . 10 ⊢ (𝜑 → ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) d𝑥 = (∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 − ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥))
145	144	oveq2d 7378	. . . . . . . . 9 ⊢ (𝜑 → ((𝑁 − 1) · ∫(0(,)π)(((cos‘𝑥)↑2) · ((sin‘𝑥)↑(𝑁 − 2))) d𝑥) = ((𝑁 − 1) · (∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 − ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)))
146	85, 95, 145	3eqtrd 2775	. . . . . . . 8 ⊢ (𝜑 → ∫(0(,)π)(((sin‘𝑥)↑(𝑁 − 1)) · (sin‘𝑥)) d𝑥 = ((𝑁 − 1) · (∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 − ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)))
147	29, 78, 146	3eqtrd 2775	. . . . . . 7 ⊢ (𝜑 → (𝐼‘𝑁) = ((𝑁 − 1) · (∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 − ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)))
148		oveq2 7370	. . . . . . . . . . . 12 ⊢ (𝑛 = (𝑁 − 2) → ((sin‘𝑥)↑𝑛) = ((sin‘𝑥)↑(𝑁 − 2)))
149	148	adantr 481	. . . . . . . . . . 11 ⊢ ((𝑛 = (𝑁 − 2) ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑𝑛) = ((sin‘𝑥)↑(𝑁 − 2)))
150	149	itgeq2dv 25183	. . . . . . . . . 10 ⊢ (𝑛 = (𝑁 − 2) → ∫(0(,)π)((sin‘𝑥)↑𝑛) d𝑥 = ∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥)
151		itgex 25172	. . . . . . . . . . 11 ⊢ ∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 ∈ V
152	151	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → ∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 ∈ V)
153	12, 150, 115, 152	fvmptd3 6976	. . . . . . . . 9 ⊢ (𝜑 → (𝐼‘(𝑁 − 2)) = ∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥)
154	153, 29	oveq12d 7380	. . . . . . . 8 ⊢ (𝜑 → ((𝐼‘(𝑁 − 2)) − (𝐼‘𝑁)) = (∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 − ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥))
155	154	oveq2d 7378	. . . . . . 7 ⊢ (𝜑 → ((𝑁 − 1) · ((𝐼‘(𝑁 − 2)) − (𝐼‘𝑁))) = ((𝑁 − 1) · (∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 − ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)))
156	117, 142	itgcl 25185	. . . . . . . . 9 ⊢ (𝜑 → ∫(0(,)π)((sin‘𝑥)↑(𝑁 − 2)) d𝑥 ∈ ℂ)
157	153, 156	eqeltrd 2832	. . . . . . . 8 ⊢ (𝜑 → (𝐼‘(𝑁 − 2)) ∈ ℂ)
158	11, 157, 71	subdid 11620	. . . . . . 7 ⊢ (𝜑 → ((𝑁 − 1) · ((𝐼‘(𝑁 − 2)) − (𝐼‘𝑁))) = (((𝑁 − 1) · (𝐼‘(𝑁 − 2))) − ((𝑁 − 1) · (𝐼‘𝑁))))
159	147, 155, 158	3eqtr2d 2777	. . . . . 6 ⊢ (𝜑 → (𝐼‘𝑁) = (((𝑁 − 1) · (𝐼‘(𝑁 − 2))) − ((𝑁 − 1) · (𝐼‘𝑁))))
160	159	eqcomd 2737	. . . . 5 ⊢ (𝜑 → (((𝑁 − 1) · (𝐼‘(𝑁 − 2))) − ((𝑁 − 1) · (𝐼‘𝑁))) = (𝐼‘𝑁))
161	11, 157	mulcld 11184	. . . . . 6 ⊢ (𝜑 → ((𝑁 − 1) · (𝐼‘(𝑁 − 2))) ∈ ℂ)
162	11, 71	mulcld 11184	. . . . . 6 ⊢ (𝜑 → ((𝑁 − 1) · (𝐼‘𝑁)) ∈ ℂ)
163	161, 162, 71	subaddd 11539	. . . . 5 ⊢ (𝜑 → ((((𝑁 − 1) · (𝐼‘(𝑁 − 2))) − ((𝑁 − 1) · (𝐼‘𝑁))) = (𝐼‘𝑁) ↔ (((𝑁 − 1) · (𝐼‘𝑁)) + (𝐼‘𝑁)) = ((𝑁 − 1) · (𝐼‘(𝑁 − 2)))))
164	160, 163	mpbid 231	. . . 4 ⊢ (𝜑 → (((𝑁 − 1) · (𝐼‘𝑁)) + (𝐼‘𝑁)) = ((𝑁 − 1) · (𝐼‘(𝑁 − 2))))
165	8, 72, 164	3eqtrd 2775	. . 3 ⊢ (𝜑 → (𝑁 · (𝐼‘𝑁)) = ((𝑁 − 1) · (𝐼‘(𝑁 − 2))))
166	165	oveq1d 7377	. 2 ⊢ (𝜑 → ((𝑁 · (𝐼‘𝑁)) / 𝑁) = (((𝑁 − 1) · (𝐼‘(𝑁 − 2))) / 𝑁))
167	75	nnne0d 12212	. . 3 ⊢ (𝜑 → 𝑁 ≠ 0)
168	71, 4, 167	divcan3d 11945	. 2 ⊢ (𝜑 → ((𝑁 · (𝐼‘𝑁)) / 𝑁) = (𝐼‘𝑁))
169	11, 157, 4, 167	div23d 11977	. 2 ⊢ (𝜑 → (((𝑁 − 1) · (𝐼‘(𝑁 − 2))) / 𝑁) = (((𝑁 − 1) / 𝑁) · (𝐼‘(𝑁 − 2))))
170	166, 168, 169	3eqtr3d 2779	1 ⊢ (𝜑 → (𝐼‘𝑁) = (((𝑁 − 1) / 𝑁) · (𝐼‘(𝑁 − 2))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 396 = wceq 1541 ∈ wcel 2106 Vcvv 3446 ⊆ wss 3913 class class class wbr 5110 ↦ cmpt 5193 dom cdm 5638 ‘cfv 6501 (class class class)co 7362 ℂcc 11058 ℝcr 11059 0cc0 11060 1c1 11061 + caddc 11063 · cmul 11065 < clt 11198 − cmin 11394 -cneg 11395 / cdiv 11821 ℕcn 12162 2c2 12217 ℕ₀cn0 12422 ℤcz 12508 ℤ_≥cuz 12772 (,)cioo 13274 [,]cicc 13277 ↑cexp 13977 sincsin 15957 cosccos 15958 πcpi 15960 –cn→ccncf 24276 volcvol 24864 𝐿¹cibl 25018 ∫citg 25019

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1913 ax-6 1971 ax-7 2011 ax-8 2108 ax-9 2116 ax-10 2137 ax-11 2154 ax-12 2171 ax-ext 2702 ax-rep 5247 ax-sep 5261 ax-nul 5268 ax-pow 5325 ax-pr 5389 ax-un 7677 ax-inf2 9586 ax-cc 10380 ax-cnex 11116 ax-resscn 11117 ax-1cn 11118 ax-icn 11119 ax-addcl 11120 ax-addrcl 11121 ax-mulcl 11122 ax-mulrcl 11123 ax-mulcom 11124 ax-addass 11125 ax-mulass 11126 ax-distr 11127 ax-i2m1 11128 ax-1ne0 11129 ax-1rid 11130 ax-rnegex 11131 ax-rrecex 11132 ax-cnre 11133 ax-pre-lttri 11134 ax-pre-lttrn 11135 ax-pre-ltadd 11136 ax-pre-mulgt0 11137 ax-pre-sup 11138 ax-addf 11139 ax-mulf 11140

This theorem depends on definitions: df-bi 206 df-an 397 df-or 846 df-3or 1088 df-3an 1089 df-tru 1544 df-fal 1554 df-ex 1782 df-nf 1786 df-sb 2068 df-mo 2533 df-eu 2562 df-clab 2709 df-cleq 2723 df-clel 2809 df-nfc 2884 df-ne 2940 df-nel 3046 df-ral 3061 df-rex 3070 df-rmo 3351 df-reu 3352 df-rab 3406 df-v 3448 df-sbc 3743 df-csb 3859 df-dif 3916 df-un 3918 df-in 3920 df-ss 3930 df-pss 3932 df-symdif 4207 df-nul 4288 df-if 4492 df-pw 4567 df-sn 4592 df-pr 4594 df-tp 4596 df-op 4598 df-uni 4871 df-int 4913 df-iun 4961 df-iin 4962 df-disj 5076 df-br 5111 df-opab 5173 df-mpt 5194 df-tr 5228 df-id 5536 df-eprel 5542 df-po 5550 df-so 5551 df-fr 5593 df-se 5594 df-we 5595 df-xp 5644 df-rel 5645 df-cnv 5646 df-co 5647 df-dm 5648 df-rn 5649 df-res 5650 df-ima 5651 df-pred 6258 df-ord 6325 df-on 6326 df-lim 6327 df-suc 6328 df-iota 6453 df-fun 6503 df-fn 6504 df-f 6505 df-f1 6506 df-fo 6507 df-f1o 6508 df-fv 6509 df-isom 6510 df-riota 7318 df-ov 7365 df-oprab 7366 df-mpo 7367 df-of 7622 df-ofr 7623 df-om 7808 df-1st 7926 df-2nd 7927 df-supp 8098 df-frecs 8217 df-wrecs 8248 df-recs 8322 df-rdg 8361 df-1o 8417 df-2o 8418 df-oadd 8421 df-omul 8422 df-er 8655 df-map 8774 df-pm 8775 df-ixp 8843 df-en 8891 df-dom 8892 df-sdom 8893 df-fin 8894 df-fsupp 9313 df-fi 9356 df-sup 9387 df-inf 9388 df-oi 9455 df-dju 9846 df-card 9884 df-acn 9887 df-pnf 11200 df-mnf 11201 df-xr 11202 df-ltxr 11203 df-le 11204 df-sub 11396 df-neg 11397 df-div 11822 df-nn 12163 df-2 12225 df-3 12226 df-4 12227 df-5 12228 df-6 12229 df-7 12230 df-8 12231 df-9 12232 df-n0 12423 df-z 12509 df-dec 12628 df-uz 12773 df-q 12883 df-rp 12925 df-xneg 13042 df-xadd 13043 df-xmul 13044 df-ioo 13278 df-ioc 13279 df-ico 13280 df-icc 13281 df-fz 13435 df-fzo 13578 df-fl 13707 df-mod 13785 df-seq 13917 df-exp 13978 df-fac 14184 df-bc 14213 df-hash 14241 df-shft 14964 df-cj 14996 df-re 14997 df-im 14998 df-sqrt 15132 df-abs 15133 df-limsup 15365 df-clim 15382 df-rlim 15383 df-sum 15583 df-ef 15961 df-sin 15963 df-cos 15964 df-pi 15966 df-struct 17030 df-sets 17047 df-slot 17065 df-ndx 17077 df-base 17095 df-ress 17124 df-plusg 17160 df-mulr 17161 df-starv 17162 df-sca 17163 df-vsca 17164 df-ip 17165 df-tset 17166 df-ple 17167 df-ds 17169 df-unif 17170 df-hom 17171 df-cco 17172 df-rest 17318 df-topn 17319 df-0g 17337 df-gsum 17338 df-topgen 17339 df-pt 17340 df-prds 17343 df-xrs 17398 df-qtop 17403 df-imas 17404 df-xps 17406 df-mre 17480 df-mrc 17481 df-acs 17483 df-mgm 18511 df-sgrp 18560 df-mnd 18571 df-submnd 18616 df-mulg 18887 df-cntz 19111 df-cmn 19578 df-psmet 20825 df-xmet 20826 df-met 20827 df-bl 20828 df-mopn 20829 df-fbas 20830 df-fg 20831 df-cnfld 20834 df-top 22280 df-topon 22297 df-topsp 22319 df-bases 22333 df-cld 22407 df-ntr 22408 df-cls 22409 df-nei 22486 df-lp 22524 df-perf 22525 df-cn 22615 df-cnp 22616 df-haus 22703 df-cmp 22775 df-tx 22950 df-hmeo 23143 df-fil 23234 df-fm 23326 df-flim 23327 df-flf 23328 df-xms 23710 df-ms 23711 df-tms 23712 df-cncf 24278 df-ovol 24865 df-vol 24866 df-mbf 25020 df-itg1 25021 df-itg2 25022 df-ibl 25023 df-itg 25024 df-0p 25071 df-limc 25267 df-dv 25268

This theorem is referenced by: wallispilem2 44427 wallispilem4 44429 wallispilem5 44430

W3C validator