pntlemc - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > pntlemc		Structured version Visualization version GIF version

Theorem pntlemc 27636

Description: Lemma for pnt 27655. Closure for the constants used in the proof. For comparison with Equation 10.6.27 of [Shapiro], p. 434, 𝑈 is α, 𝐸 is ε, and 𝐾 is K. (Contributed by Mario Carneiro, 13-Apr-2016.)

**Hypotheses**
Ref	Expression
pntlem1.r	⊢ 𝑅 = (𝑎 ∈ ℝ⁺ ↦ ((ψ‘𝑎) − 𝑎))
pntlem1.a	⊢ (𝜑 → 𝐴 ∈ ℝ⁺)
pntlem1.b	⊢ (𝜑 → 𝐵 ∈ ℝ⁺)
pntlem1.l	⊢ (𝜑 → 𝐿 ∈ (0(,)1))
pntlem1.d	⊢ 𝐷 = (𝐴 + 1)
pntlem1.f	⊢ 𝐹 = ((1 − (1 / 𝐷)) · ((𝐿 / (;32 · 𝐵)) / (𝐷↑2)))
pntlem1.u	⊢ (𝜑 → 𝑈 ∈ ℝ⁺)
pntlem1.u2	⊢ (𝜑 → 𝑈 ≤ 𝐴)
pntlem1.e	⊢ 𝐸 = (𝑈 / 𝐷)
pntlem1.k	⊢ 𝐾 = (exp‘(𝐵 / 𝐸))

**Assertion**
Ref	Expression
pntlemc	⊢ (𝜑 → (𝐸 ∈ ℝ⁺ ∧ 𝐾 ∈ ℝ⁺ ∧ (𝐸 ∈ (0(,)1) ∧ 1 < 𝐾 ∧ (𝑈 − 𝐸) ∈ ℝ⁺)))

Distinct variable group: 𝐸,𝑎 Allowed substitution hints: 𝜑(𝑎) 𝐴(𝑎) 𝐵(𝑎) 𝐷(𝑎) 𝑅(𝑎) 𝑈(𝑎) 𝐹(𝑎) 𝐾(𝑎) 𝐿(𝑎)

