Theorem infm3 12106

Description: The completeness axiom for reals in terms of infimum: a nonempty, bounded-below set of reals has an infimum. (This theorem is the dual of sup3 12104.) (Contributed by NM, 14-Jun-2005.)

Assertion

Ref	Expression
infm3	⊢ ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦) → ∃𝑥 ∈ ℝ (∀𝑦 ∈ 𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦)))

Distinct variable group:   𝑥,𝑦,𝑧,𝐴

Proof of Theorem infm3

Dummy variables 𝑤 𝑣 𝑢 𝑡 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		ssel 3916	. . . . . . . . 9 ⊢ (𝐴 ⊆ ℝ → (𝑣 ∈ 𝐴 → 𝑣 ∈ ℝ))
2	1	pm4.71rd 562	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ → (𝑣 ∈ 𝐴 ↔ (𝑣 ∈ ℝ ∧ 𝑣 ∈ 𝐴)))
3	2	exbidv 1923	. . . . . . 7 ⊢ (𝐴 ⊆ ℝ → (∃𝑣 𝑣 ∈ 𝐴 ↔ ∃𝑣(𝑣 ∈ ℝ ∧ 𝑣 ∈ 𝐴)))
4		df-rex 3063	. . . . . . . 8 ⊢ (∃𝑣 ∈ ℝ 𝑣 ∈ 𝐴 ↔ ∃𝑣(𝑣 ∈ ℝ ∧ 𝑣 ∈ 𝐴))
5		renegcl 11448	. . . . . . . . 9 ⊢ (𝑤 ∈ ℝ → -𝑤 ∈ ℝ)
6		infm3lem 12105	. . . . . . . . 9 ⊢ (𝑣 ∈ ℝ → ∃𝑤 ∈ ℝ 𝑣 = -𝑤)
7		eleq1 2825	. . . . . . . . 9 ⊢ (𝑣 = -𝑤 → (𝑣 ∈ 𝐴 ↔ -𝑤 ∈ 𝐴))
8	5, 6, 7	rexxfr 5353	. . . . . . . 8 ⊢ (∃𝑣 ∈ ℝ 𝑣 ∈ 𝐴 ↔ ∃𝑤 ∈ ℝ -𝑤 ∈ 𝐴)
9	4, 8	bitr3i 277	. . . . . . 7 ⊢ (∃𝑣(𝑣 ∈ ℝ ∧ 𝑣 ∈ 𝐴) ↔ ∃𝑤 ∈ ℝ -𝑤 ∈ 𝐴)
10	3, 9	bitrdi 287	. . . . . 6 ⊢ (𝐴 ⊆ ℝ → (∃𝑣 𝑣 ∈ 𝐴 ↔ ∃𝑤 ∈ ℝ -𝑤 ∈ 𝐴))
11		n0 4294	. . . . . 6 ⊢ (𝐴 ≠ ∅ ↔ ∃𝑣 𝑣 ∈ 𝐴)
12		rabn0 4330	. . . . . 6 ⊢ ({𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ≠ ∅ ↔ ∃𝑤 ∈ ℝ -𝑤 ∈ 𝐴)
13	10, 11, 12	3bitr4g 314	. . . . 5 ⊢ (𝐴 ⊆ ℝ → (𝐴 ≠ ∅ ↔ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ≠ ∅))
14		ssel 3916	. . . . . . . . . . . 12 ⊢ (𝐴 ⊆ ℝ → (𝑦 ∈ 𝐴 → 𝑦 ∈ ℝ))
15	14	pm4.71rd 562	. . . . . . . . . . 11 ⊢ (𝐴 ⊆ ℝ → (𝑦 ∈ 𝐴 ↔ (𝑦 ∈ ℝ ∧ 𝑦 ∈ 𝐴)))
16	15	imbi1d 341	. . . . . . . . . 10 ⊢ (𝐴 ⊆ ℝ → ((𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦) ↔ ((𝑦 ∈ ℝ ∧ 𝑦 ∈ 𝐴) → 𝑥 ≤ 𝑦)))
17		impexp 450	. . . . . . . . . 10 ⊢ (((𝑦 ∈ ℝ ∧ 𝑦 ∈ 𝐴) → 𝑥 ≤ 𝑦) ↔ (𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦)))
18	16, 17	bitrdi 287	. . . . . . . . 9 ⊢ (𝐴 ⊆ ℝ → ((𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦) ↔ (𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦))))
19	18	albidv 1922	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ → (∀𝑦(𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦))))
20		df-ral 3053	. . . . . . . 8 ⊢ (∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦 ↔ ∀𝑦(𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦))
21		renegcl 11448	. . . . . . . . . 10 ⊢ (𝑣 ∈ ℝ → -𝑣 ∈ ℝ)
22		infm3lem 12105	. . . . . . . . . 10 ⊢ (𝑦 ∈ ℝ → ∃𝑣 ∈ ℝ 𝑦 = -𝑣)
23		eleq1 2825	. . . . . . . . . . 11 ⊢ (𝑦 = -𝑣 → (𝑦 ∈ 𝐴 ↔ -𝑣 ∈ 𝐴))
24		breq2 5090	. . . . . . . . . . 11 ⊢ (𝑦 = -𝑣 → (𝑥 ≤ 𝑦 ↔ 𝑥 ≤ -𝑣))
25	23, 24	imbi12d 344	. . . . . . . . . 10 ⊢ (𝑦 = -𝑣 → ((𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦) ↔ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣)))
26	21, 22, 25	ralxfr 5351	. . . . . . . . 9 ⊢ (∀𝑦 ∈ ℝ (𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦) ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣))
27		df-ral 3053	. . . . . . . . 9 ⊢ (∀𝑦 ∈ ℝ (𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦)))
28	26, 27	bitr3i 277	. . . . . . . 8 ⊢ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦)))
29	19, 20, 28	3bitr4g 314	. . . . . . 7 ⊢ (𝐴 ⊆ ℝ → (∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦 ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣)))
30	29	rexbidv 3162	. . . . . 6 ⊢ (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦 ↔ ∃𝑥 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣)))
31		renegcl 11448	. . . . . . . 8 ⊢ (𝑢 ∈ ℝ → -𝑢 ∈ ℝ)
32		infm3lem 12105	. . . . . . . 8 ⊢ (𝑥 ∈ ℝ → ∃𝑢 ∈ ℝ 𝑥 = -𝑢)
33		breq1 5089	. . . . . . . . . 10 ⊢ (𝑥 = -𝑢 → (𝑥 ≤ -𝑣 ↔ -𝑢 ≤ -𝑣))
34	33	imbi2d 340	. . . . . . . . 9 ⊢ (𝑥 = -𝑢 → ((-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣) ↔ (-𝑣 ∈ 𝐴 → -𝑢 ≤ -𝑣)))
35	34	ralbidv 3161	. . . . . . . 8 ⊢ (𝑥 = -𝑢 → (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣) ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → -𝑢 ≤ -𝑣)))
36	31, 32, 35	rexxfr 5353	. . . . . . 7 ⊢ (∃𝑥 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣) ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → -𝑢 ≤ -𝑣))
37		negeq 11376	. . . . . . . . . . . . . . 15 ⊢ (𝑤 = 𝑣 → -𝑤 = -𝑣)
38	37	eleq1d 2822	. . . . . . . . . . . . . 14 ⊢ (𝑤 = 𝑣 → (-𝑤 ∈ 𝐴 ↔ -𝑣 ∈ 𝐴))
39	38	elrab 3635	. . . . . . . . . . . . 13 ⊢ (𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ↔ (𝑣 ∈ ℝ ∧ -𝑣 ∈ 𝐴))
40	39	imbi1i 349	. . . . . . . . . . . 12 ⊢ ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → 𝑣 ≤ 𝑢) ↔ ((𝑣 ∈ ℝ ∧ -𝑣 ∈ 𝐴) → 𝑣 ≤ 𝑢))
41		impexp 450	. . . . . . . . . . . 12 ⊢ (((𝑣 ∈ ℝ ∧ -𝑣 ∈ 𝐴) → 𝑣 ≤ 𝑢) ↔ (𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢)))
42	40, 41	bitri 275	. . . . . . . . . . 11 ⊢ ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → 𝑣 ≤ 𝑢) ↔ (𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢)))
43	42	albii 1821	. . . . . . . . . 10 ⊢ (∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → 𝑣 ≤ 𝑢) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢)))
44		df-ral 3053	. . . . . . . . . 10 ⊢ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢 ↔ ∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → 𝑣 ≤ 𝑢))
45		df-ral 3053	. . . . . . . . . 10 ⊢ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢)))
46	43, 44, 45	3bitr4ri 304	. . . . . . . . 9 ⊢ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢) ↔ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢)
47		leneg 11644	. . . . . . . . . . . 12 ⊢ ((𝑣 ∈ ℝ ∧ 𝑢 ∈ ℝ) → (𝑣 ≤ 𝑢 ↔ -𝑢 ≤ -𝑣))
48	47	ancoms 458	. . . . . . . . . . 11 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (𝑣 ≤ 𝑢 ↔ -𝑢 ≤ -𝑣))
49	48	imbi2d 340	. . . . . . . . . 10 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → ((-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢) ↔ (-𝑣 ∈ 𝐴 → -𝑢 ≤ -𝑣)))
50	49	ralbidva 3159	. . . . . . . . 9 ⊢ (𝑢 ∈ ℝ → (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢) ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → -𝑢 ≤ -𝑣)))
51	46, 50	bitr3id 285	. . . . . . . 8 ⊢ (𝑢 ∈ ℝ → (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢 ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → -𝑢 ≤ -𝑣)))
52	51	rexbiia 3083	. . . . . . 7 ⊢ (∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢 ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → -𝑢 ≤ -𝑣))
53	36, 52	bitr4i 278	. . . . . 6 ⊢ (∃𝑥 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣) ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢)
54	30, 53	bitrdi 287	. . . . 5 ⊢ (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦 ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢))
55	13, 54	anbi12d 633	. . . 4 ⊢ (𝐴 ⊆ ℝ → ((𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦) ↔ ({𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ≠ ∅ ∧ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢)))
56		ssrab2 4021	. . . . 5 ⊢ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ⊆ ℝ
57		sup3 12104	. . . . 5 ⊢ (({𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ⊆ ℝ ∧ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ≠ ∅ ∧ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢) → ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡)))
58	56, 57	mp3an1 1451	. . . 4 ⊢ (({𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ≠ ∅ ∧ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢) → ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡)))
59	55, 58	biimtrdi 253	. . 3 ⊢ (𝐴 ⊆ ℝ → ((𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦) → ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡))))
60	15	imbi1d 341	. . . . . . . . 9 ⊢ (𝐴 ⊆ ℝ → ((𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥) ↔ ((𝑦 ∈ ℝ ∧ 𝑦 ∈ 𝐴) → ¬ 𝑦 < 𝑥)))
61		impexp 450	. . . . . . . . 9 ⊢ (((𝑦 ∈ ℝ ∧ 𝑦 ∈ 𝐴) → ¬ 𝑦 < 𝑥) ↔ (𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥)))
62	60, 61	bitrdi 287	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ → ((𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥) ↔ (𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥))))
63	62	albidv 1922	. . . . . . 7 ⊢ (𝐴 ⊆ ℝ → (∀𝑦(𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥))))
64		df-ral 3053	. . . . . . 7 ⊢ (∀𝑦 ∈ 𝐴 ¬ 𝑦 < 𝑥 ↔ ∀𝑦(𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥))
65		breq1 5089	. . . . . . . . . . 11 ⊢ (𝑦 = -𝑣 → (𝑦 < 𝑥 ↔ -𝑣 < 𝑥))
66	65	notbid 318	. . . . . . . . . 10 ⊢ (𝑦 = -𝑣 → (¬ 𝑦 < 𝑥 ↔ ¬ -𝑣 < 𝑥))
67	23, 66	imbi12d 344	. . . . . . . . 9 ⊢ (𝑦 = -𝑣 → ((𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥) ↔ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥)))
68	21, 22, 67	ralxfr 5351	. . . . . . . 8 ⊢ (∀𝑦 ∈ ℝ (𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥) ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥))
69		df-ral 3053	. . . . . . . 8 ⊢ (∀𝑦 ∈ ℝ (𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥)))
70	68, 69	bitr3i 277	. . . . . . 7 ⊢ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥)))
71	63, 64, 70	3bitr4g 314	. . . . . 6 ⊢ (𝐴 ⊆ ℝ → (∀𝑦 ∈ 𝐴 ¬ 𝑦 < 𝑥 ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥)))
72		breq2 5090	. . . . . . . . 9 ⊢ (𝑦 = -𝑣 → (𝑥 < 𝑦 ↔ 𝑥 < -𝑣))
73		breq2 5090	. . . . . . . . . 10 ⊢ (𝑦 = -𝑣 → (𝑧 < 𝑦 ↔ 𝑧 < -𝑣))
74	73	rexbidv 3162	. . . . . . . . 9 ⊢ (𝑦 = -𝑣 → (∃𝑧 ∈ 𝐴 𝑧 < 𝑦 ↔ ∃𝑧 ∈ 𝐴 𝑧 < -𝑣))
75	72, 74	imbi12d 344	. . . . . . . 8 ⊢ (𝑦 = -𝑣 → ((𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦) ↔ (𝑥 < -𝑣 → ∃𝑧 ∈ 𝐴 𝑧 < -𝑣)))
76	21, 22, 75	ralxfr 5351	. . . . . . 7 ⊢ (∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦) ↔ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑧 ∈ 𝐴 𝑧 < -𝑣))
77		ssel 3916	. . . . . . . . . . . . 13 ⊢ (𝐴 ⊆ ℝ → (𝑧 ∈ 𝐴 → 𝑧 ∈ ℝ))
78	77	adantrd 491	. . . . . . . . . . . 12 ⊢ (𝐴 ⊆ ℝ → ((𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣) → 𝑧 ∈ ℝ))
79	78	pm4.71rd 562	. . . . . . . . . . 11 ⊢ (𝐴 ⊆ ℝ → ((𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣) ↔ (𝑧 ∈ ℝ ∧ (𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣))))
80	79	exbidv 1923	. . . . . . . . . 10 ⊢ (𝐴 ⊆ ℝ → (∃𝑧(𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣) ↔ ∃𝑧(𝑧 ∈ ℝ ∧ (𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣))))
81		df-rex 3063	. . . . . . . . . 10 ⊢ (∃𝑧 ∈ 𝐴 𝑧 < -𝑣 ↔ ∃𝑧(𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣))
82		renegcl 11448	. . . . . . . . . . . 12 ⊢ (𝑡 ∈ ℝ → -𝑡 ∈ ℝ)
83		infm3lem 12105	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ ℝ → ∃𝑡 ∈ ℝ 𝑧 = -𝑡)
84		eleq1 2825	. . . . . . . . . . . . 13 ⊢ (𝑧 = -𝑡 → (𝑧 ∈ 𝐴 ↔ -𝑡 ∈ 𝐴))
85		breq1 5089	. . . . . . . . . . . . 13 ⊢ (𝑧 = -𝑡 → (𝑧 < -𝑣 ↔ -𝑡 < -𝑣))
86	84, 85	anbi12d 633	. . . . . . . . . . . 12 ⊢ (𝑧 = -𝑡 → ((𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣) ↔ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))
87	82, 83, 86	rexxfr 5353	. . . . . . . . . . 11 ⊢ (∃𝑧 ∈ ℝ (𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣) ↔ ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))
88		df-rex 3063	. . . . . . . . . . 11 ⊢ (∃𝑧 ∈ ℝ (𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣) ↔ ∃𝑧(𝑧 ∈ ℝ ∧ (𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣)))
89	87, 88	bitr3i 277	. . . . . . . . . 10 ⊢ (∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣) ↔ ∃𝑧(𝑧 ∈ ℝ ∧ (𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣)))
90	80, 81, 89	3bitr4g 314	. . . . . . . . 9 ⊢ (𝐴 ⊆ ℝ → (∃𝑧 ∈ 𝐴 𝑧 < -𝑣 ↔ ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))
91	90	imbi2d 340	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ → ((𝑥 < -𝑣 → ∃𝑧 ∈ 𝐴 𝑧 < -𝑣) ↔ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
92	91	ralbidv 3161	. . . . . . 7 ⊢ (𝐴 ⊆ ℝ → (∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑧 ∈ 𝐴 𝑧 < -𝑣) ↔ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
93	76, 92	bitrid 283	. . . . . 6 ⊢ (𝐴 ⊆ ℝ → (∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦) ↔ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
94	71, 93	anbi12d 633	. . . . 5 ⊢ (𝐴 ⊆ ℝ → ((∀𝑦 ∈ 𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦)) ↔ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))))
95	94	rexbidv 3162	. . . 4 ⊢ (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ (∀𝑦 ∈ 𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦)) ↔ ∃𝑥 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))))
96		breq2 5090	. . . . . . . . . 10 ⊢ (𝑥 = -𝑢 → (-𝑣 < 𝑥 ↔ -𝑣 < -𝑢))
97	96	notbid 318	. . . . . . . . 9 ⊢ (𝑥 = -𝑢 → (¬ -𝑣 < 𝑥 ↔ ¬ -𝑣 < -𝑢))
98	97	imbi2d 340	. . . . . . . 8 ⊢ (𝑥 = -𝑢 → ((-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ↔ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢)))
99	98	ralbidv 3161	. . . . . . 7 ⊢ (𝑥 = -𝑢 → (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢)))
100		breq1 5089	. . . . . . . . 9 ⊢ (𝑥 = -𝑢 → (𝑥 < -𝑣 ↔ -𝑢 < -𝑣))
101	100	imbi1d 341	. . . . . . . 8 ⊢ (𝑥 = -𝑢 → ((𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)) ↔ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
102	101	ralbidv 3161	. . . . . . 7 ⊢ (𝑥 = -𝑢 → (∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)) ↔ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
103	99, 102	anbi12d 633	. . . . . 6 ⊢ (𝑥 = -𝑢 → ((∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))) ↔ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))))
104	31, 32, 103	rexxfr 5353	. . . . 5 ⊢ (∃𝑥 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
105	39	imbi1i 349	. . . . . . . . . . 11 ⊢ ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → ¬ 𝑢 < 𝑣) ↔ ((𝑣 ∈ ℝ ∧ -𝑣 ∈ 𝐴) → ¬ 𝑢 < 𝑣))
106		impexp 450	. . . . . . . . . . 11 ⊢ (((𝑣 ∈ ℝ ∧ -𝑣 ∈ 𝐴) → ¬ 𝑢 < 𝑣) ↔ (𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣)))
107	105, 106	bitri 275	. . . . . . . . . 10 ⊢ ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → ¬ 𝑢 < 𝑣) ↔ (𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣)))
108	107	albii 1821	. . . . . . . . 9 ⊢ (∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → ¬ 𝑢 < 𝑣) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣)))
109		df-ral 3053	. . . . . . . . 9 ⊢ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ↔ ∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → ¬ 𝑢 < 𝑣))
110		df-ral 3053	. . . . . . . . 9 ⊢ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣)))
111	108, 109, 110	3bitr4ri 304	. . . . . . . 8 ⊢ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣) ↔ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣)
112		ltneg 11641	. . . . . . . . . . 11 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (𝑢 < 𝑣 ↔ -𝑣 < -𝑢))
113	112	notbid 318	. . . . . . . . . 10 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (¬ 𝑢 < 𝑣 ↔ ¬ -𝑣 < -𝑢))
114	113	imbi2d 340	. . . . . . . . 9 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → ((-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣) ↔ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢)))
115	114	ralbidva 3159	. . . . . . . 8 ⊢ (𝑢 ∈ ℝ → (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣) ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢)))
116	111, 115	bitr3id 285	. . . . . . 7 ⊢ (𝑢 ∈ ℝ → (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢)))
117		ltneg 11641	. . . . . . . . . 10 ⊢ ((𝑣 ∈ ℝ ∧ 𝑢 ∈ ℝ) → (𝑣 < 𝑢 ↔ -𝑢 < -𝑣))
118	117	ancoms 458	. . . . . . . . 9 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (𝑣 < 𝑢 ↔ -𝑢 < -𝑣))
119		negeq 11376	. . . . . . . . . . . . 13 ⊢ (𝑤 = 𝑡 → -𝑤 = -𝑡)
120	119	eleq1d 2822	. . . . . . . . . . . 12 ⊢ (𝑤 = 𝑡 → (-𝑤 ∈ 𝐴 ↔ -𝑡 ∈ 𝐴))
121	120	rexrab 3643	. . . . . . . . . . 11 ⊢ (∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡 ↔ ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ 𝑣 < 𝑡))
122		ltneg 11641	. . . . . . . . . . . . 13 ⊢ ((𝑣 ∈ ℝ ∧ 𝑡 ∈ ℝ) → (𝑣 < 𝑡 ↔ -𝑡 < -𝑣))
123	122	anbi2d 631	. . . . . . . . . . . 12 ⊢ ((𝑣 ∈ ℝ ∧ 𝑡 ∈ ℝ) → ((-𝑡 ∈ 𝐴 ∧ 𝑣 < 𝑡) ↔ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))
124	123	rexbidva 3160	. . . . . . . . . . 11 ⊢ (𝑣 ∈ ℝ → (∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ 𝑣 < 𝑡) ↔ ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))
125	121, 124	bitrid 283	. . . . . . . . . 10 ⊢ (𝑣 ∈ ℝ → (∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡 ↔ ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))
126	125	adantl 481	. . . . . . . . 9 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡 ↔ ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))
127	118, 126	imbi12d 344	. . . . . . . 8 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → ((𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡) ↔ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
128	127	ralbidva 3159	. . . . . . 7 ⊢ (𝑢 ∈ ℝ → (∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡) ↔ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
129	116, 128	anbi12d 633	. . . . . 6 ⊢ (𝑢 ∈ ℝ → ((∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡)) ↔ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))))
130	129	rexbiia 3083	. . . . 5 ⊢ (∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡)) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
131	104, 130	bitr4i 278	. . . 4 ⊢ (∃𝑥 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡)))
132	95, 131	bitrdi 287	. . 3 ⊢ (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ (∀𝑦 ∈ 𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦)) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡))))
133	59, 132	sylibrd 259	. 2 ⊢ (𝐴 ⊆ ℝ → ((𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦) → ∃𝑥 ∈ ℝ (∀𝑦 ∈ 𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦))))
134	133	3impib 1117	1 ⊢ ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦) → ∃𝑥 ∈ ℝ (∀𝑦 ∈ 𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1087  ∀wal 1540   = wceq 1542  ∃wex 1781   ∈ wcel 2114   ≠ wne 2933  ∀wral 3052  ∃wrex 3062  {crab 3390   ⊆ wss 3890  ∅c0 4274   class class class wbr 5086  ℝcr 11028   < clt 11170   ≤ cle 11171  -cneg 11369

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-sep 5231  ax-nul 5241  ax-pow 5302  ax-pr 5370  ax-un 7682  ax-resscn 11086  ax-1cn 11087  ax-icn 11088  ax-addcl 11089  ax-addrcl 11090  ax-mulcl 11091  ax-mulrcl 11092  ax-mulcom 11093  ax-addass 11094  ax-mulass 11095  ax-distr 11096  ax-i2m1 11097  ax-1ne0 11098  ax-1rid 11099  ax-rnegex 11100  ax-rrecex 11101  ax-cnre 11102  ax-pre-lttri 11103  ax-pre-lttrn 11104  ax-pre-ltadd 11105  ax-pre-mulgt0 11106  ax-pre-sup 11107

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-br 5087  df-opab 5149  df-mpt 5168  df-id 5519  df-po 5532  df-so 5533  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-riota 7317  df-ov 7363  df-oprab 7364  df-mpo 7365  df-er 8636  df-en 8887  df-dom 8888  df-sdom 8889  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371

This theorem is referenced by:  infrecl  12129  infrenegsup  12130  infregelb  12131  infrelb  12132  xrinfmsslem  13251  gtinf  36517  infrglb  46038