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

Theorem pntlem3 27092
Description: Lemma for pnt 27097. Equation 10.6.35 in [Shapiro], p. 436. (Contributed by Mario Carneiro, 8-Apr-2016.) (Proof shortened by AV, 27-Sep-2020.)
Hypotheses
Ref Expression
pntlem3.r 𝑅 = (π‘Ž ∈ ℝ+ ↦ ((Οˆβ€˜π‘Ž) βˆ’ π‘Ž))
pntlem3.a (πœ‘ β†’ 𝐴 ∈ ℝ+)
pntlem3.A (πœ‘ β†’ βˆ€π‘₯ ∈ ℝ+ (absβ€˜((π‘…β€˜π‘₯) / π‘₯)) ≀ 𝐴)
pntlem3.1 𝑇 = {𝑑 ∈ (0[,]𝐴) ∣ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑}
pntlem3.2 (πœ‘ β†’ 𝐢 ∈ ℝ+)
pntlem3.3 ((πœ‘ ∧ 𝑒 ∈ 𝑇) β†’ (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) ∈ 𝑇)
Assertion
Ref Expression
pntlem3 (πœ‘ β†’ (π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)) β‡π‘Ÿ 1)
Distinct variable groups:   π‘₯,𝑑,𝑦,𝑧,𝐴   𝑒,π‘Ž,π‘₯,𝑦,𝑧   𝑒,𝐢   𝑒,𝑑,𝑅,π‘₯,𝑦,𝑧   𝑑,π‘Ž   𝑒,𝑇,π‘₯   πœ‘,𝑑,π‘₯,𝑦,𝑒,𝑧
Allowed substitution hints:   πœ‘(π‘Ž)   𝐴(𝑒,π‘Ž)   𝐢(π‘₯,𝑦,𝑧,𝑑,π‘Ž)   𝑅(π‘Ž)   𝑇(𝑦,𝑧,𝑑,π‘Ž)