**Proof of Theorem pntlemc**
Step	Hyp	Ref	Expression
1		pntlem1.e	. . 3 ⊢ 𝐸 = (𝑈 / 𝐷)
2		pntlem1.u	. . . 4 ⊢ (𝜑 → 𝑈 ∈ ℝ⁺)
3		pntlem1.r	. . . . . 6 ⊢ 𝑅 = (𝑎 ∈ ℝ⁺ ↦ ((ψ‘𝑎) − 𝑎))
4		pntlem1.a	. . . . . 6 ⊢ (𝜑 → 𝐴 ∈ ℝ⁺)
5		pntlem1.b	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ ℝ⁺)
6		pntlem1.l	. . . . . 6 ⊢ (𝜑 → 𝐿 ∈ (0(,)1))
7		pntlem1.d	. . . . . 6 ⊢ 𝐷 = (𝐴 + 1)
8		pntlem1.f	. . . . . 6 ⊢ 𝐹 = ((1 − (1 / 𝐷)) · ((𝐿 / (;32 · 𝐵)) / (𝐷↑2)))
9	3, 4, 5, 6, 7, 8	pntlemd 27635	. . . . 5 ⊢ (𝜑 → (𝐿 ∈ ℝ⁺ ∧ 𝐷 ∈ ℝ⁺ ∧ 𝐹 ∈ ℝ⁺))
10	9	simp2d 1155	. . . 4 ⊢ (𝜑 → 𝐷 ∈ ℝ⁺)
11	2, 10	rpdivcld 13051	. . 3 ⊢ (𝜑 → (𝑈 / 𝐷) ∈ ℝ⁺)
12	1, 11	eqeltrid 2865	. 2 ⊢ (𝜑 → 𝐸 ∈ ℝ⁺)
13		pntlem1.k	. . 3 ⊢ 𝐾 = (exp‘(𝐵 / 𝐸))
14	5, 12	rpdivcld 13051	. . . . 5 ⊢ (𝜑 → (𝐵 / 𝐸) ∈ ℝ⁺)
15	14	rpred 13034	. . . 4 ⊢ (𝜑 → (𝐵 / 𝐸) ∈ ℝ)
16	15	rpefcld 16120	. . 3 ⊢ (𝜑 → (exp‘(𝐵 / 𝐸)) ∈ ℝ⁺)
17	13, 16	eqeltrid 2865	. 2 ⊢ (𝜑 → 𝐾 ∈ ℝ⁺)
18	12	rpred 13034	. . . 4 ⊢ (𝜑 → 𝐸 ∈ ℝ)
19	12	rpgt0d 13037	. . . 4 ⊢ (𝜑 → 0 < 𝐸)
20	2	rpred 13034	. . . . . . . 8 ⊢ (𝜑 → 𝑈 ∈ ℝ)
21	4	rpred 13034	. . . . . . . 8 ⊢ (𝜑 → 𝐴 ∈ ℝ)
22	10	rpred 13034	. . . . . . . 8 ⊢ (𝜑 → 𝐷 ∈ ℝ)
23		pntlem1.u2	. . . . . . . 8 ⊢ (𝜑 → 𝑈 ≤ 𝐴)
24	21	ltp1d 12119	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 < (𝐴 + 1))
25	24, 7	breqtrrdi 5141	. . . . . . . 8 ⊢ (𝜑 → 𝐴 < 𝐷)
26	20, 21, 22, 23, 25	lelttrd 11338	. . . . . . 7 ⊢ (𝜑 → 𝑈 < 𝐷)
27	10	rpcnd 13036	. . . . . . . 8 ⊢ (𝜑 → 𝐷 ∈ ℂ)
28	27	mulridd 11196	. . . . . . 7 ⊢ (𝜑 → (𝐷 · 1) = 𝐷)
29	26, 28	breqtrrd 5127	. . . . . 6 ⊢ (𝜑 → 𝑈 < (𝐷 · 1))
30		1red 11179	. . . . . . 7 ⊢ (𝜑 → 1 ∈ ℝ)
31	20, 30, 10	ltdivmuld 13085	. . . . . 6 ⊢ (𝜑 → ((𝑈 / 𝐷) < 1 ↔ 𝑈 < (𝐷 · 1)))
32	29, 31	mpbird 259	. . . . 5 ⊢ (𝜑 → (𝑈 / 𝐷) < 1)
33	1, 32	eqbrtrid 5134	. . . 4 ⊢ (𝜑 → 𝐸 < 1)
34		0xr 11226	. . . . 5 ⊢ 0 ∈ ℝ^*
35		1xr 11238	. . . . 5 ⊢ 1 ∈ ℝ^*
36		elioo2 13387	. . . . 5 ⊢ ((0 ∈ ℝ^* ∧ 1 ∈ ℝ^*) → (𝐸 ∈ (0(,)1) ↔ (𝐸 ∈ ℝ ∧ 0 < 𝐸 ∧ 𝐸 < 1)))
37	34, 35, 36	mp2an 702	. . . 4 ⊢ (𝐸 ∈ (0(,)1) ↔ (𝐸 ∈ ℝ ∧ 0 < 𝐸 ∧ 𝐸 < 1))
38	18, 19, 33, 37	syl3anbrc 1356	. . 3 ⊢ (𝜑 → 𝐸 ∈ (0(,)1))
39		efgt1 16131	. . . . 5 ⊢ ((𝐵 / 𝐸) ∈ ℝ⁺ → 1 < (exp‘(𝐵 / 𝐸)))
40	14, 39	syl 17	. . . 4 ⊢ (𝜑 → 1 < (exp‘(𝐵 / 𝐸)))
41	40, 13	breqtrrdi 5141	. . 3 ⊢ (𝜑 → 1 < 𝐾)
42		1re 11178	. . . . . . . 8 ⊢ 1 ∈ ℝ
43		ltaddrp 13029	. . . . . . . 8 ⊢ ((1 ∈ ℝ ∧ 𝐴 ∈ ℝ⁺) → 1 < (1 + 𝐴))
44	42, 4, 43	sylancr 596	. . . . . . 7 ⊢ (𝜑 → 1 < (1 + 𝐴))
45	2	rpcnne0d 13043	. . . . . . . 8 ⊢ (𝜑 → (𝑈 ∈ ℂ ∧ 𝑈 ≠ 0))
46		divid 11873	. . . . . . . 8 ⊢ ((𝑈 ∈ ℂ ∧ 𝑈 ≠ 0) → (𝑈 / 𝑈) = 1)
47	45, 46	syl 17	. . . . . . 7 ⊢ (𝜑 → (𝑈 / 𝑈) = 1)
48	4	rpcnd 13036	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 ∈ ℂ)
49		ax-1cn 11128	. . . . . . . . 9 ⊢ 1 ∈ ℂ
50		addcom 11366	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℂ ∧ 1 ∈ ℂ) → (𝐴 + 1) = (1 + 𝐴))
51	48, 49, 50	sylancl 595	. . . . . . . 8 ⊢ (𝜑 → (𝐴 + 1) = (1 + 𝐴))
52	7, 51	eqtrid 2808	. . . . . . 7 ⊢ (𝜑 → 𝐷 = (1 + 𝐴))
53	44, 47, 52	3brtr4d 5131	. . . . . 6 ⊢ (𝜑 → (𝑈 / 𝑈) < 𝐷)
54	20, 2, 10, 53	ltdiv23d 13101	. . . . 5 ⊢ (𝜑 → (𝑈 / 𝐷) < 𝑈)
55	1, 54	eqbrtrid 5134	. . . 4 ⊢ (𝜑 → 𝐸 < 𝑈)
56		difrp 13030	. . . . 5 ⊢ ((𝐸 ∈ ℝ ∧ 𝑈 ∈ ℝ) → (𝐸 < 𝑈 ↔ (𝑈 − 𝐸) ∈ ℝ⁺))
57	18, 20, 56	syl2anc 593	. . . 4 ⊢ (𝜑 → (𝐸 < 𝑈 ↔ (𝑈 − 𝐸) ∈ ℝ⁺))
58	55, 57	mpbid 234	. . 3 ⊢ (𝜑 → (𝑈 − 𝐸) ∈ ℝ⁺)
59	38, 41, 58	3jca 1140	. 2 ⊢ (𝜑 → (𝐸 ∈ (0(,)1) ∧ 1 < 𝐾 ∧ (𝑈 − 𝐸) ∈ ℝ⁺))
60	12, 17, 59	3jca 1140	1 ⊢ (𝜑 → (𝐸 ∈ ℝ⁺ ∧ 𝐾 ∈ ℝ⁺ ∧ (𝐸 ∈ (0(,)1) ∧ 1 < 𝐾 ∧ (𝑈 − 𝐸) ∈ ℝ⁺)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 208 ∧ wa 399 ∧ w3a 1097 = wceq 1559 ∈ wcel 2141 ≠ wne 2956 class class class wbr 5099 ↦ cmpt 5180 ‘cfv 6517 (class class class)co 7392 ℂcc 11068 ℝcr 11069 0cc0 11070 1c1 11071 + caddc 11073 · cmul 11075 ℝ^*cxr 11212 < clt 11213 ≤ cle 11214 − cmin 11411 / cdiv 11841 2c2 12269 3c3 12270 cdc 12685 ℝ⁺crp 12990 (,)cioo 13346 ↑cexp 14071 expce 16074 ψcchp 27134

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1814 ax-4 1828 ax-5 1929 ax-6 1986 ax-7 2027 ax-8 2143 ax-9 2151 ax-10 2174 ax-11 2190 ax-12 2211 ax-ext 2733 ax-rep 5226 ax-sep 5245 ax-nul 5255 ax-pow 5321 ax-pr 5389 ax-un 7714 ax-inf2 9593 ax-cnex 11126 ax-resscn 11127 ax-1cn 11128 ax-icn 11129 ax-addcl 11130 ax-addrcl 11131 ax-mulcl 11132 ax-mulrcl 11133 ax-mulcom 11134 ax-addass 11135 ax-mulass 11136 ax-distr 11137 ax-i2m1 11138 ax-1ne0 11139 ax-1rid 11140 ax-rnegex 11141 ax-rrecex 11142 ax-cnre 11143 ax-pre-lttri 11144 ax-pre-lttrn 11145 ax-pre-ltadd 11146 ax-pre-mulgt0 11147 ax-pre-sup 11148

This theorem depends on definitions: df-bi 209 df-an 400 df-or 859 df-3or 1098 df-3an 1099 df-tru 1562 df-fal 1572 df-ex 1799 df-nf 1803 df-sb 2090 df-mo 2565 df-eu 2595 df-clab 2740 df-cleq 2753 df-clel 2836 df-nfc 2910 df-ne 2957 df-nel 3061 df-ral 3076 df-rex 3086 df-rmo 3366 df-reu 3367 df-rab 3414 df-v 3455 df-sbc 3745 df-csb 3853 df-dif 3907 df-un 3909 df-in 3911 df-ss 3921 df-pss 3924 df-nul 4286 df-if 4480 df-pw 4556 df-sn 4582 df-pr 4584 df-op 4588 df-uni 4865 df-int 4905 df-iun 4950 df-br 5100 df-opab 5162 df-mpt 5181 df-tr 5207 df-id 5540 df-eprel 5545 df-po 5553 df-so 5554 df-fr 5598 df-se 5599 df-we 5600 df-xp 5651 df-rel 5652 df-cnv 5653 df-co 5654 df-dm 5655 df-rn 5656 df-res 5657 df-ima 5658 df-pred 6284 df-ord 6345 df-on 6346 df-lim 6347 df-suc 6348 df-iota 6473 df-fun 6519 df-fn 6520 df-f 6521 df-f1 6522 df-fo 6523 df-f1o 6524 df-fv 6525 df-isom 6526 df-riota 7349 df-ov 7395 df-oprab 7396 df-mpo 7397 df-om 7843 df-1st 7966 df-2nd 7967 df-frecs 8257 df-wrecs 8288 df-recs 8337 df-rdg 8376 df-1o 8432 df-er 8673 df-pm 8806 df-en 8924 df-dom 8925 df-sdom 8926 df-fin 8927 df-sup 9385 df-inf 9386 df-oi 9455 df-card 9894 df-pnf 11215 df-mnf 11216 df-xr 11217 df-ltxr 11218 df-le 11219 df-sub 11413 df-neg 11414 df-div 11842 df-nn 12208 df-2 12277 df-3 12278 df-4 12279 df-5 12280 df-6 12281 df-7 12282 df-8 12283 df-9 12284 df-n0 12479 df-z 12566 df-dec 12686 df-uz 12837 df-rp 12991 df-ioo 13350 df-ico 13352 df-fz 13510 df-fzo 13657 df-fl 13799 df-seq 14012 df-exp 14072 df-fac 14284 df-bc 14313 df-hash 14341 df-shft 15077 df-cj 15109 df-re 15110 df-im 15111 df-sqrt 15245 df-abs 15246 df-limsup 15481 df-clim 15498 df-rlim 15499 df-sum 15697 df-ef 16080

This theorem is referenced by: pntlema 27637 pntlemb 27638 pntlemg 27639 pntlemh 27640 pntlemq 27642 pntlemr 27643 pntlemj 27644 pntlemi 27645 pntlemf 27646 pntlemo 27648 pntleme 27649 pntlemp 27651

W3C validator