wallispilem1 - Mathbox for Glauco Siliprandi

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

Theorem wallispilem1 46516

Description: 𝐼 is monotone: increasing the exponent, the integral decreases. (Contributed by Glauco Siliprandi, 29-Jun-2017.)

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

**Assertion**
Ref	Expression
wallispilem1	⊢ (𝜑 → (𝐼‘(𝑁 + 1)) ≤ (𝐼‘𝑁))

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

**Proof of Theorem wallispilem1**
Step	Hyp	Ref	Expression
1		0re 11138	. . . . 5 ⊢ 0 ∈ ℝ
2	1	a1i 11	. . . 4 ⊢ (𝜑 → 0 ∈ ℝ)
3		pire 26440	. . . . 5 ⊢ π ∈ ℝ
4	3	a1i 11	. . . 4 ⊢ (𝜑 → π ∈ ℝ)
5		wallispilem1.2	. . . . 5 ⊢ (𝜑 → 𝑁 ∈ ℕ₀)
6		peano2nn0 12469	. . . . 5 ⊢ (𝑁 ∈ ℕ₀ → (𝑁 + 1) ∈ ℕ₀)
7	5, 6	syl 17	. . . 4 ⊢ (𝜑 → (𝑁 + 1) ∈ ℕ₀)
8		iblioosinexp 46404	. . . 4 ⊢ ((0 ∈ ℝ ∧ π ∈ ℝ ∧ (𝑁 + 1) ∈ ℕ₀) → (𝑥 ∈ (0(,)π) ↦ ((sin‘𝑥)↑(𝑁 + 1))) ∈ 𝐿¹)
9	2, 4, 7, 8	syl3anc 1379	. . 3 ⊢ (𝜑 → (𝑥 ∈ (0(,)π) ↦ ((sin‘𝑥)↑(𝑁 + 1))) ∈ 𝐿¹)
10		iblioosinexp 46404	. . . 4 ⊢ ((0 ∈ ℝ ∧ π ∈ ℝ ∧ 𝑁 ∈ ℕ₀) → (𝑥 ∈ (0(,)π) ↦ ((sin‘𝑥)↑𝑁)) ∈ 𝐿¹)
11	2, 4, 5, 10	syl3anc 1379	. . 3 ⊢ (𝜑 → (𝑥 ∈ (0(,)π) ↦ ((sin‘𝑥)↑𝑁)) ∈ 𝐿¹)
12		elioore 13320	. . . . . 6 ⊢ (𝑥 ∈ (0(,)π) → 𝑥 ∈ ℝ)
13	12	resincld 16102	. . . . 5 ⊢ (𝑥 ∈ (0(,)π) → (sin‘𝑥) ∈ ℝ)
14	13	adantl 482	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (sin‘𝑥) ∈ ℝ)
15	7	adantr 481	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (𝑁 + 1) ∈ ℕ₀)
16	14, 15	reexpcld 14117	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑(𝑁 + 1)) ∈ ℝ)
17	5	adantr 481	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → 𝑁 ∈ ℕ₀)
18	14, 17	reexpcld 14117	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑𝑁) ∈ ℝ)
19	5	nn0zd 12541	. . . . . . 7 ⊢ (𝜑 → 𝑁 ∈ ℤ)
20		uzid 12795	. . . . . . 7 ⊢ (𝑁 ∈ ℤ → 𝑁 ∈ (ℤ_≥‘𝑁))
21	19, 20	syl 17	. . . . . 6 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘𝑁))
22		peano2uz 12843	. . . . . 6 ⊢ (𝑁 ∈ (ℤ_≥‘𝑁) → (𝑁 + 1) ∈ (ℤ_≥‘𝑁))
23	21, 22	syl 17	. . . . 5 ⊢ (𝜑 → (𝑁 + 1) ∈ (ℤ_≥‘𝑁))
24	23	adantr 481	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (𝑁 + 1) ∈ (ℤ_≥‘𝑁))
25	13, 1	jctil 524	. . . . . 6 ⊢ (𝑥 ∈ (0(,)π) → (0 ∈ ℝ ∧ (sin‘𝑥) ∈ ℝ))
26		sinq12gt0 26490	. . . . . 6 ⊢ (𝑥 ∈ (0(,)π) → 0 < (sin‘𝑥))
27		ltle 11226	. . . . . 6 ⊢ ((0 ∈ ℝ ∧ (sin‘𝑥) ∈ ℝ) → (0 < (sin‘𝑥) → 0 ≤ (sin‘𝑥)))
28	25, 26, 27	sylc 65	. . . . 5 ⊢ (𝑥 ∈ (0(,)π) → 0 ≤ (sin‘𝑥))
29	28	adantl 482	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → 0 ≤ (sin‘𝑥))
30		sinbnd 16139	. . . . . . 7 ⊢ (𝑥 ∈ ℝ → (-1 ≤ (sin‘𝑥) ∧ (sin‘𝑥) ≤ 1))
31	12, 30	syl 17	. . . . . 6 ⊢ (𝑥 ∈ (0(,)π) → (-1 ≤ (sin‘𝑥) ∧ (sin‘𝑥) ≤ 1))
32	31	simprd 496	. . . . 5 ⊢ (𝑥 ∈ (0(,)π) → (sin‘𝑥) ≤ 1)
33	32	adantl 482	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → (sin‘𝑥) ≤ 1)
34	14, 17, 24, 29, 33	leexp2rd 14209	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑(𝑁 + 1)) ≤ ((sin‘𝑥)↑𝑁))
35	9, 11, 16, 18, 34	itgle 25796	. 2 ⊢ (𝜑 → ∫(0(,)π)((sin‘𝑥)↑(𝑁 + 1)) d𝑥 ≤ ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)
36		oveq2 7365	. . . . . 6 ⊢ (𝑛 = (𝑁 + 1) → ((sin‘𝑥)↑𝑛) = ((sin‘𝑥)↑(𝑁 + 1)))
37	36	adantr 481	. . . . 5 ⊢ ((𝑛 = (𝑁 + 1) ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑𝑛) = ((sin‘𝑥)↑(𝑁 + 1)))
38	37	itgeq2dv 25768	. . . 4 ⊢ (𝑛 = (𝑁 + 1) → ∫(0(,)π)((sin‘𝑥)↑𝑛) d𝑥 = ∫(0(,)π)((sin‘𝑥)↑(𝑁 + 1)) d𝑥)
39		wallispilem1.1	. . . 4 ⊢ 𝐼 = (𝑛 ∈ ℕ₀ ↦ ∫(0(,)π)((sin‘𝑥)↑𝑛) d𝑥)
40		itgex 25756	. . . 4 ⊢ ∫(0(,)π)((sin‘𝑥)↑(𝑁 + 1)) d𝑥 ∈ V
41	38, 39, 40	fvmpt 6936	. . 3 ⊢ ((𝑁 + 1) ∈ ℕ₀ → (𝐼‘(𝑁 + 1)) = ∫(0(,)π)((sin‘𝑥)↑(𝑁 + 1)) d𝑥)
42	7, 41	syl 17	. 2 ⊢ (𝜑 → (𝐼‘(𝑁 + 1)) = ∫(0(,)π)((sin‘𝑥)↑(𝑁 + 1)) d𝑥)
43		oveq2 7365	. . . . . 6 ⊢ (𝑛 = 𝑁 → ((sin‘𝑥)↑𝑛) = ((sin‘𝑥)↑𝑁))
44	43	adantr 481	. . . . 5 ⊢ ((𝑛 = 𝑁 ∧ 𝑥 ∈ (0(,)π)) → ((sin‘𝑥)↑𝑛) = ((sin‘𝑥)↑𝑁))
45	44	itgeq2dv 25768	. . . 4 ⊢ (𝑛 = 𝑁 → ∫(0(,)π)((sin‘𝑥)↑𝑛) d𝑥 = ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)
46		itgex 25756	. . . 4 ⊢ ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥 ∈ V
47	45, 39, 46	fvmpt 6936	. . 3 ⊢ (𝑁 ∈ ℕ₀ → (𝐼‘𝑁) = ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)
48	5, 47	syl 17	. 2 ⊢ (𝜑 → (𝐼‘𝑁) = ∫(0(,)π)((sin‘𝑥)↑𝑁) d𝑥)
49	35, 42, 48	3brtr4d 5105	1 ⊢ (𝜑 → (𝐼‘(𝑁 + 1)) ≤ (𝐼‘𝑁))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 396 = wceq 1547 ∈ wcel 2119 class class class wbr 5073 ↦ cmpt 5154 ‘cfv 6486 (class class class)co 7357 ℝcr 11029 0cc0 11030 1c1 11031 + caddc 11033 < clt 11171 ≤ cle 11172 -cneg 11370 ℕ₀cn0 12429 ℤcz 12516 ℤ_≥cuz 12780 (,)cioo 13290 ↑cexp 14015 sincsin 16020 πcpi 16023 𝐿¹cibl 25603 ∫citg 25604

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1802 ax-4 1816 ax-5 1917 ax-6 1974 ax-7 2015 ax-8 2121 ax-9 2129 ax-10 2152 ax-11 2168 ax-12 2189 ax-ext 2711 ax-rep 5200 ax-sep 5219 ax-nul 5229 ax-pow 5295 ax-pr 5363 ax-un 7679 ax-inf2 9554 ax-cc 10349 ax-cnex 11086 ax-resscn 11087 ax-1cn 11088 ax-icn 11089 ax-addcl 11090 ax-addrcl 11091 ax-mulcl 11092 ax-mulrcl 11093 ax-mulcom 11094 ax-addass 11095 ax-mulass 11096 ax-distr 11097 ax-i2m1 11098 ax-1ne0 11099 ax-1rid 11100 ax-rnegex 11101 ax-rrecex 11102 ax-cnre 11103 ax-pre-lttri 11104 ax-pre-lttrn 11105 ax-pre-ltadd 11106 ax-pre-mulgt0 11107 ax-pre-sup 11108 ax-addf 11109

