Theorem infm3 12219

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 12217.) (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 3972	. . . . . . . . 9 ⊢ (𝐴 ⊆ ℝ → (𝑣 ∈ 𝐴 → 𝑣 ∈ ℝ))
2	1	pm4.71rd 561	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ → (𝑣 ∈ 𝐴 ↔ (𝑣 ∈ ℝ ∧ 𝑣 ∈ 𝐴)))
3	2	exbidv 1917	. . . . . . 7 ⊢ (𝐴 ⊆ ℝ → (∃𝑣 𝑣 ∈ 𝐴 ↔ ∃𝑣(𝑣 ∈ ℝ ∧ 𝑣 ∈ 𝐴)))
4		df-rex 3061	. . . . . . . 8 ⊢ (∃𝑣 ∈ ℝ 𝑣 ∈ 𝐴 ↔ ∃𝑣(𝑣 ∈ ℝ ∧ 𝑣 ∈ 𝐴))
5		renegcl 11564	. . . . . . . . 9 ⊢ (𝑤 ∈ ℝ → -𝑤 ∈ ℝ)
6		infm3lem 12218	. . . . . . . . 9 ⊢ (𝑣 ∈ ℝ → ∃𝑤 ∈ ℝ 𝑣 = -𝑤)
7		eleq1 2814	. . . . . . . . 9 ⊢ (𝑣 = -𝑤 → (𝑣 ∈ 𝐴 ↔ -𝑤 ∈ 𝐴))
8	5, 6, 7	rexxfr 5412	. . . . . . . 8 ⊢ (∃𝑣 ∈ ℝ 𝑣 ∈ 𝐴 ↔ ∃𝑤 ∈ ℝ -𝑤 ∈ 𝐴)
9	4, 8	bitr3i 276	. . . . . . 7 ⊢ (∃𝑣(𝑣 ∈ ℝ ∧ 𝑣 ∈ 𝐴) ↔ ∃𝑤 ∈ ℝ -𝑤 ∈ 𝐴)
10	3, 9	bitrdi 286	. . . . . 6 ⊢ (𝐴 ⊆ ℝ → (∃𝑣 𝑣 ∈ 𝐴 ↔ ∃𝑤 ∈ ℝ -𝑤 ∈ 𝐴))
11		n0 4346	. . . . . 6 ⊢ (𝐴 ≠ ∅ ↔ ∃𝑣 𝑣 ∈ 𝐴)
12		rabn0 4383	. . . . . 6 ⊢ ({𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ≠ ∅ ↔ ∃𝑤 ∈ ℝ -𝑤 ∈ 𝐴)
13	10, 11, 12	3bitr4g 313	. . . . 5 ⊢ (𝐴 ⊆ ℝ → (𝐴 ≠ ∅ ↔ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ≠ ∅))
14		ssel 3972	. . . . . . . . . . . 12 ⊢ (𝐴 ⊆ ℝ → (𝑦 ∈ 𝐴 → 𝑦 ∈ ℝ))
15	14	pm4.71rd 561	. . . . . . . . . . 11 ⊢ (𝐴 ⊆ ℝ → (𝑦 ∈ 𝐴 ↔ (𝑦 ∈ ℝ ∧ 𝑦 ∈ 𝐴)))
16	15	imbi1d 340	. . . . . . . . . 10 ⊢ (𝐴 ⊆ ℝ → ((𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦) ↔ ((𝑦 ∈ ℝ ∧ 𝑦 ∈ 𝐴) → 𝑥 ≤ 𝑦)))
17		impexp 449	. . . . . . . . . 10 ⊢ (((𝑦 ∈ ℝ ∧ 𝑦 ∈ 𝐴) → 𝑥 ≤ 𝑦) ↔ (𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦)))
18	16, 17	bitrdi 286	. . . . . . . . 9 ⊢ (𝐴 ⊆ ℝ → ((𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦) ↔ (𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦))))
19	18	albidv 1916	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ → (∀𝑦(𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦))))
20		df-ral 3052	. . . . . . . 8 ⊢ (∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦 ↔ ∀𝑦(𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦))
21		renegcl 11564	. . . . . . . . . 10 ⊢ (𝑣 ∈ ℝ → -𝑣 ∈ ℝ)
22		infm3lem 12218	. . . . . . . . . 10 ⊢ (𝑦 ∈ ℝ → ∃𝑣 ∈ ℝ 𝑦 = -𝑣)
23		eleq1 2814	. . . . . . . . . . 11 ⊢ (𝑦 = -𝑣 → (𝑦 ∈ 𝐴 ↔ -𝑣 ∈ 𝐴))
24		breq2 5149	. . . . . . . . . . 11 ⊢ (𝑦 = -𝑣 → (𝑥 ≤ 𝑦 ↔ 𝑥 ≤ -𝑣))
25	23, 24	imbi12d 343	. . . . . . . . . 10 ⊢ (𝑦 = -𝑣 → ((𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦) ↔ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣)))
26	21, 22, 25	ralxfr 5410	. . . . . . . . 9 ⊢ (∀𝑦 ∈ ℝ (𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦) ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣))
27		df-ral 3052	. . . . . . . . 9 ⊢ (∀𝑦 ∈ ℝ (𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦)))
28	26, 27	bitr3i 276	. . . . . . . 8 ⊢ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → 𝑥 ≤ 𝑦)))
29	19, 20, 28	3bitr4g 313	. . . . . . 7 ⊢ (𝐴 ⊆ ℝ → (∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦 ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣)))
30	29	rexbidv 3169	. . . . . 6 ⊢ (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦 ↔ ∃𝑥 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣)))
31		renegcl 11564	. . . . . . . 8 ⊢ (𝑢 ∈ ℝ → -𝑢 ∈ ℝ)
32		infm3lem 12218	. . . . . . . 8 ⊢ (𝑥 ∈ ℝ → ∃𝑢 ∈ ℝ 𝑥 = -𝑢)
33		breq1 5148	. . . . . . . . . 10 ⊢ (𝑥 = -𝑢 → (𝑥 ≤ -𝑣 ↔ -𝑢 ≤ -𝑣))
34	33	imbi2d 339	. . . . . . . . 9 ⊢ (𝑥 = -𝑢 → ((-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣) ↔ (-𝑣 ∈ 𝐴 → -𝑢 ≤ -𝑣)))
35	34	ralbidv 3168	. . . . . . . 8 ⊢ (𝑥 = -𝑢 → (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣) ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → -𝑢 ≤ -𝑣)))
36	31, 32, 35	rexxfr 5412	. . . . . . 7 ⊢ (∃𝑥 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣) ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → -𝑢 ≤ -𝑣))
37		negeq 11493	. . . . . . . . . . . . . . 15 ⊢ (𝑤 = 𝑣 → -𝑤 = -𝑣)
38	37	eleq1d 2811	. . . . . . . . . . . . . 14 ⊢ (𝑤 = 𝑣 → (-𝑤 ∈ 𝐴 ↔ -𝑣 ∈ 𝐴))
39	38	elrab 3680	. . . . . . . . . . . . 13 ⊢ (𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ↔ (𝑣 ∈ ℝ ∧ -𝑣 ∈ 𝐴))
40	39	imbi1i 348	. . . . . . . . . . . 12 ⊢ ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → 𝑣 ≤ 𝑢) ↔ ((𝑣 ∈ ℝ ∧ -𝑣 ∈ 𝐴) → 𝑣 ≤ 𝑢))
41		impexp 449	. . . . . . . . . . . 12 ⊢ (((𝑣 ∈ ℝ ∧ -𝑣 ∈ 𝐴) → 𝑣 ≤ 𝑢) ↔ (𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢)))
42	40, 41	bitri 274	. . . . . . . . . . 11 ⊢ ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → 𝑣 ≤ 𝑢) ↔ (𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢)))
43	42	albii 1814	. . . . . . . . . 10 ⊢ (∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → 𝑣 ≤ 𝑢) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢)))
44		df-ral 3052	. . . . . . . . . 10 ⊢ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢 ↔ ∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → 𝑣 ≤ 𝑢))
45		df-ral 3052	. . . . . . . . . 10 ⊢ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢)))
46	43, 44, 45	3bitr4ri 303	. . . . . . . . 9 ⊢ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢) ↔ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢)
47		leneg 11758	. . . . . . . . . . . 12 ⊢ ((𝑣 ∈ ℝ ∧ 𝑢 ∈ ℝ) → (𝑣 ≤ 𝑢 ↔ -𝑢 ≤ -𝑣))
48	47	ancoms 457	. . . . . . . . . . 11 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (𝑣 ≤ 𝑢 ↔ -𝑢 ≤ -𝑣))
49	48	imbi2d 339	. . . . . . . . . 10 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → ((-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢) ↔ (-𝑣 ∈ 𝐴 → -𝑢 ≤ -𝑣)))
50	49	ralbidva 3166	. . . . . . . . 9 ⊢ (𝑢 ∈ ℝ → (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑣 ≤ 𝑢) ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → -𝑢 ≤ -𝑣)))
51	46, 50	bitr3id 284	. . . . . . . 8 ⊢ (𝑢 ∈ ℝ → (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢 ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → -𝑢 ≤ -𝑣)))
52	51	rexbiia 3082	. . . . . . 7 ⊢ (∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢 ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → -𝑢 ≤ -𝑣))
53	36, 52	bitr4i 277	. . . . . 6 ⊢ (∃𝑥 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → 𝑥 ≤ -𝑣) ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢)
54	30, 53	bitrdi 286	. . . . 5 ⊢ (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦 ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢))
55	13, 54	anbi12d 630	. . . 4 ⊢ (𝐴 ⊆ ℝ → ((𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦) ↔ ({𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ≠ ∅ ∧ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢)))
56		ssrab2 4073	. . . . 5 ⊢ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ⊆ ℝ
57		sup3 12217	. . . . 5 ⊢ (({𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ⊆ ℝ ∧ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ≠ ∅ ∧ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢) → ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡)))
58	56, 57	mp3an1 1445	. . . 4 ⊢ (({𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ≠ ∅ ∧ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 ≤ 𝑢) → ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡)))
59	55, 58	biimtrdi 252	. . 3 ⊢ (𝐴 ⊆ ℝ → ((𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦) → ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡))))
60	15	imbi1d 340	. . . . . . . . 9 ⊢ (𝐴 ⊆ ℝ → ((𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥) ↔ ((𝑦 ∈ ℝ ∧ 𝑦 ∈ 𝐴) → ¬ 𝑦 < 𝑥)))
61		impexp 449	. . . . . . . . 9 ⊢ (((𝑦 ∈ ℝ ∧ 𝑦 ∈ 𝐴) → ¬ 𝑦 < 𝑥) ↔ (𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥)))
62	60, 61	bitrdi 286	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ → ((𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥) ↔ (𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥))))
63	62	albidv 1916	. . . . . . 7 ⊢ (𝐴 ⊆ ℝ → (∀𝑦(𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥))))
64		df-ral 3052	. . . . . . 7 ⊢ (∀𝑦 ∈ 𝐴 ¬ 𝑦 < 𝑥 ↔ ∀𝑦(𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥))
65		breq1 5148	. . . . . . . . . . 11 ⊢ (𝑦 = -𝑣 → (𝑦 < 𝑥 ↔ -𝑣 < 𝑥))
66	65	notbid 317	. . . . . . . . . 10 ⊢ (𝑦 = -𝑣 → (¬ 𝑦 < 𝑥 ↔ ¬ -𝑣 < 𝑥))
67	23, 66	imbi12d 343	. . . . . . . . 9 ⊢ (𝑦 = -𝑣 → ((𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥) ↔ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥)))
68	21, 22, 67	ralxfr 5410	. . . . . . . 8 ⊢ (∀𝑦 ∈ ℝ (𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥) ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥))
69		df-ral 3052	. . . . . . . 8 ⊢ (∀𝑦 ∈ ℝ (𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥)))
70	68, 69	bitr3i 276	. . . . . . 7 ⊢ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦 ∈ 𝐴 → ¬ 𝑦 < 𝑥)))
71	63, 64, 70	3bitr4g 313	. . . . . 6 ⊢ (𝐴 ⊆ ℝ → (∀𝑦 ∈ 𝐴 ¬ 𝑦 < 𝑥 ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥)))
72		breq2 5149	. . . . . . . . 9 ⊢ (𝑦 = -𝑣 → (𝑥 < 𝑦 ↔ 𝑥 < -𝑣))
73		breq2 5149	. . . . . . . . . 10 ⊢ (𝑦 = -𝑣 → (𝑧 < 𝑦 ↔ 𝑧 < -𝑣))
74	73	rexbidv 3169	. . . . . . . . 9 ⊢ (𝑦 = -𝑣 → (∃𝑧 ∈ 𝐴 𝑧 < 𝑦 ↔ ∃𝑧 ∈ 𝐴 𝑧 < -𝑣))
75	72, 74	imbi12d 343	. . . . . . . 8 ⊢ (𝑦 = -𝑣 → ((𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦) ↔ (𝑥 < -𝑣 → ∃𝑧 ∈ 𝐴 𝑧 < -𝑣)))
76	21, 22, 75	ralxfr 5410	. . . . . . 7 ⊢ (∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦) ↔ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑧 ∈ 𝐴 𝑧 < -𝑣))
77		ssel 3972	. . . . . . . . . . . . 13 ⊢ (𝐴 ⊆ ℝ → (𝑧 ∈ 𝐴 → 𝑧 ∈ ℝ))
78	77	adantrd 490	. . . . . . . . . . . 12 ⊢ (𝐴 ⊆ ℝ → ((𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣) → 𝑧 ∈ ℝ))
79	78	pm4.71rd 561	. . . . . . . . . . 11 ⊢ (𝐴 ⊆ ℝ → ((𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣) ↔ (𝑧 ∈ ℝ ∧ (𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣))))
80	79	exbidv 1917	. . . . . . . . . 10 ⊢ (𝐴 ⊆ ℝ → (∃𝑧(𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣) ↔ ∃𝑧(𝑧 ∈ ℝ ∧ (𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣))))
81		df-rex 3061	. . . . . . . . . 10 ⊢ (∃𝑧 ∈ 𝐴 𝑧 < -𝑣 ↔ ∃𝑧(𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣))
82		renegcl 11564	. . . . . . . . . . . 12 ⊢ (𝑡 ∈ ℝ → -𝑡 ∈ ℝ)
83		infm3lem 12218	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ ℝ → ∃𝑡 ∈ ℝ 𝑧 = -𝑡)
84		eleq1 2814	. . . . . . . . . . . . 13 ⊢ (𝑧 = -𝑡 → (𝑧 ∈ 𝐴 ↔ -𝑡 ∈ 𝐴))
85		breq1 5148	. . . . . . . . . . . . 13 ⊢ (𝑧 = -𝑡 → (𝑧 < -𝑣 ↔ -𝑡 < -𝑣))
86	84, 85	anbi12d 630	. . . . . . . . . . . 12 ⊢ (𝑧 = -𝑡 → ((𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣) ↔ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))
87	82, 83, 86	rexxfr 5412	. . . . . . . . . . 11 ⊢ (∃𝑧 ∈ ℝ (𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣) ↔ ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))
88		df-rex 3061	. . . . . . . . . . 11 ⊢ (∃𝑧 ∈ ℝ (𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣) ↔ ∃𝑧(𝑧 ∈ ℝ ∧ (𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣)))
89	87, 88	bitr3i 276	. . . . . . . . . 10 ⊢ (∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣) ↔ ∃𝑧(𝑧 ∈ ℝ ∧ (𝑧 ∈ 𝐴 ∧ 𝑧 < -𝑣)))
90	80, 81, 89	3bitr4g 313	. . . . . . . . 9 ⊢ (𝐴 ⊆ ℝ → (∃𝑧 ∈ 𝐴 𝑧 < -𝑣 ↔ ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))
91	90	imbi2d 339	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ → ((𝑥 < -𝑣 → ∃𝑧 ∈ 𝐴 𝑧 < -𝑣) ↔ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
92	91	ralbidv 3168	. . . . . . 7 ⊢ (𝐴 ⊆ ℝ → (∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑧 ∈ 𝐴 𝑧 < -𝑣) ↔ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
93	76, 92	bitrid 282	. . . . . 6 ⊢ (𝐴 ⊆ ℝ → (∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦) ↔ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
94	71, 93	anbi12d 630	. . . . 5 ⊢ (𝐴 ⊆ ℝ → ((∀𝑦 ∈ 𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦)) ↔ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))))
95	94	rexbidv 3169	. . . 4 ⊢ (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ (∀𝑦 ∈ 𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦)) ↔ ∃𝑥 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))))
96		breq2 5149	. . . . . . . . . 10 ⊢ (𝑥 = -𝑢 → (-𝑣 < 𝑥 ↔ -𝑣 < -𝑢))
97	96	notbid 317	. . . . . . . . 9 ⊢ (𝑥 = -𝑢 → (¬ -𝑣 < 𝑥 ↔ ¬ -𝑣 < -𝑢))
98	97	imbi2d 339	. . . . . . . 8 ⊢ (𝑥 = -𝑢 → ((-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ↔ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢)))
99	98	ralbidv 3168	. . . . . . 7 ⊢ (𝑥 = -𝑢 → (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢)))
100		breq1 5148	. . . . . . . . 9 ⊢ (𝑥 = -𝑢 → (𝑥 < -𝑣 ↔ -𝑢 < -𝑣))
101	100	imbi1d 340	. . . . . . . 8 ⊢ (𝑥 = -𝑢 → ((𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)) ↔ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
102	101	ralbidv 3168	. . . . . . 7 ⊢ (𝑥 = -𝑢 → (∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)) ↔ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
103	99, 102	anbi12d 630	. . . . . 6 ⊢ (𝑥 = -𝑢 → ((∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))) ↔ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))))
104	31, 32, 103	rexxfr 5412	. . . . 5 ⊢ (∃𝑥 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
105	39	imbi1i 348	. . . . . . . . . . 11 ⊢ ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → ¬ 𝑢 < 𝑣) ↔ ((𝑣 ∈ ℝ ∧ -𝑣 ∈ 𝐴) → ¬ 𝑢 < 𝑣))
106		impexp 449	. . . . . . . . . . 11 ⊢ (((𝑣 ∈ ℝ ∧ -𝑣 ∈ 𝐴) → ¬ 𝑢 < 𝑣) ↔ (𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣)))
107	105, 106	bitri 274	. . . . . . . . . 10 ⊢ ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → ¬ 𝑢 < 𝑣) ↔ (𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣)))
108	107	albii 1814	. . . . . . . . 9 ⊢ (∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → ¬ 𝑢 < 𝑣) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣)))
109		df-ral 3052	. . . . . . . . 9 ⊢ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ↔ ∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} → ¬ 𝑢 < 𝑣))
110		df-ral 3052	. . . . . . . . 9 ⊢ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣)))
111	108, 109, 110	3bitr4ri 303	. . . . . . . 8 ⊢ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣) ↔ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣)
112		ltneg 11755	. . . . . . . . . . 11 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (𝑢 < 𝑣 ↔ -𝑣 < -𝑢))
113	112	notbid 317	. . . . . . . . . 10 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (¬ 𝑢 < 𝑣 ↔ ¬ -𝑣 < -𝑢))
114	113	imbi2d 339	. . . . . . . . 9 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → ((-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣) ↔ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢)))
115	114	ralbidva 3166	. . . . . . . 8 ⊢ (𝑢 ∈ ℝ → (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ 𝑢 < 𝑣) ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢)))
116	111, 115	bitr3id 284	. . . . . . 7 ⊢ (𝑢 ∈ ℝ → (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ↔ ∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢)))
117		ltneg 11755	. . . . . . . . . 10 ⊢ ((𝑣 ∈ ℝ ∧ 𝑢 ∈ ℝ) → (𝑣 < 𝑢 ↔ -𝑢 < -𝑣))
118	117	ancoms 457	. . . . . . . . 9 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (𝑣 < 𝑢 ↔ -𝑢 < -𝑣))
119		negeq 11493	. . . . . . . . . . . . 13 ⊢ (𝑤 = 𝑡 → -𝑤 = -𝑡)
120	119	eleq1d 2811	. . . . . . . . . . . 12 ⊢ (𝑤 = 𝑡 → (-𝑤 ∈ 𝐴 ↔ -𝑡 ∈ 𝐴))
121	120	rexrab 3689	. . . . . . . . . . 11 ⊢ (∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡 ↔ ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ 𝑣 < 𝑡))
122		ltneg 11755	. . . . . . . . . . . . 13 ⊢ ((𝑣 ∈ ℝ ∧ 𝑡 ∈ ℝ) → (𝑣 < 𝑡 ↔ -𝑡 < -𝑣))
123	122	anbi2d 628	. . . . . . . . . . . 12 ⊢ ((𝑣 ∈ ℝ ∧ 𝑡 ∈ ℝ) → ((-𝑡 ∈ 𝐴 ∧ 𝑣 < 𝑡) ↔ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))
124	123	rexbidva 3167	. . . . . . . . . . 11 ⊢ (𝑣 ∈ ℝ → (∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ 𝑣 < 𝑡) ↔ ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))
125	121, 124	bitrid 282	. . . . . . . . . 10 ⊢ (𝑣 ∈ ℝ → (∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡 ↔ ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))
126	125	adantl 480	. . . . . . . . 9 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡 ↔ ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))
127	118, 126	imbi12d 343	. . . . . . . 8 ⊢ ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → ((𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡) ↔ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
128	127	ralbidva 3166	. . . . . . 7 ⊢ (𝑢 ∈ ℝ → (∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡) ↔ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
129	116, 128	anbi12d 630	. . . . . 6 ⊢ (𝑢 ∈ ℝ → ((∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡)) ↔ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣)))))
130	129	rexbiia 3082	. . . . 5 ⊢ (∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡)) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))))
131	104, 130	bitr4i 277	. . . 4 ⊢ (∃𝑥 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣 ∈ 𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡 ∈ 𝐴 ∧ -𝑡 < -𝑣))) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡)))
132	95, 131	bitrdi 286	. . 3 ⊢ (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ (∀𝑦 ∈ 𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦)) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤 ∈ 𝐴}𝑣 < 𝑡))))
133	59, 132	sylibrd 258	. 2 ⊢ (𝐴 ⊆ ℝ → ((𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦) → ∃𝑥 ∈ ℝ (∀𝑦 ∈ 𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦))))
134	133	3impib 1113	1 ⊢ ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑥 ≤ 𝑦) → ∃𝑥 ∈ ℝ (∀𝑦 ∈ 𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ 𝐴 𝑧 < 𝑦)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 394   ∧ w3a 1084  ∀wal 1532   = wceq 1534  ∃wex 1774   ∈ wcel 2099   ≠ wne 2930  ∀wral 3051  ∃wrex 3060  {crab 3419   ⊆ wss 3946  ∅c0 4322   class class class wbr 5145  ℝcr 11148   < clt 11289   ≤ cle 11290  -cneg 11486

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-10 2130  ax-11 2147  ax-12 2167  ax-ext 2697  ax-sep 5296  ax-nul 5303  ax-pow 5361  ax-pr 5425  ax-un 7738  ax-resscn 11206  ax-1cn 11207  ax-icn 11208  ax-addcl 11209  ax-addrcl 11210  ax-mulcl 11211  ax-mulrcl 11212  ax-mulcom 11213  ax-addass 11214  ax-mulass 11215  ax-distr 11216  ax-i2m1 11217  ax-1ne0 11218  ax-1rid 11219  ax-rnegex 11220  ax-rrecex 11221  ax-cnre 11222  ax-pre-lttri 11223  ax-pre-lttrn 11224  ax-pre-ltadd 11225  ax-pre-mulgt0 11226  ax-pre-sup 11227

This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3or 1085  df-3an 1086  df-tru 1537  df-fal 1547  df-ex 1775  df-nf 1779  df-sb 2061  df-mo 2529  df-eu 2558  df-clab 2704  df-cleq 2718  df-clel 2803  df-nfc 2878  df-ne 2931  df-nel 3037  df-ral 3052  df-rex 3061  df-reu 3365  df-rab 3420  df-v 3464  df-sbc 3776  df-csb 3892  df-dif 3949  df-un 3951  df-in 3953  df-ss 3963  df-nul 4323  df-if 4524  df-pw 4599  df-sn 4624  df-pr 4626  df-op 4630  df-uni 4906  df-br 5146  df-opab 5208  df-mpt 5229  df-id 5572  df-po 5586  df-so 5587  df-xp 5680  df-rel 5681  df-cnv 5682  df-co 5683  df-dm 5684  df-rn 5685  df-res 5686  df-ima 5687  df-iota 6498  df-fun 6548  df-fn 6549  df-f 6550  df-f1 6551  df-fo 6552  df-f1o 6553  df-fv 6554  df-riota 7372  df-ov 7419  df-oprab 7420  df-mpo 7421  df-er 8726  df-en 8967  df-dom 8968  df-sdom 8969  df-pnf 11291  df-mnf 11292  df-xr 11293  df-ltxr 11294  df-le 11295  df-sub 11487  df-neg 11488

This theorem is referenced by:  infrecl  12242  infrenegsup  12243  infregelb  12244  infrelb  12245  xrinfmsslem  13335  gtinf  36044  infrglb  45247