Metamath Proof Explorer


Theorem chpo1ub

Description: The psi function is upper bounded by a linear term. (Contributed by Mario Carneiro, 16-Apr-2016)

Ref Expression
Assertion chpo1ub ⊢ x ∈ ℝ + ⟼ ψ ⁡ x x ∈ 𝑂⁡1

Proof

Step Hyp Ref Expression
1 2re ⊢ 2 ∈ ℝ
2 elicopnf ⊢ 2 ∈ ℝ → x ∈ 2 +∞ ↔ x ∈ ℝ ∧ 2 ≤ x
3 1 2 ax-mp ⊢ x ∈ 2 +∞ ↔ x ∈ ℝ ∧ 2 ≤ x
4 chtrpcl ⊢ x ∈ ℝ ∧ 2 ≤ x → θ ⁡ x ∈ ℝ +
5 3 4 sylbi ⊢ x ∈ 2 +∞ → θ ⁡ x ∈ ℝ +
6 5 rpcnne0d ⊢ x ∈ 2 +∞ → θ ⁡ x ∈ ℂ ∧ θ ⁡ x ≠ 0
7 3 simplbi ⊢ x ∈ 2 +∞ → x ∈ ℝ
8 0red ⊢ x ∈ 2 +∞ → 0 ∈ ℝ
9 1 a1i ⊢ x ∈ 2 +∞ → 2 ∈ ℝ
10 2pos ⊢ 0 < 2
11 10 a1i ⊢ x ∈ 2 +∞ → 0 < 2
12 3 simprbi ⊢ x ∈ 2 +∞ → 2 ≤ x
13 8 9 7 11 12 ltletrd ⊢ x ∈ 2 +∞ → 0 < x
14 7 13 elrpd ⊢ x ∈ 2 +∞ → x ∈ ℝ +
15 14 rpcnne0d ⊢ x ∈ 2 +∞ → x ∈ ℂ ∧ x ≠ 0
16 rpre ⊢ x ∈ ℝ + → x ∈ ℝ
17 chpcl ⊢ x ∈ ℝ → ψ ⁡ x ∈ ℝ
18 16 17 syl ⊢ x ∈ ℝ + → ψ ⁡ x ∈ ℝ
19 18 recnd ⊢ x ∈ ℝ + → ψ ⁡ x ∈ ℂ
20 14 19 syl ⊢ x ∈ 2 +∞ → ψ ⁡ x ∈ ℂ
21 dmdcan ⊢ θ ⁡ x ∈ ℂ ∧ θ ⁡ x ≠ 0 ∧ x ∈ ℂ ∧ x ≠ 0 ∧ ψ ⁡ x ∈ ℂ → θ ⁡ x x ⁢ ψ ⁡ x θ ⁡ x = ψ ⁡ x x
22 6 15 20 21 syl3anc ⊢ x ∈ 2 +∞ → θ ⁡ x x ⁢ ψ ⁡ x θ ⁡ x = ψ ⁡ x x
23 22 adantl ⊢ ⊤ ∧ x ∈ 2 +∞ → θ ⁡ x x ⁢ ψ ⁡ x θ ⁡ x = ψ ⁡ x x
24 23 mpteq2dva ⊢ ⊤ → x ∈ 2 +∞ ⟼ θ ⁡ x x ⁢ ψ ⁡ x θ ⁡ x = x ∈ 2 +∞ ⟼ ψ ⁡ x x
25 ovexd ⊢ ⊤ → 2 +∞ ∈ V
26 ovexd ⊢ ⊤ ∧ x ∈ 2 +∞ → θ ⁡ x x ∈ V
27 ovexd ⊢ ⊤ ∧ x ∈ 2 +∞ → ψ ⁡ x θ ⁡ x ∈ V
28 eqidd ⊢ ⊤ → x ∈ 2 +∞ ⟼ θ ⁡ x x = x ∈ 2 +∞ ⟼ θ ⁡ x x
29 eqidd ⊢ ⊤ → x ∈ 2 +∞ ⟼ ψ ⁡ x θ ⁡ x = x ∈ 2 +∞ ⟼ ψ ⁡ x θ ⁡ x
30 25 26 27 28 29 offval2 ⊢ ⊤ → x ∈ 2 +∞ ⟼ θ ⁡ x x × f x ∈ 2 +∞ ⟼ ψ ⁡ x θ ⁡ x = x ∈ 2 +∞ ⟼ θ ⁡ x x ⁢ ψ ⁡ x θ ⁡ x
31 14 ssriv ⊢ 2 +∞ ⊆ ℝ +
32 resmpt ⊢ 2 +∞ ⊆ ℝ + → x ∈ ℝ + ⟼ ψ ⁡ x x ↾ 2 +∞ = x ∈ 2 +∞ ⟼ ψ ⁡ x x
33 31 32 mp1i ⊢ ⊤ → x ∈ ℝ + ⟼ ψ ⁡ x x ↾ 2 +∞ = x ∈ 2 +∞ ⟼ ψ ⁡ x x
34 24 30 33 3eqtr4rd ⊢ ⊤ → x ∈ ℝ + ⟼ ψ ⁡ x x ↾ 2 +∞ = x ∈ 2 +∞ ⟼ θ ⁡ x x × f x ∈ 2 +∞ ⟼ ψ ⁡ x θ ⁡ x
35 31 a1i ⊢ ⊤ → 2 +∞ ⊆ ℝ +
36 chto1ub ⊢ x ∈ ℝ + ⟼ θ ⁡ x x ∈ 𝑂⁡1
37 36 a1i ⊢ ⊤ → x ∈ ℝ + ⟼ θ ⁡ x x ∈ 𝑂⁡1
38 35 37 o1res2 ⊢ ⊤ → x ∈ 2 +∞ ⟼ θ ⁡ x x ∈ 𝑂⁡1
39 chpchtlim ⊢ x ∈ 2 +∞ ⟼ ψ ⁡ x θ ⁡ x ⇝ℝ 1
40 rlimo1 ⊢ x ∈ 2 +∞ ⟼ ψ ⁡ x θ ⁡ x ⇝ℝ 1 → x ∈ 2 +∞ ⟼ ψ ⁡ x θ ⁡ x ∈ 𝑂⁡1
41 39 40 ax-mp ⊢ x ∈ 2 +∞ ⟼ ψ ⁡ x θ ⁡ x ∈ 𝑂⁡1
42 o1mul ⊢ x ∈ 2 +∞ ⟼ θ ⁡ x x ∈ 𝑂⁡1 ∧ x ∈ 2 +∞ ⟼ ψ ⁡ x θ ⁡ x ∈ 𝑂⁡1 → x ∈ 2 +∞ ⟼ θ ⁡ x x × f x ∈ 2 +∞ ⟼ ψ ⁡ x θ ⁡ x ∈ 𝑂⁡1
43 38 41 42 sylancl ⊢ ⊤ → x ∈ 2 +∞ ⟼ θ ⁡ x x × f x ∈ 2 +∞ ⟼ ψ ⁡ x θ ⁡ x ∈ 𝑂⁡1
44 34 43 eqeltrd ⊢ ⊤ → x ∈ ℝ + ⟼ ψ ⁡ x x ↾ 2 +∞ ∈ 𝑂⁡1
45 rerpdivcl ⊢ ψ ⁡ x ∈ ℝ ∧ x ∈ ℝ + → ψ ⁡ x x ∈ ℝ
46 18 45 mpancom ⊢ x ∈ ℝ + → ψ ⁡ x x ∈ ℝ
47 46 recnd ⊢ x ∈ ℝ + → ψ ⁡ x x ∈ ℂ
48 47 adantl ⊢ ⊤ ∧ x ∈ ℝ + → ψ ⁡ x x ∈ ℂ
49 48 fmpttd ⊢ ⊤ → x ∈ ℝ + ⟼ ψ ⁡ x x : ℝ + ⟶ ℂ
50 rpssre ⊢ ℝ + ⊆ ℝ
51 50 a1i ⊢ ⊤ → ℝ + ⊆ ℝ
52 1 a1i ⊢ ⊤ → 2 ∈ ℝ
53 49 51 52 o1resb ⊢ ⊤ → x ∈ ℝ + ⟼ ψ ⁡ x x ∈ 𝑂⁡1 ↔ x ∈ ℝ + ⟼ ψ ⁡ x x ↾ 2 +∞ ∈ 𝑂⁡1
54 44 53 mpbird ⊢ ⊤ → x ∈ ℝ + ⟼ ψ ⁡ x x ∈ 𝑂⁡1
55 54 mptru ⊢ x ∈ ℝ + ⟼ ψ ⁡ x x ∈ 𝑂⁡1