infleinf - Mathbox for Glauco Siliprandi

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

Theorem infleinf 42525

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

**Hypotheses**
Ref	Expression
infleinf.a	⊢ (𝜑 → 𝐴 ⊆ ℝ^*)
infleinf.b	⊢ (𝜑 → 𝐵 ⊆ ℝ^*)
infleinf.c	⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 𝑦))

**Assertion**
Ref	Expression
infleinf	⊢ (𝜑 → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^, < ))

Distinct variable groups: 𝑥,𝐴,𝑦,𝑧 𝑥,𝐵,𝑦,𝑧 𝜑,𝑥,𝑦,𝑧

Proof of Theorem infleinf Dummy variables 𝑟 𝑤 𝑏 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		infleinf.a	. . . . . 6 ⊢ (𝜑 → 𝐴 ⊆ ℝ^*)
2		infxrcl 12888	. . . . . 6 ⊢ (𝐴 ⊆ ℝ^* → inf(𝐴, ℝ^, < ) ∈ ℝ^)
3	1, 2	syl 17	. . . . 5 ⊢ (𝜑 → inf(𝐴, ℝ^, < ) ∈ ℝ^)
4		pnfge 12687	. . . . 5 ⊢ (inf(𝐴, ℝ^, < ) ∈ ℝ^ → inf(𝐴, ℝ^*, < ) ≤ +∞)
5	3, 4	syl 17	. . . 4 ⊢ (𝜑 → inf(𝐴, ℝ^*, < ) ≤ +∞)
6	5	adantr 484	. . 3 ⊢ ((𝜑 ∧ 𝐵 = ∅) → inf(𝐴, ℝ^*, < ) ≤ +∞)
7		infeq1 9070	. . . . . 6 ⊢ (𝐵 = ∅ → inf(𝐵, ℝ^, < ) = inf(∅, ℝ^, < ))
8		xrinf0 12893	. . . . . . 7 ⊢ inf(∅, ℝ^*, < ) = +∞
9	8	a1i 11	. . . . . 6 ⊢ (𝐵 = ∅ → inf(∅, ℝ^*, < ) = +∞)
10	7, 9	eqtrd 2771	. . . . 5 ⊢ (𝐵 = ∅ → inf(𝐵, ℝ^*, < ) = +∞)
11	10	eqcomd 2742	. . . 4 ⊢ (𝐵 = ∅ → +∞ = inf(𝐵, ℝ^*, < ))
12	11	adantl 485	. . 3 ⊢ ((𝜑 ∧ 𝐵 = ∅) → +∞ = inf(𝐵, ℝ^*, < ))
13	6, 12	breqtrd 5065	. 2 ⊢ ((𝜑 ∧ 𝐵 = ∅) → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^, < ))
14		neqne 2940	. . . 4 ⊢ (¬ 𝐵 = ∅ → 𝐵 ≠ ∅)
15	14	adantl 485	. . 3 ⊢ ((𝜑 ∧ ¬ 𝐵 = ∅) → 𝐵 ≠ ∅)
16	3	adantr 484	. . . . . 6 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐴, ℝ^, < ) ∈ ℝ^*)
17		id 22	. . . . . . . . . . . . 13 ⊢ (𝑟 ∈ ℝ → 𝑟 ∈ ℝ)
18		2re 11869	. . . . . . . . . . . . . 14 ⊢ 2 ∈ ℝ
19	18	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝑟 ∈ ℝ → 2 ∈ ℝ)
20	17, 19	resubcld 11225	. . . . . . . . . . . 12 ⊢ (𝑟 ∈ ℝ → (𝑟 − 2) ∈ ℝ)
21	20	adantl 485	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) ∧ 𝑟 ∈ ℝ) → (𝑟 − 2) ∈ ℝ)
22		simpr 488	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐵, ℝ^, < ) = -∞)
23		infleinf.b	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐵 ⊆ ℝ^*)
24		infxrunb2 42521	. . . . . . . . . . . . . . 15 ⊢ (𝐵 ⊆ ℝ^* → (∀𝑦 ∈ ℝ ∃𝑥 ∈ 𝐵 𝑥 < 𝑦 ↔ inf(𝐵, ℝ^*, < ) = -∞))
25	23, 24	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (∀𝑦 ∈ ℝ ∃𝑥 ∈ 𝐵 𝑥 < 𝑦 ↔ inf(𝐵, ℝ^*, < ) = -∞))
26	25	adantr 484	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^, < ) = -∞) → (∀𝑦 ∈ ℝ ∃𝑥 ∈ 𝐵 𝑥 < 𝑦 ↔ inf(𝐵, ℝ^, < ) = -∞))
27	22, 26	mpbird 260	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) → ∀𝑦 ∈ ℝ ∃𝑥 ∈ 𝐵 𝑥 < 𝑦)
28	27	adantr 484	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) ∧ 𝑟 ∈ ℝ) → ∀𝑦 ∈ ℝ ∃𝑥 ∈ 𝐵 𝑥 < 𝑦)
29		breq2 5043	. . . . . . . . . . . . 13 ⊢ (𝑦 = (𝑟 − 2) → (𝑥 < 𝑦 ↔ 𝑥 < (𝑟 − 2)))
30	29	rexbidv 3206	. . . . . . . . . . . 12 ⊢ (𝑦 = (𝑟 − 2) → (∃𝑥 ∈ 𝐵 𝑥 < 𝑦 ↔ ∃𝑥 ∈ 𝐵 𝑥 < (𝑟 − 2)))
31	30	rspcva 3525	. . . . . . . . . . 11 ⊢ (((𝑟 − 2) ∈ ℝ ∧ ∀𝑦 ∈ ℝ ∃𝑥 ∈ 𝐵 𝑥 < 𝑦) → ∃𝑥 ∈ 𝐵 𝑥 < (𝑟 − 2))
32	21, 28, 31	syl2anc 587	. . . . . . . . . 10 ⊢ (((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) ∧ 𝑟 ∈ ℝ) → ∃𝑥 ∈ 𝐵 𝑥 < (𝑟 − 2))
33		simpl 486	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵) → 𝜑)
34		simpr 488	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵) → 𝑥 ∈ 𝐵)
35		1rp 12555	. . . . . . . . . . . . . . . . . 18 ⊢ 1 ∈ ℝ⁺
36	35	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵) → 1 ∈ ℝ⁺)
37		1ex 10794	. . . . . . . . . . . . . . . . . 18 ⊢ 1 ∈ V
38		eleq1 2818	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = 1 → (𝑦 ∈ ℝ⁺ ↔ 1 ∈ ℝ⁺))
39	38	3anbi3d 1444	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 1 → ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ ℝ⁺) ↔ (𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 1 ∈ ℝ⁺)))
40		oveq2 7199	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑦 = 1 → (𝑥 +_𝑒 𝑦) = (𝑥 +_𝑒 1))
41	40	breq2d 5051	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = 1 → (𝑧 ≤ (𝑥 +_𝑒 𝑦) ↔ 𝑧 ≤ (𝑥 +_𝑒 1)))
42	41	rexbidv 3206	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 1 → (∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 𝑦) ↔ ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 1)))
43	39, 42	imbi12d 348	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = 1 → (((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 𝑦)) ↔ ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 1 ∈ ℝ⁺) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 1))))
44		infleinf.c	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 𝑦))
45	37, 43, 44	vtocl 3464	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 1 ∈ ℝ⁺) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 1))
46	33, 34, 36, 45	syl3anc 1373	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 1))
47	46	adantlr 715	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 1))
48	47	3adant3 1134	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 1))
49		simp1l 1199	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) → 𝜑)
50	49	ad2antrr 726	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝜑)
51	50, 1	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝐴 ⊆ ℝ^*)
52	50, 23	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝐵 ⊆ ℝ^*)
53		simp1r 1200	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) → 𝑟 ∈ ℝ)
54	53	ad2antrr 726	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝑟 ∈ ℝ)
55		simp2 1139	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) → 𝑥 ∈ 𝐵)
56	55	ad2antrr 726	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝑥 ∈ 𝐵)
57		simpll3 1216	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝑥 < (𝑟 − 2))
58		simplr 769	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝑧 ∈ 𝐴)
59		simpr 488	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝑧 ≤ (𝑥 +_𝑒 1))
60	51, 52, 54, 56, 57, 58, 59	infleinflem2 42524	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝑧 < 𝑟)
61	60	ex 416	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) → (𝑧 ≤ (𝑥 +_𝑒 1) → 𝑧 < 𝑟))
62	61	reximdva 3183	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) → (∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 1) → ∃𝑧 ∈ 𝐴 𝑧 < 𝑟))
63	48, 62	mpd 15	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) → ∃𝑧 ∈ 𝐴 𝑧 < 𝑟)
64	63	3exp 1121	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ 𝐵 → (𝑥 < (𝑟 − 2) → ∃𝑧 ∈ 𝐴 𝑧 < 𝑟)))
65	64	adantlr 715	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ 𝐵 → (𝑥 < (𝑟 − 2) → ∃𝑧 ∈ 𝐴 𝑧 < 𝑟)))
66	65	rexlimdv 3192	. . . . . . . . . 10 ⊢ (((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) ∧ 𝑟 ∈ ℝ) → (∃𝑥 ∈ 𝐵 𝑥 < (𝑟 − 2) → ∃𝑧 ∈ 𝐴 𝑧 < 𝑟))
67	32, 66	mpd 15	. . . . . . . . 9 ⊢ (((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) ∧ 𝑟 ∈ ℝ) → ∃𝑧 ∈ 𝐴 𝑧 < 𝑟)
68	67	ralrimiva 3095	. . . . . . . 8 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) → ∀𝑟 ∈ ℝ ∃𝑧 ∈ 𝐴 𝑧 < 𝑟)
69		infxrunb2 42521	. . . . . . . . . 10 ⊢ (𝐴 ⊆ ℝ^* → (∀𝑟 ∈ ℝ ∃𝑧 ∈ 𝐴 𝑧 < 𝑟 ↔ inf(𝐴, ℝ^*, < ) = -∞))
70	1, 69	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (∀𝑟 ∈ ℝ ∃𝑧 ∈ 𝐴 𝑧 < 𝑟 ↔ inf(𝐴, ℝ^*, < ) = -∞))
71	70	adantr 484	. . . . . . . 8 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^, < ) = -∞) → (∀𝑟 ∈ ℝ ∃𝑧 ∈ 𝐴 𝑧 < 𝑟 ↔ inf(𝐴, ℝ^, < ) = -∞))
72	68, 71	mpbid 235	. . . . . . 7 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐴, ℝ^, < ) = -∞)
73	72, 22	eqtr4d 2774	. . . . . 6 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐴, ℝ^, < ) = inf(𝐵, ℝ^*, < ))
74	16, 73	xreqled 42483	. . . . 5 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^*, < ))
75	74	adantlr 715	. . . 4 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^*, < ))
76		mnfxr 10855	. . . . . . . 8 ⊢ -∞ ∈ ℝ^*
77	76	a1i 11	. . . . . . 7 ⊢ (𝜑 → -∞ ∈ ℝ^*)
78	77	ad2antrr 726	. . . . . 6 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ ¬ inf(𝐵, ℝ^, < ) = -∞) → -∞ ∈ ℝ^)
79		infxrcl 12888	. . . . . . . 8 ⊢ (𝐵 ⊆ ℝ^* → inf(𝐵, ℝ^, < ) ∈ ℝ^)
80	23, 79	syl 17	. . . . . . 7 ⊢ (𝜑 → inf(𝐵, ℝ^, < ) ∈ ℝ^)
81	80	ad2antrr 726	. . . . . 6 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ ¬ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐵, ℝ^, < ) ∈ ℝ^*)
82		mnfle 12691	. . . . . . 7 ⊢ (inf(𝐵, ℝ^, < ) ∈ ℝ^ → -∞ ≤ inf(𝐵, ℝ^*, < ))
83	81, 82	syl 17	. . . . . 6 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ ¬ inf(𝐵, ℝ^, < ) = -∞) → -∞ ≤ inf(𝐵, ℝ^, < ))
84		neqne 2940	. . . . . . . 8 ⊢ (¬ inf(𝐵, ℝ^, < ) = -∞ → inf(𝐵, ℝ^, < ) ≠ -∞)
85	84	necomd 2987	. . . . . . 7 ⊢ (¬ inf(𝐵, ℝ^, < ) = -∞ → -∞ ≠ inf(𝐵, ℝ^, < ))
86	85	adantl 485	. . . . . 6 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ ¬ inf(𝐵, ℝ^, < ) = -∞) → -∞ ≠ inf(𝐵, ℝ^, < ))
87	78, 81, 83, 86	xrleneltd 42476	. . . . 5 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ ¬ inf(𝐵, ℝ^, < ) = -∞) → -∞ < inf(𝐵, ℝ^, < ))
88	3	ad2antrr 726	. . . . . 6 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^, < )) → inf(𝐴, ℝ^, < ) ∈ ℝ^*)
89	80	ad2antrr 726	. . . . . 6 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^, < )) → inf(𝐵, ℝ^, < ) ∈ ℝ^*)
90		nfv 1922	. . . . . . . 8 ⊢ Ⅎ𝑏(((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^*, < )) ∧ 𝑤 ∈ ℝ⁺)
91	23	ad3antrrr 730	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^, < )) ∧ 𝑤 ∈ ℝ⁺) → 𝐵 ⊆ ℝ^)
92		simpllr 776	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^*, < )) ∧ 𝑤 ∈ ℝ⁺) → 𝐵 ≠ ∅)
93		simpr 488	. . . . . . . . . 10 ⊢ ((𝜑 ∧ -∞ < inf(𝐵, ℝ^, < )) → -∞ < inf(𝐵, ℝ^, < ))
94		infxrbnd2 42522	. . . . . . . . . . . 12 ⊢ (𝐵 ⊆ ℝ^* → (∃𝑏 ∈ ℝ ∀𝑥 ∈ 𝐵 𝑏 ≤ 𝑥 ↔ -∞ < inf(𝐵, ℝ^*, < )))
95	23, 94	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (∃𝑏 ∈ ℝ ∀𝑥 ∈ 𝐵 𝑏 ≤ 𝑥 ↔ -∞ < inf(𝐵, ℝ^*, < )))
96	95	adantr 484	. . . . . . . . . 10 ⊢ ((𝜑 ∧ -∞ < inf(𝐵, ℝ^, < )) → (∃𝑏 ∈ ℝ ∀𝑥 ∈ 𝐵 𝑏 ≤ 𝑥 ↔ -∞ < inf(𝐵, ℝ^, < )))
97	93, 96	mpbird 260	. . . . . . . . 9 ⊢ ((𝜑 ∧ -∞ < inf(𝐵, ℝ^*, < )) → ∃𝑏 ∈ ℝ ∀𝑥 ∈ 𝐵 𝑏 ≤ 𝑥)
98	97	ad4ant13 751	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^*, < )) ∧ 𝑤 ∈ ℝ⁺) → ∃𝑏 ∈ ℝ ∀𝑥 ∈ 𝐵 𝑏 ≤ 𝑥)
99		simpr 488	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^*, < )) ∧ 𝑤 ∈ ℝ⁺) → 𝑤 ∈ ℝ⁺)
100	99	rphalfcld 12605	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^*, < )) ∧ 𝑤 ∈ ℝ⁺) → (𝑤 / 2) ∈ ℝ⁺)
101	90, 91, 92, 98, 100	infrpge 42504	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^, < )) ∧ 𝑤 ∈ ℝ⁺) → ∃𝑥 ∈ 𝐵 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2)))
102		simpll 767	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵) → 𝜑)
103		simpr 488	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵) → 𝑥 ∈ 𝐵)
104		rphalfcl 12578	. . . . . . . . . . . . . 14 ⊢ (𝑤 ∈ ℝ⁺ → (𝑤 / 2) ∈ ℝ⁺)
105	104	ad2antlr 727	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵) → (𝑤 / 2) ∈ ℝ⁺)
106		ovex 7224	. . . . . . . . . . . . . 14 ⊢ (𝑤 / 2) ∈ V
107		eleq1 2818	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (𝑤 / 2) → (𝑦 ∈ ℝ⁺ ↔ (𝑤 / 2) ∈ ℝ⁺))
108	107	3anbi3d 1444	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (𝑤 / 2) → ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ ℝ⁺) ↔ (𝜑 ∧ 𝑥 ∈ 𝐵 ∧ (𝑤 / 2) ∈ ℝ⁺)))
109		oveq2 7199	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = (𝑤 / 2) → (𝑥 +_𝑒 𝑦) = (𝑥 +_𝑒 (𝑤 / 2)))
110	109	breq2d 5051	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (𝑤 / 2) → (𝑧 ≤ (𝑥 +_𝑒 𝑦) ↔ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))))
111	110	rexbidv 3206	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (𝑤 / 2) → (∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 𝑦) ↔ ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))))
112	108, 111	imbi12d 348	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (𝑤 / 2) → (((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 𝑦)) ↔ ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ (𝑤 / 2) ∈ ℝ⁺) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2)))))
113	106, 112, 44	vtocl 3464	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ (𝑤 / 2) ∈ ℝ⁺) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2)))
114	102, 103, 105, 113	syl3anc 1373	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2)))
115	114	3adant3 1134	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 (𝑤 / 2))) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2)))
116		simp11l 1286	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝜑)
117	116, 1	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝐴 ⊆ ℝ^)
118	116, 23	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝐵 ⊆ ℝ^)
119		simp11 1205	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → (𝜑 ∧ 𝑤 ∈ ℝ⁺))
120	119	simprd 499	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝑤 ∈ ℝ⁺)
121		simp12 1206	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝑥 ∈ 𝐵)
122		simp3 1140	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) → 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2)))
123	122	3ad2ant1 1135	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2)))
124		simp2 1139	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝑧 ∈ 𝐴)
125		simp3 1140	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2)))
126	117, 118, 120, 121, 123, 124, 125	infleinflem1 42523	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 𝑤))
127	126	3exp 1121	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) → (𝑧 ∈ 𝐴 → (𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2)) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 𝑤))))
128	127	rexlimdv 3192	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) → (∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2)) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 𝑤)))
129	115, 128	mpd 15	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 𝑤))
130	129	3exp 1121	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ⁺) → (𝑥 ∈ 𝐵 → (𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2)) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 𝑤))))
131	130	rexlimdv 3192	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ⁺) → (∃𝑥 ∈ 𝐵 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2)) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 𝑤)))
132	131	ad4ant14 752	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^, < )) ∧ 𝑤 ∈ ℝ⁺) → (∃𝑥 ∈ 𝐵 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2)) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^, < ) +_𝑒 𝑤)))
133	101, 132	mpd 15	. . . . . 6 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^, < )) ∧ 𝑤 ∈ ℝ⁺) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 𝑤))
134	88, 89, 133	xrlexaddrp 42505	. . . . 5 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^, < )) → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^*, < ))
135	87, 134	syldan 594	. . . 4 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ ¬ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^*, < ))
136	75, 135	pm2.61dan 813	. . 3 ⊢ ((𝜑 ∧ 𝐵 ≠ ∅) → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^, < ))
137	15, 136	syldan 594	. 2 ⊢ ((𝜑 ∧ ¬ 𝐵 = ∅) → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^, < ))
138	13, 137	pm2.61dan 813	1 ⊢ (𝜑 → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^, < ))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 399 ∧ w3a 1089 = wceq 1543 ∈ wcel 2112 ≠ wne 2932 ∀wral 3051 ∃wrex 3052 ⊆ wss 3853 ∅c0 4223 class class class wbr 5039 (class class class)co 7191 infcinf 9035 ℝcr 10693 1c1 10695 +∞cpnf 10829 -∞cmnf 10830 ℝ^*cxr 10831 < clt 10832 ≤ cle 10833 − cmin 11027 / cdiv 11454 2c2 11850 ℝ⁺crp 12551 +_𝑒 cxad 12667

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1803 ax-4 1817 ax-5 1918 ax-6 1976 ax-7 2018 ax-8 2114 ax-9 2122 ax-10 2143 ax-11 2160 ax-12 2177 ax-ext 2708 ax-sep 5177 ax-nul 5184 ax-pow 5243 ax-pr 5307 ax-un 7501 ax-cnex 10750 ax-resscn 10751 ax-1cn 10752 ax-icn 10753 ax-addcl 10754 ax-addrcl 10755 ax-mulcl 10756 ax-mulrcl 10757 ax-mulcom 10758 ax-addass 10759 ax-mulass 10760 ax-distr 10761 ax-i2m1 10762 ax-1ne0 10763 ax-1rid 10764 ax-rnegex 10765 ax-rrecex 10766 ax-cnre 10767 ax-pre-lttri 10768 ax-pre-lttrn 10769 ax-pre-ltadd 10770 ax-pre-mulgt0 10771 ax-pre-sup 10772

