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 41647

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 12729	. . . . . 6 ⊢ (𝐴 ⊆ ℝ^* → inf(𝐴, ℝ^, < ) ∈ ℝ^)
3	1, 2	syl 17	. . . . 5 ⊢ (𝜑 → inf(𝐴, ℝ^, < ) ∈ ℝ^)
4		pnfge 12528	. . . . 5 ⊢ (inf(𝐴, ℝ^, < ) ∈ ℝ^ → inf(𝐴, ℝ^*, < ) ≤ +∞)
5	3, 4	syl 17	. . . 4 ⊢ (𝜑 → inf(𝐴, ℝ^*, < ) ≤ +∞)
6	5	adantr 483	. . 3 ⊢ ((𝜑 ∧ 𝐵 = ∅) → inf(𝐴, ℝ^*, < ) ≤ +∞)
7		infeq1 8942	. . . . . 6 ⊢ (𝐵 = ∅ → inf(𝐵, ℝ^, < ) = inf(∅, ℝ^, < ))
8		xrinf0 12734	. . . . . . 7 ⊢ inf(∅, ℝ^*, < ) = +∞
9	8	a1i 11	. . . . . 6 ⊢ (𝐵 = ∅ → inf(∅, ℝ^*, < ) = +∞)
10	7, 9	eqtrd 2858	. . . . 5 ⊢ (𝐵 = ∅ → inf(𝐵, ℝ^*, < ) = +∞)
11	10	eqcomd 2829	. . . 4 ⊢ (𝐵 = ∅ → +∞ = inf(𝐵, ℝ^*, < ))
12	11	adantl 484	. . 3 ⊢ ((𝜑 ∧ 𝐵 = ∅) → +∞ = inf(𝐵, ℝ^*, < ))
13	6, 12	breqtrd 5094	. 2 ⊢ ((𝜑 ∧ 𝐵 = ∅) → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^, < ))
14		neqne 3026	. . . 4 ⊢ (¬ 𝐵 = ∅ → 𝐵 ≠ ∅)
15	14	adantl 484	. . 3 ⊢ ((𝜑 ∧ ¬ 𝐵 = ∅) → 𝐵 ≠ ∅)
16	3	adantr 483	. . . . . 6 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐴, ℝ^, < ) ∈ ℝ^*)
17		id 22	. . . . . . . . . . . . 13 ⊢ (𝑟 ∈ ℝ → 𝑟 ∈ ℝ)
18		2re 11714	. . . . . . . . . . . . . 14 ⊢ 2 ∈ ℝ
19	18	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝑟 ∈ ℝ → 2 ∈ ℝ)
20	17, 19	resubcld 11070	. . . . . . . . . . . 12 ⊢ (𝑟 ∈ ℝ → (𝑟 − 2) ∈ ℝ)
21	20	adantl 484	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) ∧ 𝑟 ∈ ℝ) → (𝑟 − 2) ∈ ℝ)
22		simpr 487	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐵, ℝ^, < ) = -∞)
23		infleinf.b	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐵 ⊆ ℝ^*)
24		infxrunb2 41643	. . . . . . . . . . . . . . 15 ⊢ (𝐵 ⊆ ℝ^* → (∀𝑦 ∈ ℝ ∃𝑥 ∈ 𝐵 𝑥 < 𝑦 ↔ inf(𝐵, ℝ^*, < ) = -∞))
25	23, 24	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (∀𝑦 ∈ ℝ ∃𝑥 ∈ 𝐵 𝑥 < 𝑦 ↔ inf(𝐵, ℝ^*, < ) = -∞))
26	25	adantr 483	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^, < ) = -∞) → (∀𝑦 ∈ ℝ ∃𝑥 ∈ 𝐵 𝑥 < 𝑦 ↔ inf(𝐵, ℝ^, < ) = -∞))
27	22, 26	mpbird 259	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) → ∀𝑦 ∈ ℝ ∃𝑥 ∈ 𝐵 𝑥 < 𝑦)
28	27	adantr 483	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) ∧ 𝑟 ∈ ℝ) → ∀𝑦 ∈ ℝ ∃𝑥 ∈ 𝐵 𝑥 < 𝑦)
29		breq2 5072	. . . . . . . . . . . . 13 ⊢ (𝑦 = (𝑟 − 2) → (𝑥 < 𝑦 ↔ 𝑥 < (𝑟 − 2)))
30	29	rexbidv 3299	. . . . . . . . . . . 12 ⊢ (𝑦 = (𝑟 − 2) → (∃𝑥 ∈ 𝐵 𝑥 < 𝑦 ↔ ∃𝑥 ∈ 𝐵 𝑥 < (𝑟 − 2)))
31	30	rspcva 3623	. . . . . . . . . . 11 ⊢ (((𝑟 − 2) ∈ ℝ ∧ ∀𝑦 ∈ ℝ ∃𝑥 ∈ 𝐵 𝑥 < 𝑦) → ∃𝑥 ∈ 𝐵 𝑥 < (𝑟 − 2))
32	21, 28, 31	syl2anc 586	. . . . . . . . . 10 ⊢ (((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) ∧ 𝑟 ∈ ℝ) → ∃𝑥 ∈ 𝐵 𝑥 < (𝑟 − 2))
33		simpl 485	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵) → 𝜑)
34		simpr 487	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵) → 𝑥 ∈ 𝐵)
35		1rp 12396	. . . . . . . . . . . . . . . . . 18 ⊢ 1 ∈ ℝ⁺
36	35	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵) → 1 ∈ ℝ⁺)
37		1ex 10639	. . . . . . . . . . . . . . . . . 18 ⊢ 1 ∈ V
38		eleq1 2902	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = 1 → (𝑦 ∈ ℝ⁺ ↔ 1 ∈ ℝ⁺))
39	38	3anbi3d 1438	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 1 → ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ ℝ⁺) ↔ (𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 1 ∈ ℝ⁺)))
40		oveq2 7166	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑦 = 1 → (𝑥 +_𝑒 𝑦) = (𝑥 +_𝑒 1))
41	40	breq2d 5080	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = 1 → (𝑧 ≤ (𝑥 +_𝑒 𝑦) ↔ 𝑧 ≤ (𝑥 +_𝑒 1)))
42	41	rexbidv 3299	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 1 → (∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 𝑦) ↔ ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 1)))
43	39, 42	imbi12d 347	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = 1 → (((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 𝑦)) ↔ ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 1 ∈ ℝ⁺) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 1))))
44		infleinf.c	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 𝑦))
45	37, 43, 44	vtocl 3561	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 1 ∈ ℝ⁺) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 1))
46	33, 34, 36, 45	syl3anc 1367	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 1))
47	46	adantlr 713	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 1))
48	47	3adant3 1128	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 1))
49		simp1l 1193	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) → 𝜑)
50	49	ad2antrr 724	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝜑)
51	50, 1	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝐴 ⊆ ℝ^*)
52	50, 23	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝐵 ⊆ ℝ^*)
53		simp1r 1194	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) → 𝑟 ∈ ℝ)
54	53	ad2antrr 724	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝑟 ∈ ℝ)
55		simp2 1133	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) → 𝑥 ∈ 𝐵)
56	55	ad2antrr 724	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝑥 ∈ 𝐵)
57		simpll3 1210	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝑥 < (𝑟 − 2))
58		simplr 767	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝑧 ∈ 𝐴)
59		simpr 487	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝑧 ≤ (𝑥 +_𝑒 1))
60	51, 52, 54, 56, 57, 58, 59	infleinflem2 41646	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) ∧ 𝑧 ≤ (𝑥 +_𝑒 1)) → 𝑧 < 𝑟)
61	60	ex 415	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) ∧ 𝑧 ∈ 𝐴) → (𝑧 ≤ (𝑥 +_𝑒 1) → 𝑧 < 𝑟))
62	61	reximdva 3276	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) → (∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 1) → ∃𝑧 ∈ 𝐴 𝑧 < 𝑟))
63	48, 62	mpd 15	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 < (𝑟 − 2)) → ∃𝑧 ∈ 𝐴 𝑧 < 𝑟)
64	63	3exp 1115	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ 𝐵 → (𝑥 < (𝑟 − 2) → ∃𝑧 ∈ 𝐴 𝑧 < 𝑟)))
65	64	adantlr 713	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) ∧ 𝑟 ∈ ℝ) → (𝑥 ∈ 𝐵 → (𝑥 < (𝑟 − 2) → ∃𝑧 ∈ 𝐴 𝑧 < 𝑟)))
66	65	rexlimdv 3285	. . . . . . . . . 10 ⊢ (((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) ∧ 𝑟 ∈ ℝ) → (∃𝑥 ∈ 𝐵 𝑥 < (𝑟 − 2) → ∃𝑧 ∈ 𝐴 𝑧 < 𝑟))
67	32, 66	mpd 15	. . . . . . . . 9 ⊢ (((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) ∧ 𝑟 ∈ ℝ) → ∃𝑧 ∈ 𝐴 𝑧 < 𝑟)
68	67	ralrimiva 3184	. . . . . . . 8 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^*, < ) = -∞) → ∀𝑟 ∈ ℝ ∃𝑧 ∈ 𝐴 𝑧 < 𝑟)
69		infxrunb2 41643	. . . . . . . . . 10 ⊢ (𝐴 ⊆ ℝ^* → (∀𝑟 ∈ ℝ ∃𝑧 ∈ 𝐴 𝑧 < 𝑟 ↔ inf(𝐴, ℝ^*, < ) = -∞))
70	1, 69	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (∀𝑟 ∈ ℝ ∃𝑧 ∈ 𝐴 𝑧 < 𝑟 ↔ inf(𝐴, ℝ^*, < ) = -∞))
71	70	adantr 483	. . . . . . . 8 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^, < ) = -∞) → (∀𝑟 ∈ ℝ ∃𝑧 ∈ 𝐴 𝑧 < 𝑟 ↔ inf(𝐴, ℝ^, < ) = -∞))
72	68, 71	mpbid 234	. . . . . . 7 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐴, ℝ^, < ) = -∞)
73	72, 22	eqtr4d 2861	. . . . . 6 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐴, ℝ^, < ) = inf(𝐵, ℝ^*, < ))
74	16, 73	xreqled 41605	. . . . 5 ⊢ ((𝜑 ∧ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^*, < ))
75	74	adantlr 713	. . . 4 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^*, < ))
76		mnfxr 10700	. . . . . . . 8 ⊢ -∞ ∈ ℝ^*
77	76	a1i 11	. . . . . . 7 ⊢ (𝜑 → -∞ ∈ ℝ^*)
78	77	ad2antrr 724	. . . . . 6 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ ¬ inf(𝐵, ℝ^, < ) = -∞) → -∞ ∈ ℝ^)
79		infxrcl 12729	. . . . . . . 8 ⊢ (𝐵 ⊆ ℝ^* → inf(𝐵, ℝ^, < ) ∈ ℝ^)
80	23, 79	syl 17	. . . . . . 7 ⊢ (𝜑 → inf(𝐵, ℝ^, < ) ∈ ℝ^)
81	80	ad2antrr 724	. . . . . 6 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ ¬ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐵, ℝ^, < ) ∈ ℝ^*)
82		mnfle 12532	. . . . . . 7 ⊢ (inf(𝐵, ℝ^, < ) ∈ ℝ^ → -∞ ≤ inf(𝐵, ℝ^*, < ))
83	81, 82	syl 17	. . . . . 6 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ ¬ inf(𝐵, ℝ^, < ) = -∞) → -∞ ≤ inf(𝐵, ℝ^, < ))
84		neqne 3026	. . . . . . . 8 ⊢ (¬ inf(𝐵, ℝ^, < ) = -∞ → inf(𝐵, ℝ^, < ) ≠ -∞)
85	84	necomd 3073	. . . . . . 7 ⊢ (¬ inf(𝐵, ℝ^, < ) = -∞ → -∞ ≠ inf(𝐵, ℝ^, < ))
86	85	adantl 484	. . . . . 6 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ ¬ inf(𝐵, ℝ^, < ) = -∞) → -∞ ≠ inf(𝐵, ℝ^, < ))
87	78, 81, 83, 86	xrleneltd 41598	. . . . 5 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ ¬ inf(𝐵, ℝ^, < ) = -∞) → -∞ < inf(𝐵, ℝ^, < ))
88	3	ad2antrr 724	. . . . . 6 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^, < )) → inf(𝐴, ℝ^, < ) ∈ ℝ^*)
89	80	ad2antrr 724	. . . . . 6 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^, < )) → inf(𝐵, ℝ^, < ) ∈ ℝ^*)
90		nfv 1915	. . . . . . . 8 ⊢ Ⅎ𝑏(((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^*, < )) ∧ 𝑤 ∈ ℝ⁺)
91	23	ad3antrrr 728	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^, < )) ∧ 𝑤 ∈ ℝ⁺) → 𝐵 ⊆ ℝ^)
92		simpllr 774	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^*, < )) ∧ 𝑤 ∈ ℝ⁺) → 𝐵 ≠ ∅)
93		simpr 487	. . . . . . . . . 10 ⊢ ((𝜑 ∧ -∞ < inf(𝐵, ℝ^, < )) → -∞ < inf(𝐵, ℝ^, < ))
94		infxrbnd2 41644	. . . . . . . . . . . 12 ⊢ (𝐵 ⊆ ℝ^* → (∃𝑏 ∈ ℝ ∀𝑥 ∈ 𝐵 𝑏 ≤ 𝑥 ↔ -∞ < inf(𝐵, ℝ^*, < )))
95	23, 94	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (∃𝑏 ∈ ℝ ∀𝑥 ∈ 𝐵 𝑏 ≤ 𝑥 ↔ -∞ < inf(𝐵, ℝ^*, < )))
96	95	adantr 483	. . . . . . . . . 10 ⊢ ((𝜑 ∧ -∞ < inf(𝐵, ℝ^, < )) → (∃𝑏 ∈ ℝ ∀𝑥 ∈ 𝐵 𝑏 ≤ 𝑥 ↔ -∞ < inf(𝐵, ℝ^, < )))
97	93, 96	mpbird 259	. . . . . . . . 9 ⊢ ((𝜑 ∧ -∞ < inf(𝐵, ℝ^*, < )) → ∃𝑏 ∈ ℝ ∀𝑥 ∈ 𝐵 𝑏 ≤ 𝑥)
98	97	ad4ant13 749	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^*, < )) ∧ 𝑤 ∈ ℝ⁺) → ∃𝑏 ∈ ℝ ∀𝑥 ∈ 𝐵 𝑏 ≤ 𝑥)
99		simpr 487	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^*, < )) ∧ 𝑤 ∈ ℝ⁺) → 𝑤 ∈ ℝ⁺)
100	99	rphalfcld 12446	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^*, < )) ∧ 𝑤 ∈ ℝ⁺) → (𝑤 / 2) ∈ ℝ⁺)
101	90, 91, 92, 98, 100	infrpge 41626	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^, < )) ∧ 𝑤 ∈ ℝ⁺) → ∃𝑥 ∈ 𝐵 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2)))
102		simpll 765	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵) → 𝜑)
103		simpr 487	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵) → 𝑥 ∈ 𝐵)
104		rphalfcl 12419	. . . . . . . . . . . . . 14 ⊢ (𝑤 ∈ ℝ⁺ → (𝑤 / 2) ∈ ℝ⁺)
105	104	ad2antlr 725	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵) → (𝑤 / 2) ∈ ℝ⁺)
106		ovex 7191	. . . . . . . . . . . . . 14 ⊢ (𝑤 / 2) ∈ V
107		eleq1 2902	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (𝑤 / 2) → (𝑦 ∈ ℝ⁺ ↔ (𝑤 / 2) ∈ ℝ⁺))
108	107	3anbi3d 1438	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (𝑤 / 2) → ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ ℝ⁺) ↔ (𝜑 ∧ 𝑥 ∈ 𝐵 ∧ (𝑤 / 2) ∈ ℝ⁺)))
109		oveq2 7166	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = (𝑤 / 2) → (𝑥 +_𝑒 𝑦) = (𝑥 +_𝑒 (𝑤 / 2)))
110	109	breq2d 5080	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = (𝑤 / 2) → (𝑧 ≤ (𝑥 +_𝑒 𝑦) ↔ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))))
111	110	rexbidv 3299	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (𝑤 / 2) → (∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 𝑦) ↔ ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))))
112	108, 111	imbi12d 347	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (𝑤 / 2) → (((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ 𝑦 ∈ ℝ⁺) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 𝑦)) ↔ ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ (𝑤 / 2) ∈ ℝ⁺) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2)))))
113	106, 112, 44	vtocl 3561	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐵 ∧ (𝑤 / 2) ∈ ℝ⁺) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2)))
114	102, 103, 105, 113	syl3anc 1367	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2)))
115	114	3adant3 1128	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 (𝑤 / 2))) → ∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2)))
116		simp11l 1280	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝜑)
117	116, 1	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝐴 ⊆ ℝ^)
118	116, 23	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝐵 ⊆ ℝ^)
119		simp11 1199	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → (𝜑 ∧ 𝑤 ∈ ℝ⁺))
120	119	simprd 498	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝑤 ∈ ℝ⁺)
121		simp12 1200	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝑥 ∈ 𝐵)
122		simp3 1134	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) → 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2)))
123	122	3ad2ant1 1129	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2)))
124		simp2 1133	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝑧 ∈ 𝐴)
125		simp3 1134	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2)))
126	117, 118, 120, 121, 123, 124, 125	infleinflem1 41645	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) ∧ 𝑧 ∈ 𝐴 ∧ 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2))) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 𝑤))
127	126	3exp 1115	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) → (𝑧 ∈ 𝐴 → (𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2)) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 𝑤))))
128	127	rexlimdv 3285	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) → (∃𝑧 ∈ 𝐴 𝑧 ≤ (𝑥 +_𝑒 (𝑤 / 2)) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 𝑤)))
129	115, 128	mpd 15	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑤 ∈ ℝ⁺) ∧ 𝑥 ∈ 𝐵 ∧ 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2))) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 𝑤))
130	129	3exp 1115	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ⁺) → (𝑥 ∈ 𝐵 → (𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2)) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 𝑤))))
131	130	rexlimdv 3285	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ⁺) → (∃𝑥 ∈ 𝐵 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2)) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 𝑤)))
132	131	ad4ant14 750	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^, < )) ∧ 𝑤 ∈ ℝ⁺) → (∃𝑥 ∈ 𝐵 𝑥 ≤ (inf(𝐵, ℝ^, < ) +_𝑒 (𝑤 / 2)) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^, < ) +_𝑒 𝑤)))
133	101, 132	mpd 15	. . . . . 6 ⊢ ((((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^, < )) ∧ 𝑤 ∈ ℝ⁺) → inf(𝐴, ℝ^, < ) ≤ (inf(𝐵, ℝ^*, < ) +_𝑒 𝑤))
134	88, 89, 133	xrlexaddrp 41627	. . . . 5 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ -∞ < inf(𝐵, ℝ^, < )) → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^*, < ))
135	87, 134	syldan 593	. . . 4 ⊢ (((𝜑 ∧ 𝐵 ≠ ∅) ∧ ¬ inf(𝐵, ℝ^, < ) = -∞) → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^*, < ))
136	75, 135	pm2.61dan 811	. . 3 ⊢ ((𝜑 ∧ 𝐵 ≠ ∅) → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^, < ))
137	15, 136	syldan 593	. 2 ⊢ ((𝜑 ∧ ¬ 𝐵 = ∅) → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^, < ))
138	13, 137	pm2.61dan 811	1 ⊢ (𝜑 → inf(𝐴, ℝ^, < ) ≤ inf(𝐵, ℝ^, < ))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 208 ∧ wa 398 ∧ w3a 1083 = wceq 1537 ∈ wcel 2114 ≠ wne 3018 ∀wral 3140 ∃wrex 3141 ⊆ wss 3938 ∅c0 4293 class class class wbr 5068 (class class class)co 7158 infcinf 8907 ℝcr 10538 1c1 10540 +∞cpnf 10674 -∞cmnf 10675 ℝ^*cxr 10676 < clt 10677 ≤ cle 10678 − cmin 10872 / cdiv 11299 2c2 11695 ℝ⁺crp 12392 +_𝑒 cxad 12508

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2116 ax-9 2124 ax-10 2145 ax-11 2161 ax-12 2177 ax-ext 2795 ax-sep 5205 ax-nul 5212 ax-pow 5268 ax-pr 5332 ax-un 7463 ax-cnex 10595 ax-resscn 10596 ax-1cn 10597 ax-icn 10598 ax-addcl 10599 ax-addrcl 10600 ax-mulcl 10601 ax-mulrcl 10602 ax-mulcom 10603 ax-addass 10604 ax-mulass 10605 ax-distr 10606 ax-i2m1 10607 ax-1ne0 10608 ax-1rid 10609 ax-rnegex 10610 ax-rrecex 10611 ax-cnre 10612 ax-pre-lttri 10613 ax-pre-lttrn 10614 ax-pre-ltadd 10615 ax-pre-mulgt0 10616 ax-pre-sup 10617

