MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  infm3 Structured version   Visualization version   GIF version

Theorem infm3 12180
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 12178.) (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.
StepHypRef Expression
1 ssel 3975 . . . . . . . . 9 (𝐴 ⊆ ℝ → (𝑣𝐴𝑣 ∈ ℝ))
21pm4.71rd 562 . . . . . . . 8 (𝐴 ⊆ ℝ → (𝑣𝐴 ↔ (𝑣 ∈ ℝ ∧ 𝑣𝐴)))
32exbidv 1923 . . . . . . 7 (𝐴 ⊆ ℝ → (∃𝑣 𝑣𝐴 ↔ ∃𝑣(𝑣 ∈ ℝ ∧ 𝑣𝐴)))
4 df-rex 3070 . . . . . . . 8 (∃𝑣 ∈ ℝ 𝑣𝐴 ↔ ∃𝑣(𝑣 ∈ ℝ ∧ 𝑣𝐴))
5 renegcl 11530 . . . . . . . . 9 (𝑤 ∈ ℝ → -𝑤 ∈ ℝ)
6 infm3lem 12179 . . . . . . . . 9 (𝑣 ∈ ℝ → ∃𝑤 ∈ ℝ 𝑣 = -𝑤)
7 eleq1 2820 . . . . . . . . 9 (𝑣 = -𝑤 → (𝑣𝐴 ↔ -𝑤𝐴))
85, 6, 7rexxfr 5414 . . . . . . . 8 (∃𝑣 ∈ ℝ 𝑣𝐴 ↔ ∃𝑤 ∈ ℝ -𝑤𝐴)
94, 8bitr3i 277 . . . . . . 7 (∃𝑣(𝑣 ∈ ℝ ∧ 𝑣𝐴) ↔ ∃𝑤 ∈ ℝ -𝑤𝐴)
103, 9bitrdi 287 . . . . . 6 (𝐴 ⊆ ℝ → (∃𝑣 𝑣𝐴 ↔ ∃𝑤 ∈ ℝ -𝑤𝐴))
11 n0 4346 . . . . . 6 (𝐴 ≠ ∅ ↔ ∃𝑣 𝑣𝐴)
12 rabn0 4385 . . . . . 6 ({𝑤 ∈ ℝ ∣ -𝑤𝐴} ≠ ∅ ↔ ∃𝑤 ∈ ℝ -𝑤𝐴)
1310, 11, 123bitr4g 314 . . . . 5 (𝐴 ⊆ ℝ → (𝐴 ≠ ∅ ↔ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ≠ ∅))
14 ssel 3975 . . . . . . . . . . . 12 (𝐴 ⊆ ℝ → (𝑦𝐴𝑦 ∈ ℝ))
1514pm4.71rd 562 . . . . . . . . . . 11 (𝐴 ⊆ ℝ → (𝑦𝐴 ↔ (𝑦 ∈ ℝ ∧ 𝑦𝐴)))
1615imbi1d 341 . . . . . . . . . 10 (𝐴 ⊆ ℝ → ((𝑦𝐴𝑥𝑦) ↔ ((𝑦 ∈ ℝ ∧ 𝑦𝐴) → 𝑥𝑦)))
17 impexp 450 . . . . . . . . . 10 (((𝑦 ∈ ℝ ∧ 𝑦𝐴) → 𝑥𝑦) ↔ (𝑦 ∈ ℝ → (𝑦𝐴𝑥𝑦)))
1816, 17bitrdi 287 . . . . . . . . 9 (𝐴 ⊆ ℝ → ((𝑦𝐴𝑥𝑦) ↔ (𝑦 ∈ ℝ → (𝑦𝐴𝑥𝑦))))
1918albidv 1922 . . . . . . . 8 (𝐴 ⊆ ℝ → (∀𝑦(𝑦𝐴𝑥𝑦) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦𝐴𝑥𝑦))))
20 df-ral 3061 . . . . . . . 8 (∀𝑦𝐴 𝑥𝑦 ↔ ∀𝑦(𝑦𝐴𝑥𝑦))
21 renegcl 11530 . . . . . . . . . 10 (𝑣 ∈ ℝ → -𝑣 ∈ ℝ)
22 infm3lem 12179 . . . . . . . . . 10 (𝑦 ∈ ℝ → ∃𝑣 ∈ ℝ 𝑦 = -𝑣)
23 eleq1 2820 . . . . . . . . . . 11 (𝑦 = -𝑣 → (𝑦𝐴 ↔ -𝑣𝐴))
24 breq2 5152 . . . . . . . . . . 11 (𝑦 = -𝑣 → (𝑥𝑦𝑥 ≤ -𝑣))
2523, 24imbi12d 344 . . . . . . . . . 10 (𝑦 = -𝑣 → ((𝑦𝐴𝑥𝑦) ↔ (-𝑣𝐴𝑥 ≤ -𝑣)))
2621, 22, 25ralxfr 5412 . . . . . . . . 9 (∀𝑦 ∈ ℝ (𝑦𝐴𝑥𝑦) ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴𝑥 ≤ -𝑣))
27 df-ral 3061 . . . . . . . . 9 (∀𝑦 ∈ ℝ (𝑦𝐴𝑥𝑦) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦𝐴𝑥𝑦)))
2826, 27bitr3i 277 . . . . . . . 8 (∀𝑣 ∈ ℝ (-𝑣𝐴𝑥 ≤ -𝑣) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦𝐴𝑥𝑦)))
2919, 20, 283bitr4g 314 . . . . . . 7 (𝐴 ⊆ ℝ → (∀𝑦𝐴 𝑥𝑦 ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴𝑥 ≤ -𝑣)))
3029rexbidv 3177 . . . . . 6 (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑥𝑦 ↔ ∃𝑥 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣𝐴𝑥 ≤ -𝑣)))
31 renegcl 11530 . . . . . . . 8 (𝑢 ∈ ℝ → -𝑢 ∈ ℝ)
32 infm3lem 12179 . . . . . . . 8 (𝑥 ∈ ℝ → ∃𝑢 ∈ ℝ 𝑥 = -𝑢)
33 breq1 5151 . . . . . . . . . 10 (𝑥 = -𝑢 → (𝑥 ≤ -𝑣 ↔ -𝑢 ≤ -𝑣))
3433imbi2d 340 . . . . . . . . 9 (𝑥 = -𝑢 → ((-𝑣𝐴𝑥 ≤ -𝑣) ↔ (-𝑣𝐴 → -𝑢 ≤ -𝑣)))
3534ralbidv 3176 . . . . . . . 8 (𝑥 = -𝑢 → (∀𝑣 ∈ ℝ (-𝑣𝐴𝑥 ≤ -𝑣) ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → -𝑢 ≤ -𝑣)))
3631, 32, 35rexxfr 5414 . . . . . . 7 (∃𝑥 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣𝐴𝑥 ≤ -𝑣) ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣𝐴 → -𝑢 ≤ -𝑣))
37 negeq 11459 . . . . . . . . . . . . . . 15 (𝑤 = 𝑣 → -𝑤 = -𝑣)
3837eleq1d 2817 . . . . . . . . . . . . . 14 (𝑤 = 𝑣 → (-𝑤𝐴 ↔ -𝑣𝐴))
3938elrab 3683 . . . . . . . . . . . . 13 (𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ↔ (𝑣 ∈ ℝ ∧ -𝑣𝐴))
4039imbi1i 349 . . . . . . . . . . . 12 ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → 𝑣𝑢) ↔ ((𝑣 ∈ ℝ ∧ -𝑣𝐴) → 𝑣𝑢))
41 impexp 450 . . . . . . . . . . . 12 (((𝑣 ∈ ℝ ∧ -𝑣𝐴) → 𝑣𝑢) ↔ (𝑣 ∈ ℝ → (-𝑣𝐴𝑣𝑢)))
4240, 41bitri 275 . . . . . . . . . . 11 ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → 𝑣𝑢) ↔ (𝑣 ∈ ℝ → (-𝑣𝐴𝑣𝑢)))
4342albii 1820 . . . . . . . . . 10 (∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → 𝑣𝑢) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣𝐴𝑣𝑢)))
44 df-ral 3061 . . . . . . . . . 10 (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢 ↔ ∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → 𝑣𝑢))
45 df-ral 3061 . . . . . . . . . 10 (∀𝑣 ∈ ℝ (-𝑣𝐴𝑣𝑢) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣𝐴𝑣𝑢)))
4643, 44, 453bitr4ri 304 . . . . . . . . 9 (∀𝑣 ∈ ℝ (-𝑣𝐴𝑣𝑢) ↔ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢)
47 leneg 11724 . . . . . . . . . . . 12 ((𝑣 ∈ ℝ ∧ 𝑢 ∈ ℝ) → (𝑣𝑢 ↔ -𝑢 ≤ -𝑣))
4847ancoms 458 . . . . . . . . . . 11 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (𝑣𝑢 ↔ -𝑢 ≤ -𝑣))
4948imbi2d 340 . . . . . . . . . 10 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → ((-𝑣𝐴𝑣𝑢) ↔ (-𝑣𝐴 → -𝑢 ≤ -𝑣)))
5049ralbidva 3174 . . . . . . . . 9 (𝑢 ∈ ℝ → (∀𝑣 ∈ ℝ (-𝑣𝐴𝑣𝑢) ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → -𝑢 ≤ -𝑣)))
5146, 50bitr3id 285 . . . . . . . 8 (𝑢 ∈ ℝ → (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢 ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → -𝑢 ≤ -𝑣)))
5251rexbiia 3091 . . . . . . 7 (∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢 ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣𝐴 → -𝑢 ≤ -𝑣))
5336, 52bitr4i 278 . . . . . 6 (∃𝑥 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣𝐴𝑥 ≤ -𝑣) ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢)
5430, 53bitrdi 287 . . . . 5 (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑥𝑦 ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢))
5513, 54anbi12d 630 . . . 4 (𝐴 ⊆ ℝ → ((𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑥𝑦) ↔ ({𝑤 ∈ ℝ ∣ -𝑤𝐴} ≠ ∅ ∧ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢)))
56 ssrab2 4077 . . . . 5 {𝑤 ∈ ℝ ∣ -𝑤𝐴} ⊆ ℝ
57 sup3 12178 . . . . 5 (({𝑤 ∈ ℝ ∣ -𝑤𝐴} ⊆ ℝ ∧ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ≠ ∅ ∧ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢) → ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡)))
5856, 57mp3an1 1447 . . . 4 (({𝑤 ∈ ℝ ∣ -𝑤𝐴} ≠ ∅ ∧ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢) → ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡)))
5955, 58syl6bi 253 . . 3 (𝐴 ⊆ ℝ → ((𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑥𝑦) → ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡))))
6015imbi1d 341 . . . . . . . . 9 (𝐴 ⊆ ℝ → ((𝑦𝐴 → ¬ 𝑦 < 𝑥) ↔ ((𝑦 ∈ ℝ ∧ 𝑦𝐴) → ¬ 𝑦 < 𝑥)))
61 impexp 450 . . . . . . . . 9 (((𝑦 ∈ ℝ ∧ 𝑦𝐴) → ¬ 𝑦 < 𝑥) ↔ (𝑦 ∈ ℝ → (𝑦𝐴 → ¬ 𝑦 < 𝑥)))
6260, 61bitrdi 287 . . . . . . . 8 (𝐴 ⊆ ℝ → ((𝑦𝐴 → ¬ 𝑦 < 𝑥) ↔ (𝑦 ∈ ℝ → (𝑦𝐴 → ¬ 𝑦 < 𝑥))))
6362albidv 1922 . . . . . . 7 (𝐴 ⊆ ℝ → (∀𝑦(𝑦𝐴 → ¬ 𝑦 < 𝑥) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦𝐴 → ¬ 𝑦 < 𝑥))))
64 df-ral 3061 . . . . . . 7 (∀𝑦𝐴 ¬ 𝑦 < 𝑥 ↔ ∀𝑦(𝑦𝐴 → ¬ 𝑦 < 𝑥))
65 breq1 5151 . . . . . . . . . . 11 (𝑦 = -𝑣 → (𝑦 < 𝑥 ↔ -𝑣 < 𝑥))
6665notbid 318 . . . . . . . . . 10 (𝑦 = -𝑣 → (¬ 𝑦 < 𝑥 ↔ ¬ -𝑣 < 𝑥))
6723, 66imbi12d 344 . . . . . . . . 9 (𝑦 = -𝑣 → ((𝑦𝐴 → ¬ 𝑦 < 𝑥) ↔ (-𝑣𝐴 → ¬ -𝑣 < 𝑥)))
6821, 22, 67ralxfr 5412 . . . . . . . 8 (∀𝑦 ∈ ℝ (𝑦𝐴 → ¬ 𝑦 < 𝑥) ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥))
69 df-ral 3061 . . . . . . . 8 (∀𝑦 ∈ ℝ (𝑦𝐴 → ¬ 𝑦 < 𝑥) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦𝐴 → ¬ 𝑦 < 𝑥)))
7068, 69bitr3i 277 . . . . . . 7 (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦𝐴 → ¬ 𝑦 < 𝑥)))
7163, 64, 703bitr4g 314 . . . . . 6 (𝐴 ⊆ ℝ → (∀𝑦𝐴 ¬ 𝑦 < 𝑥 ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥)))
72 breq2 5152 . . . . . . . . 9 (𝑦 = -𝑣 → (𝑥 < 𝑦𝑥 < -𝑣))
73 breq2 5152 . . . . . . . . . 10 (𝑦 = -𝑣 → (𝑧 < 𝑦𝑧 < -𝑣))
7473rexbidv 3177 . . . . . . . . 9 (𝑦 = -𝑣 → (∃𝑧𝐴 𝑧 < 𝑦 ↔ ∃𝑧𝐴 𝑧 < -𝑣))
7572, 74imbi12d 344 . . . . . . . 8 (𝑦 = -𝑣 → ((𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦) ↔ (𝑥 < -𝑣 → ∃𝑧𝐴 𝑧 < -𝑣)))
7621, 22, 75ralxfr 5412 . . . . . . 7 (∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦) ↔ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑧𝐴 𝑧 < -𝑣))
77 ssel 3975 . . . . . . . . . . . . 13 (𝐴 ⊆ ℝ → (𝑧𝐴𝑧 ∈ ℝ))
7877adantrd 491 . . . . . . . . . . . 12 (𝐴 ⊆ ℝ → ((𝑧𝐴𝑧 < -𝑣) → 𝑧 ∈ ℝ))
7978pm4.71rd 562 . . . . . . . . . . 11 (𝐴 ⊆ ℝ → ((𝑧𝐴𝑧 < -𝑣) ↔ (𝑧 ∈ ℝ ∧ (𝑧𝐴𝑧 < -𝑣))))
8079exbidv 1923 . . . . . . . . . 10 (𝐴 ⊆ ℝ → (∃𝑧(𝑧𝐴𝑧 < -𝑣) ↔ ∃𝑧(𝑧 ∈ ℝ ∧ (𝑧𝐴𝑧 < -𝑣))))
81 df-rex 3070 . . . . . . . . . 10 (∃𝑧𝐴 𝑧 < -𝑣 ↔ ∃𝑧(𝑧𝐴𝑧 < -𝑣))
82 renegcl 11530 . . . . . . . . . . . 12 (𝑡 ∈ ℝ → -𝑡 ∈ ℝ)
83 infm3lem 12179 . . . . . . . . . . . 12 (𝑧 ∈ ℝ → ∃𝑡 ∈ ℝ 𝑧 = -𝑡)
84 eleq1 2820 . . . . . . . . . . . . 13 (𝑧 = -𝑡 → (𝑧𝐴 ↔ -𝑡𝐴))
85 breq1 5151 . . . . . . . . . . . . 13 (𝑧 = -𝑡 → (𝑧 < -𝑣 ↔ -𝑡 < -𝑣))
8684, 85anbi12d 630 . . . . . . . . . . . 12 (𝑧 = -𝑡 → ((𝑧𝐴𝑧 < -𝑣) ↔ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))
8782, 83, 86rexxfr 5414 . . . . . . . . . . 11 (∃𝑧 ∈ ℝ (𝑧𝐴𝑧 < -𝑣) ↔ ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))
88 df-rex 3070 . . . . . . . . . . 11 (∃𝑧 ∈ ℝ (𝑧𝐴𝑧 < -𝑣) ↔ ∃𝑧(𝑧 ∈ ℝ ∧ (𝑧𝐴𝑧 < -𝑣)))
8987, 88bitr3i 277 . . . . . . . . . 10 (∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣) ↔ ∃𝑧(𝑧 ∈ ℝ ∧ (𝑧𝐴𝑧 < -𝑣)))
9080, 81, 893bitr4g 314 . . . . . . . . 9 (𝐴 ⊆ ℝ → (∃𝑧𝐴 𝑧 < -𝑣 ↔ ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))
9190imbi2d 340 . . . . . . . 8 (𝐴 ⊆ ℝ → ((𝑥 < -𝑣 → ∃𝑧𝐴 𝑧 < -𝑣) ↔ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
9291ralbidv 3176 . . . . . . 7 (𝐴 ⊆ ℝ → (∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑧𝐴 𝑧 < -𝑣) ↔ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
9376, 92bitrid 283 . . . . . 6 (𝐴 ⊆ ℝ → (∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦) ↔ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
9471, 93anbi12d 630 . . . . 5 (𝐴 ⊆ ℝ → ((∀𝑦𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦)) ↔ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))))
9594rexbidv 3177 . . . 4 (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ (∀𝑦𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦)) ↔ ∃𝑥 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))))
96 breq2 5152 . . . . . . . . . 10 (𝑥 = -𝑢 → (-𝑣 < 𝑥 ↔ -𝑣 < -𝑢))
9796notbid 318 . . . . . . . . 9 (𝑥 = -𝑢 → (¬ -𝑣 < 𝑥 ↔ ¬ -𝑣 < -𝑢))
9897imbi2d 340 . . . . . . . 8 (𝑥 = -𝑢 → ((-𝑣𝐴 → ¬ -𝑣 < 𝑥) ↔ (-𝑣𝐴 → ¬ -𝑣 < -𝑢)))
9998ralbidv 3176 . . . . . . 7 (𝑥 = -𝑢 → (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥) ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < -𝑢)))
100 breq1 5151 . . . . . . . . 9 (𝑥 = -𝑢 → (𝑥 < -𝑣 ↔ -𝑢 < -𝑣))
101100imbi1d 341 . . . . . . . 8 (𝑥 = -𝑢 → ((𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)) ↔ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
102101ralbidv 3176 . . . . . . 7 (𝑥 = -𝑢 → (∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)) ↔ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
10399, 102anbi12d 630 . . . . . 6 (𝑥 = -𝑢 → ((∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))) ↔ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))))
10431, 32, 103rexxfr 5414 . . . . 5 (∃𝑥 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
10539imbi1i 349 . . . . . . . . . . 11 ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → ¬ 𝑢 < 𝑣) ↔ ((𝑣 ∈ ℝ ∧ -𝑣𝐴) → ¬ 𝑢 < 𝑣))
106 impexp 450 . . . . . . . . . . 11 (((𝑣 ∈ ℝ ∧ -𝑣𝐴) → ¬ 𝑢 < 𝑣) ↔ (𝑣 ∈ ℝ → (-𝑣𝐴 → ¬ 𝑢 < 𝑣)))
107105, 106bitri 275 . . . . . . . . . 10 ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → ¬ 𝑢 < 𝑣) ↔ (𝑣 ∈ ℝ → (-𝑣𝐴 → ¬ 𝑢 < 𝑣)))
108107albii 1820 . . . . . . . . 9 (∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → ¬ 𝑢 < 𝑣) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣𝐴 → ¬ 𝑢 < 𝑣)))
109 df-ral 3061 . . . . . . . . 9 (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ↔ ∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → ¬ 𝑢 < 𝑣))
110 df-ral 3061 . . . . . . . . 9 (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ 𝑢 < 𝑣) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣𝐴 → ¬ 𝑢 < 𝑣)))
111108, 109, 1103bitr4ri 304 . . . . . . . 8 (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ 𝑢 < 𝑣) ↔ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣)
112 ltneg 11721 . . . . . . . . . . 11 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (𝑢 < 𝑣 ↔ -𝑣 < -𝑢))
113112notbid 318 . . . . . . . . . 10 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (¬ 𝑢 < 𝑣 ↔ ¬ -𝑣 < -𝑢))
114113imbi2d 340 . . . . . . . . 9 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → ((-𝑣𝐴 → ¬ 𝑢 < 𝑣) ↔ (-𝑣𝐴 → ¬ -𝑣 < -𝑢)))
115114ralbidva 3174 . . . . . . . 8 (𝑢 ∈ ℝ → (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ 𝑢 < 𝑣) ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < -𝑢)))
116111, 115bitr3id 285 . . . . . . 7 (𝑢 ∈ ℝ → (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < -𝑢)))
117 ltneg 11721 . . . . . . . . . 10 ((𝑣 ∈ ℝ ∧ 𝑢 ∈ ℝ) → (𝑣 < 𝑢 ↔ -𝑢 < -𝑣))
118117ancoms 458 . . . . . . . . 9 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (𝑣 < 𝑢 ↔ -𝑢 < -𝑣))
119 negeq 11459 . . . . . . . . . . . . 13 (𝑤 = 𝑡 → -𝑤 = -𝑡)
120119eleq1d 2817 . . . . . . . . . . . 12 (𝑤 = 𝑡 → (-𝑤𝐴 ↔ -𝑡𝐴))
121120rexrab 3692 . . . . . . . . . . 11 (∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡 ↔ ∃𝑡 ∈ ℝ (-𝑡𝐴𝑣 < 𝑡))
122 ltneg 11721 . . . . . . . . . . . . 13 ((𝑣 ∈ ℝ ∧ 𝑡 ∈ ℝ) → (𝑣 < 𝑡 ↔ -𝑡 < -𝑣))
123122anbi2d 628 . . . . . . . . . . . 12 ((𝑣 ∈ ℝ ∧ 𝑡 ∈ ℝ) → ((-𝑡𝐴𝑣 < 𝑡) ↔ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))
124123rexbidva 3175 . . . . . . . . . . 11 (𝑣 ∈ ℝ → (∃𝑡 ∈ ℝ (-𝑡𝐴𝑣 < 𝑡) ↔ ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))
125121, 124bitrid 283 . . . . . . . . . 10 (𝑣 ∈ ℝ → (∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡 ↔ ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))
126125adantl 481 . . . . . . . . 9 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡 ↔ ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))
127118, 126imbi12d 344 . . . . . . . 8 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → ((𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡) ↔ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
128127ralbidva 3174 . . . . . . 7 (𝑢 ∈ ℝ → (∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡) ↔ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
129116, 128anbi12d 630 . . . . . 6 (𝑢 ∈ ℝ → ((∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡)) ↔ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))))
130129rexbiia 3091 . . . . 5 (∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡)) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
131104, 130bitr4i 278 . . . 4 (∃𝑥 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡)))
13295, 131bitrdi 287 . . 3 (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ (∀𝑦𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦)) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡))))
13359, 132sylibrd 259 . 2 (𝐴 ⊆ ℝ → ((𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑥𝑦) → ∃𝑥 ∈ ℝ (∀𝑦𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦))))
1341333impib 1115 1 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑥𝑦) → ∃𝑥 ∈ ℝ (∀𝑦𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 395  w3a 1086  wal 1538   = wceq 1540  wex 1780  wcel 2105  wne 2939  wral 3060  wrex 3069  {crab 3431  wss 3948  c0 4322   class class class wbr 5148  cr 11115   < clt 11255  cle 11256  -cneg 11452
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 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2702  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7729  ax-resscn 11173  ax-1cn 11174  ax-icn 11175  ax-addcl 11176  ax-addrcl 11177  ax-mulcl 11178  ax-mulrcl 11179  ax-mulcom 11180  ax-addass 11181  ax-mulass 11182  ax-distr 11183  ax-i2m1 11184  ax-1ne0 11185  ax-1rid 11186  ax-rnegex 11187  ax-rrecex 11188  ax-cnre 11189  ax-pre-lttri 11190  ax-pre-lttrn 11191  ax-pre-ltadd 11192  ax-pre-mulgt0 11193  ax-pre-sup 11194
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-nel 3046  df-ral 3061  df-rex 3070  df-reu 3376  df-rab 3432  df-v 3475  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-br 5149  df-opab 5211  df-mpt 5232  df-id 5574  df-po 5588  df-so 5589  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-iota 6495  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-riota 7368  df-ov 7415  df-oprab 7416  df-mpo 7417  df-er 8709  df-en 8946  df-dom 8947  df-sdom 8948  df-pnf 11257  df-mnf 11258  df-xr 11259  df-ltxr 11260  df-le 11261  df-sub 11453  df-neg 11454
This theorem is referenced by:  infrecl  12203  infrenegsup  12204  infregelb  12205  infrelb  12206  xrinfmsslem  13294  gtinf  35668  infrglb  44765
  Copyright terms: Public domain W3C validator