Proof of Theorem pntlem3
Dummy variables 𝑠 𝑀 𝑝 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 rpssre 12977 . . . 4 ℝ+ βŠ† ℝ
2 eqid 2733 . . . . . . . . . . 11 (TopOpenβ€˜β„‚fld) = (TopOpenβ€˜β„‚fld)
32subcn 24364 . . . . . . . . . . . 12 βˆ’ ∈ (((TopOpenβ€˜β„‚fld) Γ—t (TopOpenβ€˜β„‚fld)) Cn (TopOpenβ€˜β„‚fld))
43a1i 11 . . . . . . . . . . 11 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ βˆ’ ∈ (((TopOpenβ€˜β„‚fld) Γ—t (TopOpenβ€˜β„‚fld)) Cn (TopOpenβ€˜β„‚fld)))
5 ssid 4003 . . . . . . . . . . . . 13 β„‚ βŠ† β„‚
6 cncfmptid 24411 . . . . . . . . . . . . 13 ((β„‚ βŠ† β„‚ ∧ β„‚ βŠ† β„‚) β†’ (𝑝 ∈ β„‚ ↦ 𝑝) ∈ (ℂ–cnβ†’β„‚))
75, 5, 6mp2an 691 . . . . . . . . . . . 12 (𝑝 ∈ β„‚ ↦ 𝑝) ∈ (ℂ–cnβ†’β„‚)
87a1i 11 . . . . . . . . . . 11 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ (𝑝 ∈ β„‚ ↦ 𝑝) ∈ (ℂ–cnβ†’β„‚))
9 pntlem3.2 . . . . . . . . . . . . . . 15 (πœ‘ β†’ 𝐢 ∈ ℝ+)
109adantr 482 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ 𝐢 ∈ ℝ+)
1110rpcnd 13014 . . . . . . . . . . . . 13 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ 𝐢 ∈ β„‚)
125a1i 11 . . . . . . . . . . . . 13 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ β„‚ βŠ† β„‚)
13 cncfmptc 24410 . . . . . . . . . . . . 13 ((𝐢 ∈ β„‚ ∧ β„‚ βŠ† β„‚ ∧ β„‚ βŠ† β„‚) β†’ (𝑝 ∈ β„‚ ↦ 𝐢) ∈ (ℂ–cnβ†’β„‚))
1411, 12, 12, 13syl3anc 1372 . . . . . . . . . . . 12 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ (𝑝 ∈ β„‚ ↦ 𝐢) ∈ (ℂ–cnβ†’β„‚))
15 3nn0 12486 . . . . . . . . . . . . . 14 3 ∈ β„•0
162expcn 24370 . . . . . . . . . . . . . 14 (3 ∈ β„•0 β†’ (𝑝 ∈ β„‚ ↦ (𝑝↑3)) ∈ ((TopOpenβ€˜β„‚fld) Cn (TopOpenβ€˜β„‚fld)))
1715, 16mp1i 13 . . . . . . . . . . . . 13 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ (𝑝 ∈ β„‚ ↦ (𝑝↑3)) ∈ ((TopOpenβ€˜β„‚fld) Cn (TopOpenβ€˜β„‚fld)))
182cncfcn1 24409 . . . . . . . . . . . . 13 (ℂ–cnβ†’β„‚) = ((TopOpenβ€˜β„‚fld) Cn (TopOpenβ€˜β„‚fld))
1917, 18eleqtrrdi 2845 . . . . . . . . . . . 12 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ (𝑝 ∈ β„‚ ↦ (𝑝↑3)) ∈ (ℂ–cnβ†’β„‚))
2014, 19mulcncf 24945 . . . . . . . . . . 11 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ (𝑝 ∈ β„‚ ↦ (𝐢 Β· (𝑝↑3))) ∈ (ℂ–cnβ†’β„‚))
212, 4, 8, 20cncfmpt2f 24413 . . . . . . . . . 10 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ (𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3)))) ∈ (ℂ–cnβ†’β„‚))
22 pntlem3.1 . . . . . . . . . . . . . . 15 𝑇 = {𝑑 ∈ (0[,]𝐴) ∣ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑}
2322ssrab3 4079 . . . . . . . . . . . . . 14 𝑇 βŠ† (0[,]𝐴)
24 0re 11212 . . . . . . . . . . . . . . 15 0 ∈ ℝ
25 pntlem3.a . . . . . . . . . . . . . . . 16 (πœ‘ β†’ 𝐴 ∈ ℝ+)
2625rpred 13012 . . . . . . . . . . . . . . 15 (πœ‘ β†’ 𝐴 ∈ ℝ)
27 iccssre 13402 . . . . . . . . . . . . . . 15 ((0 ∈ ℝ ∧ 𝐴 ∈ ℝ) β†’ (0[,]𝐴) βŠ† ℝ)
2824, 26, 27sylancr 588 . . . . . . . . . . . . . 14 (πœ‘ β†’ (0[,]𝐴) βŠ† ℝ)
2923, 28sstrid 3992 . . . . . . . . . . . . 13 (πœ‘ β†’ 𝑇 βŠ† ℝ)
30 0xr 11257 . . . . . . . . . . . . . . . 16 0 ∈ ℝ*
3125rpxrd 13013 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ 𝐴 ∈ ℝ*)
3225rpge0d 13016 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ 0 ≀ 𝐴)
33 ubicc2 13438 . . . . . . . . . . . . . . . 16 ((0 ∈ ℝ* ∧ 𝐴 ∈ ℝ* ∧ 0 ≀ 𝐴) β†’ 𝐴 ∈ (0[,]𝐴))
3430, 31, 32, 33mp3an2i 1467 . . . . . . . . . . . . . . 15 (πœ‘ β†’ 𝐴 ∈ (0[,]𝐴))
35 1rp 12974 . . . . . . . . . . . . . . . 16 1 ∈ ℝ+
36 fveq2 6888 . . . . . . . . . . . . . . . . . . . . 21 (π‘₯ = 𝑧 β†’ (π‘…β€˜π‘₯) = (π‘…β€˜π‘§))
37 id 22 . . . . . . . . . . . . . . . . . . . . 21 (π‘₯ = 𝑧 β†’ π‘₯ = 𝑧)
3836, 37oveq12d 7422 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ = 𝑧 β†’ ((π‘…β€˜π‘₯) / π‘₯) = ((π‘…β€˜π‘§) / 𝑧))
3938fveq2d 6892 . . . . . . . . . . . . . . . . . . 19 (π‘₯ = 𝑧 β†’ (absβ€˜((π‘…β€˜π‘₯) / π‘₯)) = (absβ€˜((π‘…β€˜π‘§) / 𝑧)))
4039breq1d 5157 . . . . . . . . . . . . . . . . . 18 (π‘₯ = 𝑧 β†’ ((absβ€˜((π‘…β€˜π‘₯) / π‘₯)) ≀ 𝐴 ↔ (absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝐴))
41 pntlem3.A . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ βˆ€π‘₯ ∈ ℝ+ (absβ€˜((π‘…β€˜π‘₯) / π‘₯)) ≀ 𝐴)
4241adantr 482 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝑧 ∈ (1[,)+∞)) β†’ βˆ€π‘₯ ∈ ℝ+ (absβ€˜((π‘…β€˜π‘₯) / π‘₯)) ≀ 𝐴)
43 1re 11210 . . . . . . . . . . . . . . . . . . . . 21 1 ∈ ℝ
44 elicopnf 13418 . . . . . . . . . . . . . . . . . . . . 21 (1 ∈ ℝ β†’ (𝑧 ∈ (1[,)+∞) ↔ (𝑧 ∈ ℝ ∧ 1 ≀ 𝑧)))
4543, 44mp1i 13 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ (𝑧 ∈ (1[,)+∞) ↔ (𝑧 ∈ ℝ ∧ 1 ≀ 𝑧)))
4645simprbda 500 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝑧 ∈ (1[,)+∞)) β†’ 𝑧 ∈ ℝ)
47 0red 11213 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝑧 ∈ (1[,)+∞)) β†’ 0 ∈ ℝ)
4843a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝑧 ∈ (1[,)+∞)) β†’ 1 ∈ ℝ)
49 0lt1 11732 . . . . . . . . . . . . . . . . . . . . 21 0 < 1
5049a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝑧 ∈ (1[,)+∞)) β†’ 0 < 1)
5145simplbda 501 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝑧 ∈ (1[,)+∞)) β†’ 1 ≀ 𝑧)
5247, 48, 46, 50, 51ltletrd 11370 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝑧 ∈ (1[,)+∞)) β†’ 0 < 𝑧)
5346, 52elrpd 13009 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝑧 ∈ (1[,)+∞)) β†’ 𝑧 ∈ ℝ+)
5440, 42, 53rspcdva 3613 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ 𝑧 ∈ (1[,)+∞)) β†’ (absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝐴)
5554ralrimiva 3147 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ βˆ€π‘§ ∈ (1[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝐴)
56 oveq1 7411 . . . . . . . . . . . . . . . . . 18 (𝑦 = 1 β†’ (𝑦[,)+∞) = (1[,)+∞))
5756raleqdv 3326 . . . . . . . . . . . . . . . . 17 (𝑦 = 1 β†’ (βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝐴 ↔ βˆ€π‘§ ∈ (1[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝐴))
5857rspcev 3612 . . . . . . . . . . . . . . . 16 ((1 ∈ ℝ+ ∧ βˆ€π‘§ ∈ (1[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝐴) β†’ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝐴)
5935, 55, 58sylancr 588 . . . . . . . . . . . . . . 15 (πœ‘ β†’ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝐴)
60 breq2 5151 . . . . . . . . . . . . . . . . 17 (𝑑 = 𝐴 β†’ ((absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 ↔ (absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝐴))
6160rexralbidv 3221 . . . . . . . . . . . . . . . 16 (𝑑 = 𝐴 β†’ (βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 ↔ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝐴))
6261, 22elrab2 3685 . . . . . . . . . . . . . . 15 (𝐴 ∈ 𝑇 ↔ (𝐴 ∈ (0[,]𝐴) ∧ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝐴))
6334, 59, 62sylanbrc 584 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝐴 ∈ 𝑇)
6463ne0d 4334 . . . . . . . . . . . . 13 (πœ‘ β†’ 𝑇 β‰  βˆ…)
65 elicc2 13385 . . . . . . . . . . . . . . . . . . . 20 ((0 ∈ ℝ ∧ 𝐴 ∈ ℝ) β†’ (𝑑 ∈ (0[,]𝐴) ↔ (𝑑 ∈ ℝ ∧ 0 ≀ 𝑑 ∧ 𝑑 ≀ 𝐴)))
6624, 26, 65sylancr 588 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (𝑑 ∈ (0[,]𝐴) ↔ (𝑑 ∈ ℝ ∧ 0 ≀ 𝑑 ∧ 𝑑 ≀ 𝐴)))
6766biimpa 478 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝑑 ∈ (0[,]𝐴)) β†’ (𝑑 ∈ ℝ ∧ 0 ≀ 𝑑 ∧ 𝑑 ≀ 𝐴))
6867simp2d 1144 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ 𝑑 ∈ (0[,]𝐴)) β†’ 0 ≀ 𝑑)
6968a1d 25 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ 𝑑 ∈ (0[,]𝐴)) β†’ (βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 β†’ 0 ≀ 𝑑))
7069ralrimiva 3147 . . . . . . . . . . . . . . 15 (πœ‘ β†’ βˆ€π‘‘ ∈ (0[,]𝐴)(βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 β†’ 0 ≀ 𝑑))
7122raleqi 3324 . . . . . . . . . . . . . . . 16 (βˆ€π‘€ ∈ 𝑇 0 ≀ 𝑀 ↔ βˆ€π‘€ ∈ {𝑑 ∈ (0[,]𝐴) ∣ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑}0 ≀ 𝑀)
72 breq2 5151 . . . . . . . . . . . . . . . . 17 (𝑀 = 𝑑 β†’ (0 ≀ 𝑀 ↔ 0 ≀ 𝑑))
7372ralrab2 3693 . . . . . . . . . . . . . . . 16 (βˆ€π‘€ ∈ {𝑑 ∈ (0[,]𝐴) ∣ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑}0 ≀ 𝑀 ↔ βˆ€π‘‘ ∈ (0[,]𝐴)(βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 β†’ 0 ≀ 𝑑))
7471, 73bitri 275 . . . . . . . . . . . . . . 15 (βˆ€π‘€ ∈ 𝑇 0 ≀ 𝑀 ↔ βˆ€π‘‘ ∈ (0[,]𝐴)(βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 β†’ 0 ≀ 𝑑))
7570, 74sylibr 233 . . . . . . . . . . . . . 14 (πœ‘ β†’ βˆ€π‘€ ∈ 𝑇 0 ≀ 𝑀)
76 breq1 5150 . . . . . . . . . . . . . . . 16 (π‘₯ = 0 β†’ (π‘₯ ≀ 𝑀 ↔ 0 ≀ 𝑀))
7776ralbidv 3178 . . . . . . . . . . . . . . 15 (π‘₯ = 0 β†’ (βˆ€π‘€ ∈ 𝑇 π‘₯ ≀ 𝑀 ↔ βˆ€π‘€ ∈ 𝑇 0 ≀ 𝑀))
7877rspcev 3612 . . . . . . . . . . . . . 14 ((0 ∈ ℝ ∧ βˆ€π‘€ ∈ 𝑇 0 ≀ 𝑀) β†’ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑇 π‘₯ ≀ 𝑀)
7924, 75, 78sylancr 588 . . . . . . . . . . . . 13 (πœ‘ β†’ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑇 π‘₯ ≀ 𝑀)
80 infrecl 12192 . . . . . . . . . . . . 13 ((𝑇 βŠ† ℝ ∧ 𝑇 β‰  βˆ… ∧ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑇 π‘₯ ≀ 𝑀) β†’ inf(𝑇, ℝ, < ) ∈ ℝ)
8129, 64, 79, 80syl3anc 1372 . . . . . . . . . . . 12 (πœ‘ β†’ inf(𝑇, ℝ, < ) ∈ ℝ)
8281recnd 11238 . . . . . . . . . . 11 (πœ‘ β†’ inf(𝑇, ℝ, < ) ∈ β„‚)
8382adantr 482 . . . . . . . . . 10 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ inf(𝑇, ℝ, < ) ∈ β„‚)
84 elrp 12972 . . . . . . . . . . . . . 14 (inf(𝑇, ℝ, < ) ∈ ℝ+ ↔ (inf(𝑇, ℝ, < ) ∈ ℝ ∧ 0 < inf(𝑇, ℝ, < )))
8584biimpri 227 . . . . . . . . . . . . 13 ((inf(𝑇, ℝ, < ) ∈ ℝ ∧ 0 < inf(𝑇, ℝ, < )) β†’ inf(𝑇, ℝ, < ) ∈ ℝ+)
8681, 85sylan 581 . . . . . . . . . . . 12 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ inf(𝑇, ℝ, < ) ∈ ℝ+)
87 3z 12591 . . . . . . . . . . . 12 3 ∈ β„€
88 rpexpcl 14042 . . . . . . . . . . . 12 ((inf(𝑇, ℝ, < ) ∈ ℝ+ ∧ 3 ∈ β„€) β†’ (inf(𝑇, ℝ, < )↑3) ∈ ℝ+)
8986, 87, 88sylancl 587 . . . . . . . . . . 11 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ (inf(𝑇, ℝ, < )↑3) ∈ ℝ+)
9010, 89rpmulcld 13028 . . . . . . . . . 10 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3)) ∈ ℝ+)
91 cncfi 24392 . . . . . . . . . 10 (((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3)))) ∈ (ℂ–cnβ†’β„‚) ∧ inf(𝑇, ℝ, < ) ∈ β„‚ ∧ (𝐢 Β· (inf(𝑇, ℝ, < )↑3)) ∈ ℝ+) β†’ βˆƒπ‘  ∈ ℝ+ βˆ€π‘’ ∈ β„‚ ((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠 β†’ (absβ€˜(((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3))))
9221, 83, 90, 91syl3anc 1372 . . . . . . . . 9 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ βˆƒπ‘  ∈ ℝ+ βˆ€π‘’ ∈ β„‚ ((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠 β†’ (absβ€˜(((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3))))
9381ad2antrr 725 . . . . . . . . . . . . 13 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ inf(𝑇, ℝ, < ) ∈ ℝ)
94 rphalfcl 12997 . . . . . . . . . . . . . 14 (𝑠 ∈ ℝ+ β†’ (𝑠 / 2) ∈ ℝ+)
9594adantl 483 . . . . . . . . . . . . 13 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ (𝑠 / 2) ∈ ℝ+)
9693, 95ltaddrpd 13045 . . . . . . . . . . . 12 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ inf(𝑇, ℝ, < ) < (inf(𝑇, ℝ, < ) + (𝑠 / 2)))
9795rpred 13012 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ (𝑠 / 2) ∈ ℝ)
9893, 97readdcld 11239 . . . . . . . . . . . . 13 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ∈ ℝ)
9993, 98ltnled 11357 . . . . . . . . . . . 12 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ (inf(𝑇, ℝ, < ) < (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ↔ Β¬ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ inf(𝑇, ℝ, < )))
10096, 99mpbid 231 . . . . . . . . . . 11 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ Β¬ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ inf(𝑇, ℝ, < ))
101 ax-resscn 11163 . . . . . . . . . . . . . . 15 ℝ βŠ† β„‚
10229, 101sstrdi 3993 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝑇 βŠ† β„‚)
103102ad2antrr 725 . . . . . . . . . . . . 13 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ 𝑇 βŠ† β„‚)
104 ssralv 4049 . . . . . . . . . . . . 13 (𝑇 βŠ† β„‚ β†’ (βˆ€π‘’ ∈ β„‚ ((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠 β†’ (absβ€˜(((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) β†’ βˆ€π‘’ ∈ 𝑇 ((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠 β†’ (absβ€˜(((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3)))))
105103, 104syl 17 . . . . . . . . . . . 12 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ (βˆ€π‘’ ∈ β„‚ ((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠 β†’ (absβ€˜(((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) β†’ βˆ€π‘’ ∈ 𝑇 ((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠 β†’ (absβ€˜(((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3)))))
10629ad2antrr 725 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ 𝑇 βŠ† ℝ)
107106sselda 3981 . . . . . . . . . . . . . . . . . 18 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ 𝑒 ∈ ℝ)
10898adantr 482 . . . . . . . . . . . . . . . . . 18 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ∈ ℝ)
109107, 108ltnled 11357 . . . . . . . . . . . . . . . . 17 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (𝑒 < (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ↔ Β¬ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ 𝑒))
11081ad3antrrr 729 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ inf(𝑇, ℝ, < ) ∈ ℝ)
11197adantr 482 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (𝑠 / 2) ∈ ℝ)
112110, 111resubcld 11638 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (inf(𝑇, ℝ, < ) βˆ’ (𝑠 / 2)) ∈ ℝ)
11393, 95ltsubrpd 13044 . . . . . . . . . . . . . . . . . . . . 21 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ (inf(𝑇, ℝ, < ) βˆ’ (𝑠 / 2)) < inf(𝑇, ℝ, < ))
114113adantr 482 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (inf(𝑇, ℝ, < ) βˆ’ (𝑠 / 2)) < inf(𝑇, ℝ, < ))
11529ad3antrrr 729 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ 𝑇 βŠ† ℝ)
11679ad3antrrr 729 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑇 π‘₯ ≀ 𝑀)
117 simpr 486 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ 𝑒 ∈ 𝑇)
118 infrelb 12195 . . . . . . . . . . . . . . . . . . . . 21 ((𝑇 βŠ† ℝ ∧ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑇 π‘₯ ≀ 𝑀 ∧ 𝑒 ∈ 𝑇) β†’ inf(𝑇, ℝ, < ) ≀ 𝑒)
119115, 116, 117, 118syl3anc 1372 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ inf(𝑇, ℝ, < ) ≀ 𝑒)
120112, 110, 107, 114, 119ltletrd 11370 . . . . . . . . . . . . . . . . . . 19 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (inf(𝑇, ℝ, < ) βˆ’ (𝑠 / 2)) < 𝑒)
121107, 110, 111absdifltd 15376 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ ((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < (𝑠 / 2) ↔ ((inf(𝑇, ℝ, < ) βˆ’ (𝑠 / 2)) < 𝑒 ∧ 𝑒 < (inf(𝑇, ℝ, < ) + (𝑠 / 2)))))
122121biimprd 247 . . . . . . . . . . . . . . . . . . 19 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (((inf(𝑇, ℝ, < ) βˆ’ (𝑠 / 2)) < 𝑒 ∧ 𝑒 < (inf(𝑇, ℝ, < ) + (𝑠 / 2))) β†’ (absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < (𝑠 / 2)))
123120, 122mpand 694 . . . . . . . . . . . . . . . . . 18 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (𝑒 < (inf(𝑇, ℝ, < ) + (𝑠 / 2)) β†’ (absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < (𝑠 / 2)))
124 rphalflt 12999 . . . . . . . . . . . . . . . . . . . 20 (𝑠 ∈ ℝ+ β†’ (𝑠 / 2) < 𝑠)
125124ad2antlr 726 . . . . . . . . . . . . . . . . . . 19 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (𝑠 / 2) < 𝑠)
126107, 110resubcld 11638 . . . . . . . . . . . . . . . . . . . . . 22 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (𝑒 βˆ’ inf(𝑇, ℝ, < )) ∈ ℝ)
127126recnd 11238 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (𝑒 βˆ’ inf(𝑇, ℝ, < )) ∈ β„‚)
128127abscld 15379 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) ∈ ℝ)
129 rpre 12978 . . . . . . . . . . . . . . . . . . . . 21 (𝑠 ∈ ℝ+ β†’ 𝑠 ∈ ℝ)
130129ad2antlr 726 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ 𝑠 ∈ ℝ)
131 lttr 11286 . . . . . . . . . . . . . . . . . . . 20 (((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) ∈ ℝ ∧ (𝑠 / 2) ∈ ℝ ∧ 𝑠 ∈ ℝ) β†’ (((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < (𝑠 / 2) ∧ (𝑠 / 2) < 𝑠) β†’ (absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠))
132128, 111, 130, 131syl3anc 1372 . . . . . . . . . . . . . . . . . . 19 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < (𝑠 / 2) ∧ (𝑠 / 2) < 𝑠) β†’ (absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠))
133125, 132mpan2d 693 . . . . . . . . . . . . . . . . . 18 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ ((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < (𝑠 / 2) β†’ (absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠))
134123, 133syld 47 . . . . . . . . . . . . . . . . 17 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (𝑒 < (inf(𝑇, ℝ, < ) + (𝑠 / 2)) β†’ (absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠))
135109, 134sylbird 260 . . . . . . . . . . . . . . . 16 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (Β¬ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ 𝑒 β†’ (absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠))
136135con1d 145 . . . . . . . . . . . . . . 15 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (Β¬ (absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠 β†’ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ 𝑒))
137107recnd 11238 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ 𝑒 ∈ β„‚)
138 id 22 . . . . . . . . . . . . . . . . . . . . . 22 (𝑝 = 𝑒 β†’ 𝑝 = 𝑒)
139 oveq1 7411 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑝 = 𝑒 β†’ (𝑝↑3) = (𝑒↑3))
140139oveq2d 7420 . . . . . . . . . . . . . . . . . . . . . 22 (𝑝 = 𝑒 β†’ (𝐢 Β· (𝑝↑3)) = (𝐢 Β· (𝑒↑3)))
141138, 140oveq12d 7422 . . . . . . . . . . . . . . . . . . . . 21 (𝑝 = 𝑒 β†’ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))) = (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))))
142 eqid 2733 . . . . . . . . . . . . . . . . . . . . 21 (𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3)))) = (𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))
143 ovex 7437 . . . . . . . . . . . . . . . . . . . . 21 (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) ∈ V
144141, 142, 143fvmpt 6994 . . . . . . . . . . . . . . . . . . . 20 (𝑒 ∈ β„‚ β†’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) = (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))))
145137, 144syl 17 . . . . . . . . . . . . . . . . . . 19 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) = (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))))
14683ad2antrr 725 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ inf(𝑇, ℝ, < ) ∈ β„‚)
147 id 22 . . . . . . . . . . . . . . . . . . . . . 22 (𝑝 = inf(𝑇, ℝ, < ) β†’ 𝑝 = inf(𝑇, ℝ, < ))
148 oveq1 7411 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑝 = inf(𝑇, ℝ, < ) β†’ (𝑝↑3) = (inf(𝑇, ℝ, < )↑3))
149148oveq2d 7420 . . . . . . . . . . . . . . . . . . . . . 22 (𝑝 = inf(𝑇, ℝ, < ) β†’ (𝐢 Β· (𝑝↑3)) = (𝐢 Β· (inf(𝑇, ℝ, < )↑3)))
150147, 149oveq12d 7422 . . . . . . . . . . . . . . . . . . . . 21 (𝑝 = inf(𝑇, ℝ, < ) β†’ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))) = (inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))))
151 ovex 7437 . . . . . . . . . . . . . . . . . . . . 21 (inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) ∈ V
152150, 142, 151fvmpt 6994 . . . . . . . . . . . . . . . . . . . 20 (inf(𝑇, ℝ, < ) ∈ β„‚ β†’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )) = (inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))))
153146, 152syl 17 . . . . . . . . . . . . . . . . . . 19 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )) = (inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))))
154145, 153oveq12d 7422 . . . . . . . . . . . . . . . . . 18 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < ))) = ((𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) βˆ’ (inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3)))))
155154fveq2d 6892 . . . . . . . . . . . . . . . . 17 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (absβ€˜(((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )))) = (absβ€˜((𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) βˆ’ (inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))))))
156155breq1d 5157 . . . . . . . . . . . . . . . 16 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ ((absβ€˜(((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3)) ↔ (absβ€˜((𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) βˆ’ (inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3))))
1579rpred 13012 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ 𝐢 ∈ ℝ)
158157ad3antrrr 729 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ 𝐢 ∈ ℝ)
159 reexpcl 14040 . . . . . . . . . . . . . . . . . . . . 21 ((𝑒 ∈ ℝ ∧ 3 ∈ β„•0) β†’ (𝑒↑3) ∈ ℝ)
160107, 15, 159sylancl 587 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (𝑒↑3) ∈ ℝ)
161158, 160remulcld 11240 . . . . . . . . . . . . . . . . . . 19 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (𝐢 Β· (𝑒↑3)) ∈ ℝ)
162107, 161resubcld 11638 . . . . . . . . . . . . . . . . . 18 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) ∈ ℝ)
16315a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ 3 ∈ β„•0)
164110, 163reexpcld 14124 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (inf(𝑇, ℝ, < )↑3) ∈ ℝ)
165158, 164remulcld 11240 . . . . . . . . . . . . . . . . . . 19 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3)) ∈ ℝ)
166110, 165resubcld 11638 . . . . . . . . . . . . . . . . . 18 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) ∈ ℝ)
167162, 166, 165absdifltd 15376 . . . . . . . . . . . . . . . . 17 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ ((absβ€˜((𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) βˆ’ (inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3)) ↔ (((inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) < (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) ∧ (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) < ((inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) + (𝐢 Β· (inf(𝑇, ℝ, < )↑3))))))
168165recnd 11238 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3)) ∈ β„‚)
169146, 168npcand 11571 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ ((inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) + (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) = inf(𝑇, ℝ, < ))
170169breq2d 5159 . . . . . . . . . . . . . . . . . . 19 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ ((𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) < ((inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) + (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) ↔ (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) < inf(𝑇, ℝ, < )))
171 pntlem3.3 . . . . . . . . . . . . . . . . . . . . . . 23 ((πœ‘ ∧ 𝑒 ∈ 𝑇) β†’ (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) ∈ 𝑇)
172171ad4ant14 751 . . . . . . . . . . . . . . . . . . . . . 22 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) ∈ 𝑇)
173 infrelb 12195 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑇 βŠ† ℝ ∧ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑇 π‘₯ ≀ 𝑀 ∧ (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) ∈ 𝑇) β†’ inf(𝑇, ℝ, < ) ≀ (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))))
174115, 116, 172, 173syl3anc 1372 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ inf(𝑇, ℝ, < ) ≀ (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))))
175110, 162, 174lensymd 11361 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ Β¬ (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) < inf(𝑇, ℝ, < ))
176175pm2.21d 121 . . . . . . . . . . . . . . . . . . 19 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ ((𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) < inf(𝑇, ℝ, < ) β†’ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ 𝑒))
177170, 176sylbid 239 . . . . . . . . . . . . . . . . . 18 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ ((𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) < ((inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) + (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) β†’ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ 𝑒))
178177adantld 492 . . . . . . . . . . . . . . . . 17 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ ((((inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) < (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) ∧ (𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) < ((inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) + (𝐢 Β· (inf(𝑇, ℝ, < )↑3)))) β†’ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ 𝑒))
179167, 178sylbid 239 . . . . . . . . . . . . . . . 16 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ ((absβ€˜((𝑒 βˆ’ (𝐢 Β· (𝑒↑3))) βˆ’ (inf(𝑇, ℝ, < ) βˆ’ (𝐢 Β· (inf(𝑇, ℝ, < )↑3))))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3)) β†’ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ 𝑒))
180156, 179sylbid 239 . . . . . . . . . . . . . . 15 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ ((absβ€˜(((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3)) β†’ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ 𝑒))
181136, 180jad 187 . . . . . . . . . . . . . 14 ((((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) ∧ 𝑒 ∈ 𝑇) β†’ (((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠 β†’ (absβ€˜(((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) β†’ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ 𝑒))
182181ralimdva 3168 . . . . . . . . . . . . 13 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ (βˆ€π‘’ ∈ 𝑇 ((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠 β†’ (absβ€˜(((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) β†’ βˆ€π‘’ ∈ 𝑇 (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ 𝑒))
18364ad2antrr 725 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ 𝑇 β‰  βˆ…)
18479ad2antrr 725 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑇 π‘₯ ≀ 𝑀)
185 infregelb 12194 . . . . . . . . . . . . . 14 (((𝑇 βŠ† ℝ ∧ 𝑇 β‰  βˆ… ∧ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑇 π‘₯ ≀ 𝑀) ∧ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ∈ ℝ) β†’ ((inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ inf(𝑇, ℝ, < ) ↔ βˆ€π‘’ ∈ 𝑇 (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ 𝑒))
186106, 183, 184, 98, 185syl31anc 1374 . . . . . . . . . . . . 13 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ ((inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ inf(𝑇, ℝ, < ) ↔ βˆ€π‘’ ∈ 𝑇 (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ 𝑒))
187182, 186sylibrd 259 . . . . . . . . . . . 12 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ (βˆ€π‘’ ∈ 𝑇 ((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠 β†’ (absβ€˜(((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) β†’ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ inf(𝑇, ℝ, < )))
188105, 187syld 47 . . . . . . . . . . 11 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ (βˆ€π‘’ ∈ β„‚ ((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠 β†’ (absβ€˜(((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3))) β†’ (inf(𝑇, ℝ, < ) + (𝑠 / 2)) ≀ inf(𝑇, ℝ, < )))
189100, 188mtod 197 . . . . . . . . . 10 (((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) ∧ 𝑠 ∈ ℝ+) β†’ Β¬ βˆ€π‘’ ∈ β„‚ ((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠 β†’ (absβ€˜(((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3))))
190189nrexdv 3150 . . . . . . . . 9 ((πœ‘ ∧ 0 < inf(𝑇, ℝ, < )) β†’ Β¬ βˆƒπ‘  ∈ ℝ+ βˆ€π‘’ ∈ β„‚ ((absβ€˜(𝑒 βˆ’ inf(𝑇, ℝ, < ))) < 𝑠 β†’ (absβ€˜(((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜π‘’) βˆ’ ((𝑝 ∈ β„‚ ↦ (𝑝 βˆ’ (𝐢 Β· (𝑝↑3))))β€˜inf(𝑇, ℝ, < )))) < (𝐢 Β· (inf(𝑇, ℝ, < )↑3))))
19192, 190pm2.65da 816 . . . . . . . 8 (πœ‘ β†’ Β¬ 0 < inf(𝑇, ℝ, < ))
192191adantr 482 . . . . . . 7 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ Β¬ 0 < inf(𝑇, ℝ, < ))
19329adantr 482 . . . . . . . . . 10 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ 𝑇 βŠ† ℝ)
19464adantr 482 . . . . . . . . . 10 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ 𝑇 β‰  βˆ…)
19579adantr 482 . . . . . . . . . 10 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑇 π‘₯ ≀ 𝑀)
196129adantl 483 . . . . . . . . . 10 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ 𝑠 ∈ ℝ)
197 infregelb 12194 . . . . . . . . . 10 (((𝑇 βŠ† ℝ ∧ 𝑇 β‰  βˆ… ∧ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑇 π‘₯ ≀ 𝑀) ∧ 𝑠 ∈ ℝ) β†’ (𝑠 ≀ inf(𝑇, ℝ, < ) ↔ βˆ€π‘€ ∈ 𝑇 𝑠 ≀ 𝑀))
198193, 194, 195, 196, 197syl31anc 1374 . . . . . . . . 9 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ (𝑠 ≀ inf(𝑇, ℝ, < ) ↔ βˆ€π‘€ ∈ 𝑇 𝑠 ≀ 𝑀))
19922raleqi 3324 . . . . . . . . . 10 (βˆ€π‘€ ∈ 𝑇 𝑠 ≀ 𝑀 ↔ βˆ€π‘€ ∈ {𝑑 ∈ (0[,]𝐴) ∣ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑}𝑠 ≀ 𝑀)
200 breq2 5151 . . . . . . . . . . 11 (𝑀 = 𝑑 β†’ (𝑠 ≀ 𝑀 ↔ 𝑠 ≀ 𝑑))
201200ralrab2 3693 . . . . . . . . . 10 (βˆ€π‘€ ∈ {𝑑 ∈ (0[,]𝐴) ∣ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑}𝑠 ≀ 𝑀 ↔ βˆ€π‘‘ ∈ (0[,]𝐴)(βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 β†’ 𝑠 ≀ 𝑑))
202199, 201bitri 275 . . . . . . . . 9 (βˆ€π‘€ ∈ 𝑇 𝑠 ≀ 𝑀 ↔ βˆ€π‘‘ ∈ (0[,]𝐴)(βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 β†’ 𝑠 ≀ 𝑑))
203198, 202bitrdi 287 . . . . . . . 8 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ (𝑠 ≀ inf(𝑇, ℝ, < ) ↔ βˆ€π‘‘ ∈ (0[,]𝐴)(βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 β†’ 𝑠 ≀ 𝑑)))
204 rpgt0 12982 . . . . . . . . . 10 (𝑠 ∈ ℝ+ β†’ 0 < 𝑠)
205204adantl 483 . . . . . . . . 9 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ 0 < 𝑠)
20681adantr 482 . . . . . . . . . 10 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ inf(𝑇, ℝ, < ) ∈ ℝ)
207 ltletr 11302 . . . . . . . . . 10 ((0 ∈ ℝ ∧ 𝑠 ∈ ℝ ∧ inf(𝑇, ℝ, < ) ∈ ℝ) β†’ ((0 < 𝑠 ∧ 𝑠 ≀ inf(𝑇, ℝ, < )) β†’ 0 < inf(𝑇, ℝ, < )))
20824, 196, 206, 207mp3an2i 1467 . . . . . . . . 9 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ ((0 < 𝑠 ∧ 𝑠 ≀ inf(𝑇, ℝ, < )) β†’ 0 < inf(𝑇, ℝ, < )))
209205, 208mpand 694 . . . . . . . 8 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ (𝑠 ≀ inf(𝑇, ℝ, < ) β†’ 0 < inf(𝑇, ℝ, < )))
210203, 209sylbird 260 . . . . . . 7 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ (βˆ€π‘‘ ∈ (0[,]𝐴)(βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 β†’ 𝑠 ≀ 𝑑) β†’ 0 < inf(𝑇, ℝ, < )))
211192, 210mtod 197 . . . . . 6 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ Β¬ βˆ€π‘‘ ∈ (0[,]𝐴)(βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 β†’ 𝑠 ≀ 𝑑))
212 rexanali 3103 . . . . . 6 (βˆƒπ‘‘ ∈ (0[,]𝐴)(βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 ∧ Β¬ 𝑠 ≀ 𝑑) ↔ Β¬ βˆ€π‘‘ ∈ (0[,]𝐴)(βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 β†’ 𝑠 ≀ 𝑑))
213211, 212sylibr 233 . . . . 5 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ βˆƒπ‘‘ ∈ (0[,]𝐴)(βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 ∧ Β¬ 𝑠 ≀ 𝑑))
214 fveq2 6888 . . . . . . . . . . . . . . 15 (𝑧 = π‘₯ β†’ (π‘…β€˜π‘§) = (π‘…β€˜π‘₯))
215 id 22 . . . . . . . . . . . . . . 15 (𝑧 = π‘₯ β†’ 𝑧 = π‘₯)
216214, 215oveq12d 7422 . . . . . . . . . . . . . 14 (𝑧 = π‘₯ β†’ ((π‘…β€˜π‘§) / 𝑧) = ((π‘…β€˜π‘₯) / π‘₯))
217216fveq2d 6892 . . . . . . . . . . . . 13 (𝑧 = π‘₯ β†’ (absβ€˜((π‘…β€˜π‘§) / 𝑧)) = (absβ€˜((π‘…β€˜π‘₯) / π‘₯)))
218217breq1d 5157 . . . . . . . . . . . 12 (𝑧 = π‘₯ β†’ ((absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 ↔ (absβ€˜((π‘…β€˜π‘₯) / π‘₯)) ≀ 𝑑))
219218cbvralvw 3235 . . . . . . . . . . 11 (βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 ↔ βˆ€π‘₯ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘₯) / π‘₯)) ≀ 𝑑)
220 rpre 12978 . . . . . . . . . . . . . . . . 17 (π‘₯ ∈ ℝ+ β†’ π‘₯ ∈ ℝ)
221220ad2antll 728 . . . . . . . . . . . . . . . 16 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ π‘₯ ∈ ℝ)
222 simprl 770 . . . . . . . . . . . . . . . 16 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ 𝑦 ≀ π‘₯)
223 simplr 768 . . . . . . . . . . . . . . . . . 18 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ 𝑦 ∈ ℝ+)
224223rpred 13012 . . . . . . . . . . . . . . . . 17 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ 𝑦 ∈ ℝ)
225 elicopnf 13418 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ ℝ β†’ (π‘₯ ∈ (𝑦[,)+∞) ↔ (π‘₯ ∈ ℝ ∧ 𝑦 ≀ π‘₯)))
226224, 225syl 17 . . . . . . . . . . . . . . . 16 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ (π‘₯ ∈ (𝑦[,)+∞) ↔ (π‘₯ ∈ ℝ ∧ 𝑦 ≀ π‘₯)))
227221, 222, 226mpbir2and 712 . . . . . . . . . . . . . . 15 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ π‘₯ ∈ (𝑦[,)+∞))
228 pntlem3.r . . . . . . . . . . . . . . . . . . . . . 22 𝑅 = (π‘Ž ∈ ℝ+ ↦ ((Οˆβ€˜π‘Ž) βˆ’ π‘Ž))
229228pntrval 27045 . . . . . . . . . . . . . . . . . . . . 21 (π‘₯ ∈ ℝ+ β†’ (π‘…β€˜π‘₯) = ((Οˆβ€˜π‘₯) βˆ’ π‘₯))
230229ad2antll 728 . . . . . . . . . . . . . . . . . . . 20 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ (π‘…β€˜π‘₯) = ((Οˆβ€˜π‘₯) βˆ’ π‘₯))
231230oveq1d 7419 . . . . . . . . . . . . . . . . . . 19 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ ((π‘…β€˜π‘₯) / π‘₯) = (((Οˆβ€˜π‘₯) βˆ’ π‘₯) / π‘₯))
232 chpcl 26608 . . . . . . . . . . . . . . . . . . . . . 22 (π‘₯ ∈ ℝ β†’ (Οˆβ€˜π‘₯) ∈ ℝ)
233221, 232syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ (Οˆβ€˜π‘₯) ∈ ℝ)
234233recnd 11238 . . . . . . . . . . . . . . . . . . . 20 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ (Οˆβ€˜π‘₯) ∈ β„‚)
235 rpcn 12980 . . . . . . . . . . . . . . . . . . . . 21 (π‘₯ ∈ ℝ+ β†’ π‘₯ ∈ β„‚)
236235ad2antll 728 . . . . . . . . . . . . . . . . . . . 20 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ π‘₯ ∈ β„‚)
237 rpne0 12986 . . . . . . . . . . . . . . . . . . . . 21 (π‘₯ ∈ ℝ+ β†’ π‘₯ β‰  0)
238237ad2antll 728 . . . . . . . . . . . . . . . . . . . 20 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ π‘₯ β‰  0)
239234, 236, 236, 238divsubdird 12025 . . . . . . . . . . . . . . . . . . 19 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ (((Οˆβ€˜π‘₯) βˆ’ π‘₯) / π‘₯) = (((Οˆβ€˜π‘₯) / π‘₯) βˆ’ (π‘₯ / π‘₯)))
240236, 238dividd 11984 . . . . . . . . . . . . . . . . . . . 20 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ (π‘₯ / π‘₯) = 1)
241240oveq2d 7420 . . . . . . . . . . . . . . . . . . 19 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ (((Οˆβ€˜π‘₯) / π‘₯) βˆ’ (π‘₯ / π‘₯)) = (((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1))
242231, 239, 2413eqtrrd 2778 . . . . . . . . . . . . . . . . . 18 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ (((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1) = ((π‘…β€˜π‘₯) / π‘₯))
243242fveq2d 6892 . . . . . . . . . . . . . . . . 17 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) = (absβ€˜((π‘…β€˜π‘₯) / π‘₯)))
244243breq1d 5157 . . . . . . . . . . . . . . . 16 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ ((absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) ≀ 𝑑 ↔ (absβ€˜((π‘…β€˜π‘₯) / π‘₯)) ≀ 𝑑))
245 simprr 772 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) β†’ Β¬ 𝑠 ≀ 𝑑)
246245ad2antrr 725 . . . . . . . . . . . . . . . . . 18 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ Β¬ 𝑠 ≀ 𝑑)
24728ad2antrr 725 . . . . . . . . . . . . . . . . . . . . 21 (((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) β†’ (0[,]𝐴) βŠ† ℝ)
248247ad2antrr 725 . . . . . . . . . . . . . . . . . . . 20 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ (0[,]𝐴) βŠ† ℝ)
249 simplrl 776 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) β†’ 𝑑 ∈ (0[,]𝐴))
250249adantr 482 . . . . . . . . . . . . . . . . . . . 20 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ 𝑑 ∈ (0[,]𝐴))
251248, 250sseldd 3982 . . . . . . . . . . . . . . . . . . 19 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ 𝑑 ∈ ℝ)
252 simp-4r 783 . . . . . . . . . . . . . . . . . . . 20 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ 𝑠 ∈ ℝ+)
253252rpred 13012 . . . . . . . . . . . . . . . . . . 19 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ 𝑠 ∈ ℝ)
254251, 253ltnled 11357 . . . . . . . . . . . . . . . . . 18 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ (𝑑 < 𝑠 ↔ Β¬ 𝑠 ≀ 𝑑))
255246, 254mpbird 257 . . . . . . . . . . . . . . . . 17 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ 𝑑 < 𝑠)
256220, 232syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 (π‘₯ ∈ ℝ+ β†’ (Οˆβ€˜π‘₯) ∈ ℝ)
257 rerpdivcl 13000 . . . . . . . . . . . . . . . . . . . . . . 23 (((Οˆβ€˜π‘₯) ∈ ℝ ∧ π‘₯ ∈ ℝ+) β†’ ((Οˆβ€˜π‘₯) / π‘₯) ∈ ℝ)
258256, 257mpancom 687 . . . . . . . . . . . . . . . . . . . . . 22 (π‘₯ ∈ ℝ+ β†’ ((Οˆβ€˜π‘₯) / π‘₯) ∈ ℝ)
259258ad2antll 728 . . . . . . . . . . . . . . . . . . . . 21 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ ((Οˆβ€˜π‘₯) / π‘₯) ∈ ℝ)
260 resubcl 11520 . . . . . . . . . . . . . . . . . . . . 21 ((((Οˆβ€˜π‘₯) / π‘₯) ∈ ℝ ∧ 1 ∈ ℝ) β†’ (((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1) ∈ ℝ)
261259, 43, 260sylancl 587 . . . . . . . . . . . . . . . . . . . 20 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ (((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1) ∈ ℝ)
262261recnd 11238 . . . . . . . . . . . . . . . . . . 19 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ (((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1) ∈ β„‚)
263262abscld 15379 . . . . . . . . . . . . . . . . . 18 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) ∈ ℝ)
264 lelttr 11300 . . . . . . . . . . . . . . . . . 18 (((absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) ∈ ℝ ∧ 𝑑 ∈ ℝ ∧ 𝑠 ∈ ℝ) β†’ (((absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) ≀ 𝑑 ∧ 𝑑 < 𝑠) β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠))
265263, 251, 253, 264syl3anc 1372 . . . . . . . . . . . . . . . . 17 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ (((absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) ≀ 𝑑 ∧ 𝑑 < 𝑠) β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠))
266255, 265mpan2d 693 . . . . . . . . . . . . . . . 16 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ ((absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) ≀ 𝑑 β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠))
267244, 266sylbird 260 . . . . . . . . . . . . . . 15 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ ((absβ€˜((π‘…β€˜π‘₯) / π‘₯)) ≀ 𝑑 β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠))
268227, 267embantd 59 . . . . . . . . . . . . . 14 (((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) ∧ (𝑦 ≀ π‘₯ ∧ π‘₯ ∈ ℝ+)) β†’ ((π‘₯ ∈ (𝑦[,)+∞) β†’ (absβ€˜((π‘…β€˜π‘₯) / π‘₯)) ≀ 𝑑) β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠))
269268exp32 422 . . . . . . . . . . . . 13 ((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) β†’ (𝑦 ≀ π‘₯ β†’ (π‘₯ ∈ ℝ+ β†’ ((π‘₯ ∈ (𝑦[,)+∞) β†’ (absβ€˜((π‘…β€˜π‘₯) / π‘₯)) ≀ 𝑑) β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠))))
270269com24 95 . . . . . . . . . . . 12 ((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) β†’ ((π‘₯ ∈ (𝑦[,)+∞) β†’ (absβ€˜((π‘…β€˜π‘₯) / π‘₯)) ≀ 𝑑) β†’ (π‘₯ ∈ ℝ+ β†’ (𝑦 ≀ π‘₯ β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠))))
271270ralimdv2 3164 . . . . . . . . . . 11 ((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) β†’ (βˆ€π‘₯ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘₯) / π‘₯)) ≀ 𝑑 β†’ βˆ€π‘₯ ∈ ℝ+ (𝑦 ≀ π‘₯ β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠)))
272219, 271biimtrid 241 . . . . . . . . . 10 ((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) ∧ 𝑦 ∈ ℝ+) β†’ (βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 β†’ βˆ€π‘₯ ∈ ℝ+ (𝑦 ≀ π‘₯ β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠)))
273272reximdva 3169 . . . . . . . . 9 (((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ (𝑑 ∈ (0[,]𝐴) ∧ Β¬ 𝑠 ≀ 𝑑)) β†’ (βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 β†’ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘₯ ∈ ℝ+ (𝑦 ≀ π‘₯ β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠)))
274273anassrs 469 . . . . . . . 8 ((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ 𝑑 ∈ (0[,]𝐴)) ∧ Β¬ 𝑠 ≀ 𝑑) β†’ (βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 β†’ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘₯ ∈ ℝ+ (𝑦 ≀ π‘₯ β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠)))
275274impancom 453 . . . . . . 7 ((((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ 𝑑 ∈ (0[,]𝐴)) ∧ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑) β†’ (Β¬ 𝑠 ≀ 𝑑 β†’ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘₯ ∈ ℝ+ (𝑦 ≀ π‘₯ β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠)))
276275expimpd 455 . . . . . 6 (((πœ‘ ∧ 𝑠 ∈ ℝ+) ∧ 𝑑 ∈ (0[,]𝐴)) β†’ ((βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 ∧ Β¬ 𝑠 ≀ 𝑑) β†’ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘₯ ∈ ℝ+ (𝑦 ≀ π‘₯ β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠)))
277276rexlimdva 3156 . . . . 5 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ (βˆƒπ‘‘ ∈ (0[,]𝐴)(βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘§ ∈ (𝑦[,)+∞)(absβ€˜((π‘…β€˜π‘§) / 𝑧)) ≀ 𝑑 ∧ Β¬ 𝑠 ≀ 𝑑) β†’ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘₯ ∈ ℝ+ (𝑦 ≀ π‘₯ β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠)))
278213, 277mpd 15 . . . 4 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘₯ ∈ ℝ+ (𝑦 ≀ π‘₯ β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠))
279 ssrexv 4050 . . . 4 (ℝ+ βŠ† ℝ β†’ (βˆƒπ‘¦ ∈ ℝ+ βˆ€π‘₯ ∈ ℝ+ (𝑦 ≀ π‘₯ β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠) β†’ βˆƒπ‘¦ ∈ ℝ βˆ€π‘₯ ∈ ℝ+ (𝑦 ≀ π‘₯ β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠)))
2801, 278, 279mpsyl 68 . . 3 ((πœ‘ ∧ 𝑠 ∈ ℝ+) β†’ βˆƒπ‘¦ ∈ ℝ βˆ€π‘₯ ∈ ℝ+ (𝑦 ≀ π‘₯ β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠))
281280ralrimiva 3147 . 2 (πœ‘ β†’ βˆ€π‘  ∈ ℝ+ βˆƒπ‘¦ ∈ ℝ βˆ€π‘₯ ∈ ℝ+ (𝑦 ≀ π‘₯ β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠))
282258recnd 11238 . . . . 5 (π‘₯ ∈ ℝ+ β†’ ((Οˆβ€˜π‘₯) / π‘₯) ∈ β„‚)
283282rgen 3064 . . . 4 βˆ€π‘₯ ∈ ℝ+ ((Οˆβ€˜π‘₯) / π‘₯) ∈ β„‚
284283a1i 11 . . 3 (πœ‘ β†’ βˆ€π‘₯ ∈ ℝ+ ((Οˆβ€˜π‘₯) / π‘₯) ∈ β„‚)
2851a1i 11 . . 3 (πœ‘ β†’ ℝ+ βŠ† ℝ)
286 1cnd 11205 . . 3 (πœ‘ β†’ 1 ∈ β„‚)
287284, 285, 286rlim2 15436 . 2 (πœ‘ β†’ ((π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)) β‡π‘Ÿ 1 ↔ βˆ€π‘  ∈ ℝ+ βˆƒπ‘¦ ∈ ℝ βˆ€π‘₯ ∈ ℝ+ (𝑦 ≀ π‘₯ β†’ (absβ€˜(((Οˆβ€˜π‘₯) / π‘₯) βˆ’ 1)) < 𝑠)))
288281, 287mpbird 257 1 (πœ‘ β†’ (π‘₯ ∈ ℝ+ ↦ ((Οˆβ€˜π‘₯) / π‘₯)) β‡π‘Ÿ 1)
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ↔ wb 205   ∧ wa 397   ∧ w3a 1088   = wceq 1542   ∈ wcel 2107   β‰  wne 2941  βˆ€wral 3062  βˆƒwrex 3071  {crab 3433   βŠ† wss 3947  βˆ…c0 4321   class class class wbr 5147   ↦ cmpt 5230  β€˜cfv 6540  (class class class)co 7404  infcinf 9432  β„‚cc 11104  β„cr 11105  0cc0 11106  1c1 11107   + caddc 11109   Β· cmul 11111  +∞cpnf 11241  β„*cxr 11243   < clt 11244   ≀ cle 11245   βˆ’ cmin 11440   / cdiv 11867  2c2 12263  3c3 12264  β„•0cn0 12468  β„€cz 12554  β„+crp 12970  [,)cico 13322  [,]cicc 13323  β†‘cexp 14023  abscabs 15177   β‡π‘Ÿ crli 15425  TopOpenctopn 17363  β„‚fldccnfld 20929   Cn ccn 22710   Γ—t ctx 23046  β€“cnβ†’ccncf 24374  Οˆcchp 26577
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7720  ax-inf2 9632  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184  ax-addf 11185  ax-mulf 11186
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-tp 4632  df-op 4634  df-uni 4908  df-int 4950  df-iun 4998  df-iin 4999  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-se 5631  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6297  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7360  df-ov 7407  df-oprab 7408  df-mpo 7409  df-of 7665  df-om 7851  df-1st 7970  df-2nd 7971  df-supp 8142  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-1o 8461  df-2o 8462  df-oadd 8465  df-er 8699  df-map 8818  df-pm 8819  df-ixp 8888  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-fsupp 9358  df-fi 9402  df-sup 9433  df-inf 9434  df-oi 9501  df-dju 9892  df-card 9930  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-div 11868  df-nn 12209  df-2 12271  df-3 12272  df-4 12273  df-5 12274  df-6 12275  df-7 12276  df-8 12277  df-9 12278  df-n0 12469  df-z 12555  df-dec 12674  df-uz 12819  df-q 12929  df-rp 12971  df-xneg 13088  df-xadd 13089  df-xmul 13090  df-ioo 13324  df-ioc 13325  df-ico 13326  df-icc 13327  df-fz 13481  df-fzo 13624  df-fl 13753  df-mod 13831  df-seq 13963  df-exp 14024  df-fac 14230  df-bc 14259  df-hash 14287  df-shft 15010  df-cj 15042  df-re 15043  df-im 15044  df-sqrt 15178  df-abs 15179  df-limsup 15411  df-clim 15428  df-rlim 15429  df-sum 15629  df-ef 16007  df-sin 16009  df-cos 16010  df-pi 16012  df-dvds 16194  df-gcd 16432  df-prm 16605  df-pc 16766  df-struct 17076  df-sets 17093  df-slot 17111  df-ndx 17123  df-base 17141  df-ress 17170  df-plusg 17206  df-mulr 17207  df-starv 17208  df-sca 17209  df-vsca 17210  df-ip 17211  df-tset 17212  df-ple 17213  df-ds 17215  df-unif 17216  df-hom 17217  df-cco 17218  df-rest 17364  df-topn 17365  df-0g 17383  df-gsum 17384  df-topgen 17385  df-pt 17386  df-prds 17389  df-xrs 17444  df-qtop 17449  df-imas 17450  df-xps 17452  df-mre 17526  df-mrc 17527  df-acs 17529  df-mgm 18557  df-sgrp 18606  df-mnd 18622  df-submnd 18668  df-mulg 18945  df-cntz 19175  df-cmn 19643  df-psmet 20921  df-xmet 20922  df-met 20923  df-bl 20924  df-mopn 20925  df-fbas 20926  df-fg 20927  df-cnfld 20930  df-top 22378  df-topon 22395  df-topsp 22417  df-bases 22431  df-cld 22505  df-ntr 22506  df-cls 22507  df-nei 22584  df-lp 22622  df-perf 22623  df-cn 22713  df-cnp 22714  df-haus 22801  df-tx 23048  df-hmeo 23241  df-fil 23332  df-fm 23424  df-flim 23425  df-flf 23426  df-xms 23808  df-ms 23809  df-tms 23810  df-cncf 24376  df-limc 25365  df-dv 25366  df-log 26047  df-vma 26582  df-chp 26583
This theorem is referenced by:  pntleml  27094
  Copyright terms: Public domain W3C validator