This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1540 df-ex 1781 df-nf 1785 df-sb 2070 df-mo 2622 df-eu 2654 df-clab 2802 df-cleq 2816 df-clel 2895 df-nfc 2965 df-ne 3019 df-nel 3126 df-ral 3145 df-rex 3146 df-reu 3147 df-rmo 3148 df-rab 3149 df-v 3498 df-sbc 3775 df-csb 3886 df-dif 3941 df-un 3943 df-in 3945 df-ss 3954 df-pss 3956 df-nul 4294 df-if 4470 df-pw 4543 df-sn 4570 df-pr 4572 df-tp 4574 df-op 4576 df-uni 4841 df-iun 4923 df-br 5069 df-opab 5131 df-mpt 5149 df-tr 5175 df-id 5462 df-eprel 5467 df-po 5476 df-so 5477 df-fr 5516 df-we 5518 df-xp 5563 df-rel 5564 df-cnv 5565 df-co 5566 df-dm 5567 df-rn 5568 df-res 5569 df-ima 5570 df-pred 6150 df-ord 6196 df-on 6197 df-lim 6198 df-suc 6199 df-iota 6316 df-fun 6359 df-fn 6360 df-f 6361 df-f1 6362 df-fo 6363 df-f1o 6364 df-fv 6365 df-riota 7116 df-ov 7161 df-oprab 7162 df-mpo 7163 df-om 7583 df-1st 7691 df-2nd 7692 df-wrecs 7949 df-recs 8010 df-rdg 8048 df-er 8291 df-en 8512 df-dom 8513 df-sdom 8514 df-sup 8908 df-inf 8909 df-pnf 10679 df-mnf 10680 df-xr 10681 df-ltxr 10682 df-le 10683 df-sub 10874 df-neg 10875 df-div 11300 df-nn 11641 df-2 11703 df-n0 11901 df-z 11985 df-uz 12247 df-q 12352 df-rp 12393 df-xneg 12510 df-xadd 12511

This theorem is referenced by: ovolval5lem3 42943

W3C validator