This theorem depends on definitions: df-bi 208 df-an 397 df-or 854 df-3or 1093 df-3an 1094 df-tru 1550 df-fal 1560 df-ex 1787 df-nf 1791 df-sb 2074 df-mo 2543 df-eu 2573 df-clab 2718 df-cleq 2731 df-clel 2814 df-nfc 2888 df-ne 2935 df-nel 3039 df-ral 3054 df-rex 3064 df-rmo 3344 df-reu 3345 df-rab 3392 df-v 3433 df-sbc 3724 df-csb 3832 df-dif 3886 df-un 3888 df-in 3890 df-ss 3900 df-pss 3903 df-nul 4263 df-if 4456 df-pw 4532 df-sn 4557 df-pr 4559 df-tp 4561 df-op 4563 df-uni 4840 df-int 4879 df-iun 4924 df-iin 4925 df-disj 5041 df-br 5074 df-opab 5136 df-mpt 5155 df-tr 5181 df-id 5514 df-eprel 5519 df-po 5527 df-so 5528 df-fr 5572 df-se 5573 df-we 5574 df-xp 5625 df-rel 5626 df-cnv 5627 df-co 5628 df-dm 5629 df-rn 5630 df-res 5631 df-ima 5632 df-pred 6253 df-ord 6314 df-on 6315 df-lim 6316 df-suc 6317 df-iota 6442 df-fun 6488 df-fn 6489 df-f 6490 df-f1 6491 df-fo 6492 df-f1o 6493 df-fv 6494 df-isom 6495 df-riota 7314 df-ov 7360 df-oprab 7361 df-mpo 7362 df-of 7621 df-ofr 7622 df-om 7808 df-1st 7932 df-2nd 7933 df-supp 8102 df-frecs 8222 df-wrecs 8253 df-recs 8302 df-rdg 8340 df-1o 8396 df-2o 8397 df-oadd 8400 df-omul 8401 df-er 8634 df-map 8766 df-pm 8767 df-ixp 8837 df-en 8885 df-dom 8886 df-sdom 8887 df-fin 8888 df-fsupp 9266 df-fi 9315 df-sup 9346 df-inf 9347 df-oi 9416 df-dju 9817 df-card 9855 df-acn 9858 df-pnf 11173 df-mnf 11174 df-xr 11175 df-ltxr 11176 df-le 11177 df-sub 11371 df-neg 11372 df-div 11800 df-nn 12167 df-2 12236 df-3 12237 df-4 12238 df-5 12239 df-6 12240 df-7 12241 df-8 12242 df-9 12243 df-n0 12430 df-z 12517 df-dec 12637 df-uz 12781 df-q 12891 df-rp 12935 df-xneg 13055 df-xadd 13056 df-xmul 13057 df-ioo 13294 df-ioc 13295 df-ico 13296 df-icc 13297 df-fz 13454 df-fzo 13601 df-fl 13743 df-mod 13821 df-seq 13956 df-exp 14016 df-fac 14228 df-bc 14257 df-hash 14285 df-shft 15021 df-cj 15053 df-re 15054 df-im 15055 df-sqrt 15189 df-abs 15190 df-limsup 15425 df-clim 15442 df-rlim 15443 df-sum 15641 df-ef 16024 df-sin 16026 df-cos 16027 df-pi 16029 df-struct 17109 df-sets 17126 df-slot 17144 df-ndx 17156 df-base 17172 df-ress 17193 df-plusg 17225 df-mulr 17226 df-starv 17227 df-sca 17228 df-vsca 17229 df-ip 17230 df-tset 17231 df-ple 17232 df-ds 17234 df-unif 17235 df-hom 17236 df-cco 17237 df-rest 17377 df-topn 17378 df-0g 17396 df-gsum 17397 df-topgen 17398 df-pt 17399 df-prds 17402 df-xrs 17458 df-qtop 17463 df-imas 17464 df-xps 17466 df-mre 17540 df-mrc 17541 df-acs 17543 df-mgm 18600 df-sgrp 18679 df-mnd 18695 df-submnd 18744 df-mulg 19036 df-cntz 19284 df-cmn 19749 df-psmet 21340 df-xmet 21341 df-met 21342 df-bl 21343 df-mopn 21344 df-fbas 21345 df-fg 21346 df-cnfld 21349 df-top 22878 df-topon 22895 df-topsp 22917 df-bases 22930 df-cld 23003 df-ntr 23004 df-cls 23005 df-nei 23082 df-lp 23120 df-perf 23121 df-cn 23211 df-cnp 23212 df-haus 23299 df-cmp 23371 df-tx 23546 df-hmeo 23739 df-fil 23830 df-fm 23922 df-flim 23923 df-flf 23924 df-xms 24304 df-ms 24305 df-tms 24306 df-cncf 24864 df-ovol 25450 df-vol 25451 df-mbf 25605 df-itg1 25606 df-itg2 25607 df-ibl 25608 df-itg 25609 df-0p 25656 df-limc 25852 df-dv 25853

This theorem is referenced by: wallispilem5 46520

W3C validator