Metamath Proof Explorer


Theorem infleinf

Description: If any element of B can be approximated from above by members of A , then the infimum of A is less than or equal to the infimum of B . (Contributed by Glauco Siliprandi, 3-Mar-2021)

Ref Expression
Hypotheses infleinf.a ⊢ φ → A ⊆ ℝ *
infleinf.b ⊢ φ → B ⊆ ℝ *
infleinf.c ⊢ φ ∧ x ∈ B ∧ y ∈ ℝ + → ∃ z ∈ A z ≤ x + 𝑒 y
Assertion infleinf ⊢ φ → inf A ℝ * < ≤ inf B ℝ * <

Proof

Step Hyp Ref Expression
1 infleinf.a ⊢ φ → A ⊆ ℝ *
2 infleinf.b ⊢ φ → B ⊆ ℝ *
3 infleinf.c ⊢ φ ∧ x ∈ B ∧ y ∈ ℝ + → ∃ z ∈ A z ≤ x + 𝑒 y
4 infxrcl ⊢ A ⊆ ℝ * → inf A ℝ * < ∈ ℝ *
5 1 4 syl ⊢ φ → inf A ℝ * < ∈ ℝ *
6 pnfge ⊢ inf A ℝ * < ∈ ℝ * → inf A ℝ * < ≤ +∞
7 5 6 syl ⊢ φ → inf A ℝ * < ≤ +∞
8 7 adantr ⊢ φ ∧ B = ∅ → inf A ℝ * < ≤ +∞
9 infeq1 ⊢ B = ∅ → inf B ℝ * < = inf ∅ ℝ * <
10 xrinf0 ⊢ inf ∅ ℝ * < = +∞
11 10 a1i ⊢ B = ∅ → inf ∅ ℝ * < = +∞
12 9 11 eqtrd ⊢ B = ∅ → inf B ℝ * < = +∞
13 12 eqcomd ⊢ B = ∅ → +∞ = inf B ℝ * <
14 13 adantl ⊢ φ ∧ B = ∅ → +∞ = inf B ℝ * <
15 8 14 breqtrd ⊢ φ ∧ B = ∅ → inf A ℝ * < ≤ inf B ℝ * <
16 neqne ⊢ ¬ B = ∅ → B ≠ ∅
17 16 adantl ⊢ φ ∧ ¬ B = ∅ → B ≠ ∅
18 5 adantr ⊢ φ ∧ inf B ℝ * < = −∞ → inf A ℝ * < ∈ ℝ *
19 id ⊢ r ∈ ℝ → r ∈ ℝ
20 2re ⊢ 2 ∈ ℝ
21 20 a1i ⊢ r ∈ ℝ → 2 ∈ ℝ
22 19 21 resubcld ⊢ r ∈ ℝ → r − 2 ∈ ℝ
23 22 adantl ⊢ φ ∧ inf B ℝ * < = −∞ ∧ r ∈ ℝ → r − 2 ∈ ℝ
24 simpr ⊢ φ ∧ inf B ℝ * < = −∞ → inf B ℝ * < = −∞
25 infxrunb2 ⊢ B ⊆ ℝ * → ∀ y ∈ ℝ ∃ x ∈ B x < y ↔ inf B ℝ * < = −∞
26 2 25 syl ⊢ φ → ∀ y ∈ ℝ ∃ x ∈ B x < y ↔ inf B ℝ * < = −∞
27 26 adantr ⊢ φ ∧ inf B ℝ * < = −∞ → ∀ y ∈ ℝ ∃ x ∈ B x < y ↔ inf B ℝ * < = −∞
28 24 27 mpbird ⊢ φ ∧ inf B ℝ * < = −∞ → ∀ y ∈ ℝ ∃ x ∈ B x < y
29 28 adantr ⊢ φ ∧ inf B ℝ * < = −∞ ∧ r ∈ ℝ → ∀ y ∈ ℝ ∃ x ∈ B x < y
30 breq2 ⊢ y = r − 2 → x < y ↔ x < r − 2
31 30 rexbidv ⊢ y = r − 2 → ∃ x ∈ B x < y ↔ ∃ x ∈ B x < r − 2
32 31 rspcva ⊢ r − 2 ∈ ℝ ∧ ∀ y ∈ ℝ ∃ x ∈ B x < y → ∃ x ∈ B x < r − 2
33 23 29 32 syl2anc ⊢ φ ∧ inf B ℝ * < = −∞ ∧ r ∈ ℝ → ∃ x ∈ B x < r − 2
34 simpl ⊢ φ ∧ x ∈ B → φ
35 simpr ⊢ φ ∧ x ∈ B → x ∈ B
36 1rp ⊢ 1 ∈ ℝ +
37 36 a1i ⊢ φ ∧ x ∈ B → 1 ∈ ℝ +
38 1ex ⊢ 1 ∈ V
39 eleq1 ⊢ y = 1 → y ∈ ℝ + ↔ 1 ∈ ℝ +
40 39 3anbi3d ⊢ y = 1 → φ ∧ x ∈ B ∧ y ∈ ℝ + ↔ φ ∧ x ∈ B ∧ 1 ∈ ℝ +
41 oveq2 ⊢ y = 1 → x + 𝑒 y = x + 𝑒 1
42 41 breq2d ⊢ y = 1 → z ≤ x + 𝑒 y ↔ z ≤ x + 𝑒 1
43 42 rexbidv ⊢ y = 1 → ∃ z ∈ A z ≤ x + 𝑒 y ↔ ∃ z ∈ A z ≤ x + 𝑒 1
44 40 43 imbi12d ⊢ y = 1 → φ ∧ x ∈ B ∧ y ∈ ℝ + → ∃ z ∈ A z ≤ x + 𝑒 y ↔ φ ∧ x ∈ B ∧ 1 ∈ ℝ + → ∃ z ∈ A z ≤ x + 𝑒 1
45 38 44 3 vtocl ⊢ φ ∧ x ∈ B ∧ 1 ∈ ℝ + → ∃ z ∈ A z ≤ x + 𝑒 1
46 34 35 37 45 syl3anc ⊢ φ ∧ x ∈ B → ∃ z ∈ A z ≤ x + 𝑒 1
47 46 adantlr ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B → ∃ z ∈ A z ≤ x + 𝑒 1
48 47 3adant3 ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 → ∃ z ∈ A z ≤ x + 𝑒 1
49 simp1l ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 → φ
50 49 ad2antrr ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 1 → φ
51 50 1 syl ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 1 → A ⊆ ℝ *
52 50 2 syl ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 1 → B ⊆ ℝ *
53 simp1r ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 → r ∈ ℝ
54 53 ad2antrr ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 1 → r ∈ ℝ
55 simp2 ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 → x ∈ B
56 55 ad2antrr ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 1 → x ∈ B
57 simpll3 ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 1 → x < r − 2
58 simplr ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 1 → z ∈ A
59 simpr ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 1 → z ≤ x + 𝑒 1
60 51 52 54 56 57 58 59 infleinflem2 ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 1 → z < r
61 60 ex ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 ∧ z ∈ A → z ≤ x + 𝑒 1 → z < r
62 61 reximdva ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 → ∃ z ∈ A z ≤ x + 𝑒 1 → ∃ z ∈ A z < r
63 48 62 mpd ⊢ φ ∧ r ∈ ℝ ∧ x ∈ B ∧ x < r − 2 → ∃ z ∈ A z < r
64 63 3exp ⊢ φ ∧ r ∈ ℝ → x ∈ B → x < r − 2 → ∃ z ∈ A z < r
65 64 adantlr ⊢ φ ∧ inf B ℝ * < = −∞ ∧ r ∈ ℝ → x ∈ B → x < r − 2 → ∃ z ∈ A z < r
66 65 rexlimdv ⊢ φ ∧ inf B ℝ * < = −∞ ∧ r ∈ ℝ → ∃ x ∈ B x < r − 2 → ∃ z ∈ A z < r
67 33 66 mpd ⊢ φ ∧ inf B ℝ * < = −∞ ∧ r ∈ ℝ → ∃ z ∈ A z < r
68 67 ralrimiva ⊢ φ ∧ inf B ℝ * < = −∞ → ∀ r ∈ ℝ ∃ z ∈ A z < r
69 infxrunb2 ⊢ A ⊆ ℝ * → ∀ r ∈ ℝ ∃ z ∈ A z < r ↔ inf A ℝ * < = −∞
70 1 69 syl ⊢ φ → ∀ r ∈ ℝ ∃ z ∈ A z < r ↔ inf A ℝ * < = −∞
71 70 adantr ⊢ φ ∧ inf B ℝ * < = −∞ → ∀ r ∈ ℝ ∃ z ∈ A z < r ↔ inf A ℝ * < = −∞
72 68 71 mpbid ⊢ φ ∧ inf B ℝ * < = −∞ → inf A ℝ * < = −∞
73 72 24 eqtr4d ⊢ φ ∧ inf B ℝ * < = −∞ → inf A ℝ * < = inf B ℝ * <
74 18 73 xreqled ⊢ φ ∧ inf B ℝ * < = −∞ → inf A ℝ * < ≤ inf B ℝ * <
75 74 adantlr ⊢ φ ∧ B ≠ ∅ ∧ inf B ℝ * < = −∞ → inf A ℝ * < ≤ inf B ℝ * <
76 mnfxr ⊢ −∞ ∈ ℝ *
77 76 a1i ⊢ φ → −∞ ∈ ℝ *
78 77 ad2antrr ⊢ φ ∧ B ≠ ∅ ∧ ¬ inf B ℝ * < = −∞ → −∞ ∈ ℝ *
79 infxrcl ⊢ B ⊆ ℝ * → inf B ℝ * < ∈ ℝ *
80 2 79 syl ⊢ φ → inf B ℝ * < ∈ ℝ *
81 80 ad2antrr ⊢ φ ∧ B ≠ ∅ ∧ ¬ inf B ℝ * < = −∞ → inf B ℝ * < ∈ ℝ *
82 mnfle ⊢ inf B ℝ * < ∈ ℝ * → −∞ ≤ inf B ℝ * <
83 81 82 syl ⊢ φ ∧ B ≠ ∅ ∧ ¬ inf B ℝ * < = −∞ → −∞ ≤ inf B ℝ * <
84 neqne ⊢ ¬ inf B ℝ * < = −∞ → inf B ℝ * < ≠ −∞
85 84 necomd ⊢ ¬ inf B ℝ * < = −∞ → −∞ ≠ inf B ℝ * <
86 85 adantl ⊢ φ ∧ B ≠ ∅ ∧ ¬ inf B ℝ * < = −∞ → −∞ ≠ inf B ℝ * <
87 78 81 83 86 xrleneltd ⊢ φ ∧ B ≠ ∅ ∧ ¬ inf B ℝ * < = −∞ → −∞ < inf B ℝ * <
88 5 ad2antrr ⊢ φ ∧ B ≠ ∅ ∧ −∞ < inf B ℝ * < → inf A ℝ * < ∈ ℝ *
89 80 ad2antrr ⊢ φ ∧ B ≠ ∅ ∧ −∞ < inf B ℝ * < → inf B ℝ * < ∈ ℝ *
90 nfv ⊢ Ⅎ b φ ∧ B ≠ ∅ ∧ −∞ < inf B ℝ * < ∧ w ∈ ℝ +
91 2 ad3antrrr ⊢ φ ∧ B ≠ ∅ ∧ −∞ < inf B ℝ * < ∧ w ∈ ℝ + → B ⊆ ℝ *
92 simpllr ⊢ φ ∧ B ≠ ∅ ∧ −∞ < inf B ℝ * < ∧ w ∈ ℝ + → B ≠ ∅
93 simpr ⊢ φ ∧ −∞ < inf B ℝ * < → −∞ < inf B ℝ * <
94 infxrbnd2 ⊢ B ⊆ ℝ * → ∃ b ∈ ℝ ∀ x ∈ B b ≤ x ↔ −∞ < inf B ℝ * <
95 2 94 syl ⊢ φ → ∃ b ∈ ℝ ∀ x ∈ B b ≤ x ↔ −∞ < inf B ℝ * <
96 95 adantr ⊢ φ ∧ −∞ < inf B ℝ * < → ∃ b ∈ ℝ ∀ x ∈ B b ≤ x ↔ −∞ < inf B ℝ * <
97 93 96 mpbird ⊢ φ ∧ −∞ < inf B ℝ * < → ∃ b ∈ ℝ ∀ x ∈ B b ≤ x
98 97 ad4ant13 ⊢ φ ∧ B ≠ ∅ ∧ −∞ < inf B ℝ * < ∧ w ∈ ℝ + → ∃ b ∈ ℝ ∀ x ∈ B b ≤ x
99 simpr ⊢ φ ∧ B ≠ ∅ ∧ −∞ < inf B ℝ * < ∧ w ∈ ℝ + → w ∈ ℝ +
100 99 rphalfcld ⊢ φ ∧ B ≠ ∅ ∧ −∞ < inf B ℝ * < ∧ w ∈ ℝ + → w 2 ∈ ℝ +
101 90 91 92 98 100 infrpge ⊢ φ ∧ B ≠ ∅ ∧ −∞ < inf B ℝ * < ∧ w ∈ ℝ + → ∃ x ∈ B x ≤ inf B ℝ * < + 𝑒 w 2
102 simpll ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B → φ
103 simpr ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B → x ∈ B
104 rphalfcl ⊢ w ∈ ℝ + → w 2 ∈ ℝ +
105 104 ad2antlr ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B → w 2 ∈ ℝ +
106 ovex ⊢ w 2 ∈ V
107 eleq1 ⊢ y = w 2 → y ∈ ℝ + ↔ w 2 ∈ ℝ +
108 107 3anbi3d ⊢ y = w 2 → φ ∧ x ∈ B ∧ y ∈ ℝ + ↔ φ ∧ x ∈ B ∧ w 2 ∈ ℝ +
109 oveq2 ⊢ y = w 2 → x + 𝑒 y = x + 𝑒 w 2
110 109 breq2d ⊢ y = w 2 → z ≤ x + 𝑒 y ↔ z ≤ x + 𝑒 w 2
111 110 rexbidv ⊢ y = w 2 → ∃ z ∈ A z ≤ x + 𝑒 y ↔ ∃ z ∈ A z ≤ x + 𝑒 w 2
112 108 111 imbi12d ⊢ y = w 2 → φ ∧ x ∈ B ∧ y ∈ ℝ + → ∃ z ∈ A z ≤ x + 𝑒 y ↔ φ ∧ x ∈ B ∧ w 2 ∈ ℝ + → ∃ z ∈ A z ≤ x + 𝑒 w 2
113 106 112 3 vtocl ⊢ φ ∧ x ∈ B ∧ w 2 ∈ ℝ + → ∃ z ∈ A z ≤ x + 𝑒 w 2
114 102 103 105 113 syl3anc ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B → ∃ z ∈ A z ≤ x + 𝑒 w 2
115 114 3adant3 ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B ∧ x ≤ inf B ℝ * < + 𝑒 w 2 → ∃ z ∈ A z ≤ x + 𝑒 w 2
116 simp11l ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B ∧ x ≤ inf B ℝ * < + 𝑒 w 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 w 2 → φ
117 116 1 syl ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B ∧ x ≤ inf B ℝ * < + 𝑒 w 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 w 2 → A ⊆ ℝ *
118 116 2 syl ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B ∧ x ≤ inf B ℝ * < + 𝑒 w 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 w 2 → B ⊆ ℝ *
119 simp11 ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B ∧ x ≤ inf B ℝ * < + 𝑒 w 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 w 2 → φ ∧ w ∈ ℝ +
120 119 simprd ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B ∧ x ≤ inf B ℝ * < + 𝑒 w 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 w 2 → w ∈ ℝ +
121 simp12 ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B ∧ x ≤ inf B ℝ * < + 𝑒 w 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 w 2 → x ∈ B
122 simp3 ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B ∧ x ≤ inf B ℝ * < + 𝑒 w 2 → x ≤ inf B ℝ * < + 𝑒 w 2
123 122 3ad2ant1 ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B ∧ x ≤ inf B ℝ * < + 𝑒 w 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 w 2 → x ≤ inf B ℝ * < + 𝑒 w 2
124 simp2 ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B ∧ x ≤ inf B ℝ * < + 𝑒 w 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 w 2 → z ∈ A
125 simp3 ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B ∧ x ≤ inf B ℝ * < + 𝑒 w 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 w 2 → z ≤ x + 𝑒 w 2
126 117 118 120 121 123 124 125 infleinflem1 ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B ∧ x ≤ inf B ℝ * < + 𝑒 w 2 ∧ z ∈ A ∧ z ≤ x + 𝑒 w 2 → inf A ℝ * < ≤ inf B ℝ * < + 𝑒 w
127 126 3exp ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B ∧ x ≤ inf B ℝ * < + 𝑒 w 2 → z ∈ A → z ≤ x + 𝑒 w 2 → inf A ℝ * < ≤ inf B ℝ * < + 𝑒 w
128 127 rexlimdv ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B ∧ x ≤ inf B ℝ * < + 𝑒 w 2 → ∃ z ∈ A z ≤ x + 𝑒 w 2 → inf A ℝ * < ≤ inf B ℝ * < + 𝑒 w
129 115 128 mpd ⊢ φ ∧ w ∈ ℝ + ∧ x ∈ B ∧ x ≤ inf B ℝ * < + 𝑒 w 2 → inf A ℝ * < ≤ inf B ℝ * < + 𝑒 w
130 129 3exp ⊢ φ ∧ w ∈ ℝ + → x ∈ B → x ≤ inf B ℝ * < + 𝑒 w 2 → inf A ℝ * < ≤ inf B ℝ * < + 𝑒 w
131 130 rexlimdv ⊢ φ ∧ w ∈ ℝ + → ∃ x ∈ B x ≤ inf B ℝ * < + 𝑒 w 2 → inf A ℝ * < ≤ inf B ℝ * < + 𝑒 w
132 131 ad4ant14 ⊢ φ ∧ B ≠ ∅ ∧ −∞ < inf B ℝ * < ∧ w ∈ ℝ + → ∃ x ∈ B x ≤ inf B ℝ * < + 𝑒 w 2 → inf A ℝ * < ≤ inf B ℝ * < + 𝑒 w
133 101 132 mpd ⊢ φ ∧ B ≠ ∅ ∧ −∞ < inf B ℝ * < ∧ w ∈ ℝ + → inf A ℝ * < ≤ inf B ℝ * < + 𝑒 w
134 88 89 133 xrlexaddrp ⊢ φ ∧ B ≠ ∅ ∧ −∞ < inf B ℝ * < → inf A ℝ * < ≤ inf B ℝ * <
135 87 134 syldan ⊢ φ ∧ B ≠ ∅ ∧ ¬ inf B ℝ * < = −∞ → inf A ℝ * < ≤ inf B ℝ * <
136 75 135 pm2.61dan ⊢ φ ∧ B ≠ ∅ → inf A ℝ * < ≤ inf B ℝ * <
137 17 136 syldan ⊢ φ ∧ ¬ B = ∅ → inf A ℝ * < ≤ inf B ℝ * <
138 15 137 pm2.61dan ⊢ φ → inf A ℝ * < ≤ inf B ℝ * <