This theorem depends on definitions: df-bi 210 df-an 400 df-or 848 df-3or 1090 df-3an 1091 df-tru 1546 df-fal 1556 df-ex 1788 df-nf 1792 df-sb 2073 df-mo 2539 df-eu 2568 df-clab 2715 df-cleq 2728 df-clel 2809 df-nfc 2879 df-ne 2933 df-nel 3037 df-ral 3056 df-rex 3057 df-reu 3058 df-rmo 3059 df-rab 3060 df-v 3400 df-sbc 3684 df-csb 3799 df-dif 3856 df-un 3858 df-in 3860 df-ss 3870 df-pss 3872 df-nul 4224 df-if 4426 df-pw 4501 df-sn 4528 df-pr 4530 df-tp 4532 df-op 4534 df-uni 4806 df-iun 4892 df-br 5040 df-opab 5102 df-mpt 5121 df-tr 5147 df-id 5440 df-eprel 5445 df-po 5453 df-so 5454 df-fr 5494 df-we 5496 df-xp 5542 df-rel 5543 df-cnv 5544 df-co 5545 df-dm 5546 df-rn 5547 df-res 5548 df-ima 5549 df-pred 6140 df-ord 6194 df-on 6195 df-lim 6196 df-suc 6197 df-iota 6316 df-fun 6360 df-fn 6361 df-f 6362 df-f1 6363 df-fo 6364 df-f1o 6365 df-fv 6366 df-riota 7148 df-ov 7194 df-oprab 7195 df-mpo 7196 df-om 7623 df-1st 7739 df-2nd 7740 df-wrecs 8025 df-recs 8086 df-rdg 8124 df-er 8369 df-en 8605 df-dom 8606 df-sdom 8607 df-sup 9036 df-inf 9037 df-pnf 10834 df-mnf 10835 df-xr 10836 df-ltxr 10837 df-le 10838 df-sub 11029 df-neg 11030 df-div 11455 df-nn 11796 df-2 11858 df-n0 12056 df-z 12142 df-uz 12404 df-q 12510 df-rp 12552 df-xneg 12669 df-xadd 12670

This theorem is referenced by: ovolval5lem3 43810

W3C validator