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

Theorem infm3 11603
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 11601.) (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 3964 . . . . . . . . 9 (𝐴 ⊆ ℝ → (𝑣𝐴𝑣 ∈ ℝ))
21pm4.71rd 565 . . . . . . . 8 (𝐴 ⊆ ℝ → (𝑣𝐴 ↔ (𝑣 ∈ ℝ ∧ 𝑣𝐴)))
32exbidv 1921 . . . . . . 7 (𝐴 ⊆ ℝ → (∃𝑣 𝑣𝐴 ↔ ∃𝑣(𝑣 ∈ ℝ ∧ 𝑣𝐴)))
4 df-rex 3147 . . . . . . . 8 (∃𝑣 ∈ ℝ 𝑣𝐴 ↔ ∃𝑣(𝑣 ∈ ℝ ∧ 𝑣𝐴))
5 renegcl 10952 . . . . . . . . 9 (𝑤 ∈ ℝ → -𝑤 ∈ ℝ)
6 infm3lem 11602 . . . . . . . . 9 (𝑣 ∈ ℝ → ∃𝑤 ∈ ℝ 𝑣 = -𝑤)
7 eleq1 2903 . . . . . . . . 9 (𝑣 = -𝑤 → (𝑣𝐴 ↔ -𝑤𝐴))
85, 6, 7rexxfr 5320 . . . . . . . 8 (∃𝑣 ∈ ℝ 𝑣𝐴 ↔ ∃𝑤 ∈ ℝ -𝑤𝐴)
94, 8bitr3i 279 . . . . . . 7 (∃𝑣(𝑣 ∈ ℝ ∧ 𝑣𝐴) ↔ ∃𝑤 ∈ ℝ -𝑤𝐴)
103, 9syl6bb 289 . . . . . 6 (𝐴 ⊆ ℝ → (∃𝑣 𝑣𝐴 ↔ ∃𝑤 ∈ ℝ -𝑤𝐴))
11 n0 4313 . . . . . 6 (𝐴 ≠ ∅ ↔ ∃𝑣 𝑣𝐴)
12 rabn0 4342 . . . . . 6 ({𝑤 ∈ ℝ ∣ -𝑤𝐴} ≠ ∅ ↔ ∃𝑤 ∈ ℝ -𝑤𝐴)
1310, 11, 123bitr4g 316 . . . . 5 (𝐴 ⊆ ℝ → (𝐴 ≠ ∅ ↔ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ≠ ∅))
14 ssel 3964 . . . . . . . . . . . 12 (𝐴 ⊆ ℝ → (𝑦𝐴𝑦 ∈ ℝ))
1514pm4.71rd 565 . . . . . . . . . . 11 (𝐴 ⊆ ℝ → (𝑦𝐴 ↔ (𝑦 ∈ ℝ ∧ 𝑦𝐴)))
1615imbi1d 344 . . . . . . . . . 10 (𝐴 ⊆ ℝ → ((𝑦𝐴𝑥𝑦) ↔ ((𝑦 ∈ ℝ ∧ 𝑦𝐴) → 𝑥𝑦)))
17 impexp 453 . . . . . . . . . 10 (((𝑦 ∈ ℝ ∧ 𝑦𝐴) → 𝑥𝑦) ↔ (𝑦 ∈ ℝ → (𝑦𝐴𝑥𝑦)))
1816, 17syl6bb 289 . . . . . . . . 9 (𝐴 ⊆ ℝ → ((𝑦𝐴𝑥𝑦) ↔ (𝑦 ∈ ℝ → (𝑦𝐴𝑥𝑦))))
1918albidv 1920 . . . . . . . 8 (𝐴 ⊆ ℝ → (∀𝑦(𝑦𝐴𝑥𝑦) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦𝐴𝑥𝑦))))
20 df-ral 3146 . . . . . . . 8 (∀𝑦𝐴 𝑥𝑦 ↔ ∀𝑦(𝑦𝐴𝑥𝑦))
21 renegcl 10952 . . . . . . . . . 10 (𝑣 ∈ ℝ → -𝑣 ∈ ℝ)
22 infm3lem 11602 . . . . . . . . . 10 (𝑦 ∈ ℝ → ∃𝑣 ∈ ℝ 𝑦 = -𝑣)
23 eleq1 2903 . . . . . . . . . . 11 (𝑦 = -𝑣 → (𝑦𝐴 ↔ -𝑣𝐴))
24 breq2 5073 . . . . . . . . . . 11 (𝑦 = -𝑣 → (𝑥𝑦𝑥 ≤ -𝑣))
2523, 24imbi12d 347 . . . . . . . . . 10 (𝑦 = -𝑣 → ((𝑦𝐴𝑥𝑦) ↔ (-𝑣𝐴𝑥 ≤ -𝑣)))
2621, 22, 25ralxfr 5318 . . . . . . . . 9 (∀𝑦 ∈ ℝ (𝑦𝐴𝑥𝑦) ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴𝑥 ≤ -𝑣))
27 df-ral 3146 . . . . . . . . 9 (∀𝑦 ∈ ℝ (𝑦𝐴𝑥𝑦) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦𝐴𝑥𝑦)))
2826, 27bitr3i 279 . . . . . . . 8 (∀𝑣 ∈ ℝ (-𝑣𝐴𝑥 ≤ -𝑣) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦𝐴𝑥𝑦)))
2919, 20, 283bitr4g 316 . . . . . . 7 (𝐴 ⊆ ℝ → (∀𝑦𝐴 𝑥𝑦 ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴𝑥 ≤ -𝑣)))
3029rexbidv 3300 . . . . . 6 (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑥𝑦 ↔ ∃𝑥 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣𝐴𝑥 ≤ -𝑣)))
31 renegcl 10952 . . . . . . . 8 (𝑢 ∈ ℝ → -𝑢 ∈ ℝ)
32 infm3lem 11602 . . . . . . . 8 (𝑥 ∈ ℝ → ∃𝑢 ∈ ℝ 𝑥 = -𝑢)
33 breq1 5072 . . . . . . . . . 10 (𝑥 = -𝑢 → (𝑥 ≤ -𝑣 ↔ -𝑢 ≤ -𝑣))
3433imbi2d 343 . . . . . . . . 9 (𝑥 = -𝑢 → ((-𝑣𝐴𝑥 ≤ -𝑣) ↔ (-𝑣𝐴 → -𝑢 ≤ -𝑣)))
3534ralbidv 3200 . . . . . . . 8 (𝑥 = -𝑢 → (∀𝑣 ∈ ℝ (-𝑣𝐴𝑥 ≤ -𝑣) ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → -𝑢 ≤ -𝑣)))
3631, 32, 35rexxfr 5320 . . . . . . 7 (∃𝑥 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣𝐴𝑥 ≤ -𝑣) ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣𝐴 → -𝑢 ≤ -𝑣))
37 negeq 10881 . . . . . . . . . . . . . . 15 (𝑤 = 𝑣 → -𝑤 = -𝑣)
3837eleq1d 2900 . . . . . . . . . . . . . 14 (𝑤 = 𝑣 → (-𝑤𝐴 ↔ -𝑣𝐴))
3938elrab 3683 . . . . . . . . . . . . 13 (𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ↔ (𝑣 ∈ ℝ ∧ -𝑣𝐴))
4039imbi1i 352 . . . . . . . . . . . 12 ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → 𝑣𝑢) ↔ ((𝑣 ∈ ℝ ∧ -𝑣𝐴) → 𝑣𝑢))
41 impexp 453 . . . . . . . . . . . 12 (((𝑣 ∈ ℝ ∧ -𝑣𝐴) → 𝑣𝑢) ↔ (𝑣 ∈ ℝ → (-𝑣𝐴𝑣𝑢)))
4240, 41bitri 277 . . . . . . . . . . 11 ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → 𝑣𝑢) ↔ (𝑣 ∈ ℝ → (-𝑣𝐴𝑣𝑢)))
4342albii 1819 . . . . . . . . . 10 (∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → 𝑣𝑢) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣𝐴𝑣𝑢)))
44 df-ral 3146 . . . . . . . . . 10 (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢 ↔ ∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → 𝑣𝑢))
45 df-ral 3146 . . . . . . . . . 10 (∀𝑣 ∈ ℝ (-𝑣𝐴𝑣𝑢) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣𝐴𝑣𝑢)))
4643, 44, 453bitr4ri 306 . . . . . . . . 9 (∀𝑣 ∈ ℝ (-𝑣𝐴𝑣𝑢) ↔ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢)
47 leneg 11146 . . . . . . . . . . . 12 ((𝑣 ∈ ℝ ∧ 𝑢 ∈ ℝ) → (𝑣𝑢 ↔ -𝑢 ≤ -𝑣))
4847ancoms 461 . . . . . . . . . . 11 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (𝑣𝑢 ↔ -𝑢 ≤ -𝑣))
4948imbi2d 343 . . . . . . . . . 10 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → ((-𝑣𝐴𝑣𝑢) ↔ (-𝑣𝐴 → -𝑢 ≤ -𝑣)))
5049ralbidva 3199 . . . . . . . . 9 (𝑢 ∈ ℝ → (∀𝑣 ∈ ℝ (-𝑣𝐴𝑣𝑢) ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → -𝑢 ≤ -𝑣)))
5146, 50syl5bbr 287 . . . . . . . 8 (𝑢 ∈ ℝ → (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢 ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → -𝑢 ≤ -𝑣)))
5251rexbiia 3249 . . . . . . 7 (∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢 ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣𝐴 → -𝑢 ≤ -𝑣))
5336, 52bitr4i 280 . . . . . 6 (∃𝑥 ∈ ℝ ∀𝑣 ∈ ℝ (-𝑣𝐴𝑥 ≤ -𝑣) ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢)
5430, 53syl6bb 289 . . . . 5 (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑥𝑦 ↔ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢))
5513, 54anbi12d 632 . . . 4 (𝐴 ⊆ ℝ → ((𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑥𝑦) ↔ ({𝑤 ∈ ℝ ∣ -𝑤𝐴} ≠ ∅ ∧ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢)))
56 ssrab2 4059 . . . . 5 {𝑤 ∈ ℝ ∣ -𝑤𝐴} ⊆ ℝ
57 sup3 11601 . . . . 5 (({𝑤 ∈ ℝ ∣ -𝑤𝐴} ⊆ ℝ ∧ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ≠ ∅ ∧ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢) → ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡)))
5856, 57mp3an1 1444 . . . 4 (({𝑤 ∈ ℝ ∣ -𝑤𝐴} ≠ ∅ ∧ ∃𝑢 ∈ ℝ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣𝑢) → ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡)))
5955, 58syl6bi 255 . . 3 (𝐴 ⊆ ℝ → ((𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑥𝑦) → ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡))))
6015imbi1d 344 . . . . . . . . 9 (𝐴 ⊆ ℝ → ((𝑦𝐴 → ¬ 𝑦 < 𝑥) ↔ ((𝑦 ∈ ℝ ∧ 𝑦𝐴) → ¬ 𝑦 < 𝑥)))
61 impexp 453 . . . . . . . . 9 (((𝑦 ∈ ℝ ∧ 𝑦𝐴) → ¬ 𝑦 < 𝑥) ↔ (𝑦 ∈ ℝ → (𝑦𝐴 → ¬ 𝑦 < 𝑥)))
6260, 61syl6bb 289 . . . . . . . 8 (𝐴 ⊆ ℝ → ((𝑦𝐴 → ¬ 𝑦 < 𝑥) ↔ (𝑦 ∈ ℝ → (𝑦𝐴 → ¬ 𝑦 < 𝑥))))
6362albidv 1920 . . . . . . 7 (𝐴 ⊆ ℝ → (∀𝑦(𝑦𝐴 → ¬ 𝑦 < 𝑥) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦𝐴 → ¬ 𝑦 < 𝑥))))
64 df-ral 3146 . . . . . . 7 (∀𝑦𝐴 ¬ 𝑦 < 𝑥 ↔ ∀𝑦(𝑦𝐴 → ¬ 𝑦 < 𝑥))
65 breq1 5072 . . . . . . . . . . 11 (𝑦 = -𝑣 → (𝑦 < 𝑥 ↔ -𝑣 < 𝑥))
6665notbid 320 . . . . . . . . . 10 (𝑦 = -𝑣 → (¬ 𝑦 < 𝑥 ↔ ¬ -𝑣 < 𝑥))
6723, 66imbi12d 347 . . . . . . . . 9 (𝑦 = -𝑣 → ((𝑦𝐴 → ¬ 𝑦 < 𝑥) ↔ (-𝑣𝐴 → ¬ -𝑣 < 𝑥)))
6821, 22, 67ralxfr 5318 . . . . . . . 8 (∀𝑦 ∈ ℝ (𝑦𝐴 → ¬ 𝑦 < 𝑥) ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥))
69 df-ral 3146 . . . . . . . 8 (∀𝑦 ∈ ℝ (𝑦𝐴 → ¬ 𝑦 < 𝑥) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦𝐴 → ¬ 𝑦 < 𝑥)))
7068, 69bitr3i 279 . . . . . . 7 (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥) ↔ ∀𝑦(𝑦 ∈ ℝ → (𝑦𝐴 → ¬ 𝑦 < 𝑥)))
7163, 64, 703bitr4g 316 . . . . . 6 (𝐴 ⊆ ℝ → (∀𝑦𝐴 ¬ 𝑦 < 𝑥 ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥)))
72 breq2 5073 . . . . . . . . 9 (𝑦 = -𝑣 → (𝑥 < 𝑦𝑥 < -𝑣))
73 breq2 5073 . . . . . . . . . 10 (𝑦 = -𝑣 → (𝑧 < 𝑦𝑧 < -𝑣))
7473rexbidv 3300 . . . . . . . . 9 (𝑦 = -𝑣 → (∃𝑧𝐴 𝑧 < 𝑦 ↔ ∃𝑧𝐴 𝑧 < -𝑣))
7572, 74imbi12d 347 . . . . . . . 8 (𝑦 = -𝑣 → ((𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦) ↔ (𝑥 < -𝑣 → ∃𝑧𝐴 𝑧 < -𝑣)))
7621, 22, 75ralxfr 5318 . . . . . . 7 (∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦) ↔ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑧𝐴 𝑧 < -𝑣))
77 ssel 3964 . . . . . . . . . . . . 13 (𝐴 ⊆ ℝ → (𝑧𝐴𝑧 ∈ ℝ))
7877adantrd 494 . . . . . . . . . . . 12 (𝐴 ⊆ ℝ → ((𝑧𝐴𝑧 < -𝑣) → 𝑧 ∈ ℝ))
7978pm4.71rd 565 . . . . . . . . . . 11 (𝐴 ⊆ ℝ → ((𝑧𝐴𝑧 < -𝑣) ↔ (𝑧 ∈ ℝ ∧ (𝑧𝐴𝑧 < -𝑣))))
8079exbidv 1921 . . . . . . . . . 10 (𝐴 ⊆ ℝ → (∃𝑧(𝑧𝐴𝑧 < -𝑣) ↔ ∃𝑧(𝑧 ∈ ℝ ∧ (𝑧𝐴𝑧 < -𝑣))))
81 df-rex 3147 . . . . . . . . . 10 (∃𝑧𝐴 𝑧 < -𝑣 ↔ ∃𝑧(𝑧𝐴𝑧 < -𝑣))
82 renegcl 10952 . . . . . . . . . . . 12 (𝑡 ∈ ℝ → -𝑡 ∈ ℝ)
83 infm3lem 11602 . . . . . . . . . . . 12 (𝑧 ∈ ℝ → ∃𝑡 ∈ ℝ 𝑧 = -𝑡)
84 eleq1 2903 . . . . . . . . . . . . 13 (𝑧 = -𝑡 → (𝑧𝐴 ↔ -𝑡𝐴))
85 breq1 5072 . . . . . . . . . . . . 13 (𝑧 = -𝑡 → (𝑧 < -𝑣 ↔ -𝑡 < -𝑣))
8684, 85anbi12d 632 . . . . . . . . . . . 12 (𝑧 = -𝑡 → ((𝑧𝐴𝑧 < -𝑣) ↔ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))
8782, 83, 86rexxfr 5320 . . . . . . . . . . 11 (∃𝑧 ∈ ℝ (𝑧𝐴𝑧 < -𝑣) ↔ ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))
88 df-rex 3147 . . . . . . . . . . 11 (∃𝑧 ∈ ℝ (𝑧𝐴𝑧 < -𝑣) ↔ ∃𝑧(𝑧 ∈ ℝ ∧ (𝑧𝐴𝑧 < -𝑣)))
8987, 88bitr3i 279 . . . . . . . . . 10 (∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣) ↔ ∃𝑧(𝑧 ∈ ℝ ∧ (𝑧𝐴𝑧 < -𝑣)))
9080, 81, 893bitr4g 316 . . . . . . . . 9 (𝐴 ⊆ ℝ → (∃𝑧𝐴 𝑧 < -𝑣 ↔ ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))
9190imbi2d 343 . . . . . . . 8 (𝐴 ⊆ ℝ → ((𝑥 < -𝑣 → ∃𝑧𝐴 𝑧 < -𝑣) ↔ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
9291ralbidv 3200 . . . . . . 7 (𝐴 ⊆ ℝ → (∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑧𝐴 𝑧 < -𝑣) ↔ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
9376, 92syl5bb 285 . . . . . 6 (𝐴 ⊆ ℝ → (∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦) ↔ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
9471, 93anbi12d 632 . . . . 5 (𝐴 ⊆ ℝ → ((∀𝑦𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦)) ↔ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))))
9594rexbidv 3300 . . . 4 (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ (∀𝑦𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦)) ↔ ∃𝑥 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))))
96 breq2 5073 . . . . . . . . . 10 (𝑥 = -𝑢 → (-𝑣 < 𝑥 ↔ -𝑣 < -𝑢))
9796notbid 320 . . . . . . . . 9 (𝑥 = -𝑢 → (¬ -𝑣 < 𝑥 ↔ ¬ -𝑣 < -𝑢))
9897imbi2d 343 . . . . . . . 8 (𝑥 = -𝑢 → ((-𝑣𝐴 → ¬ -𝑣 < 𝑥) ↔ (-𝑣𝐴 → ¬ -𝑣 < -𝑢)))
9998ralbidv 3200 . . . . . . 7 (𝑥 = -𝑢 → (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥) ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < -𝑢)))
100 breq1 5072 . . . . . . . . 9 (𝑥 = -𝑢 → (𝑥 < -𝑣 ↔ -𝑢 < -𝑣))
101100imbi1d 344 . . . . . . . 8 (𝑥 = -𝑢 → ((𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)) ↔ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
102101ralbidv 3200 . . . . . . 7 (𝑥 = -𝑢 → (∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)) ↔ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
10399, 102anbi12d 632 . . . . . 6 (𝑥 = -𝑢 → ((∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))) ↔ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))))
10431, 32, 103rexxfr 5320 . . . . 5 (∃𝑥 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
10539imbi1i 352 . . . . . . . . . . 11 ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → ¬ 𝑢 < 𝑣) ↔ ((𝑣 ∈ ℝ ∧ -𝑣𝐴) → ¬ 𝑢 < 𝑣))
106 impexp 453 . . . . . . . . . . 11 (((𝑣 ∈ ℝ ∧ -𝑣𝐴) → ¬ 𝑢 < 𝑣) ↔ (𝑣 ∈ ℝ → (-𝑣𝐴 → ¬ 𝑢 < 𝑣)))
107105, 106bitri 277 . . . . . . . . . 10 ((𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → ¬ 𝑢 < 𝑣) ↔ (𝑣 ∈ ℝ → (-𝑣𝐴 → ¬ 𝑢 < 𝑣)))
108107albii 1819 . . . . . . . . 9 (∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → ¬ 𝑢 < 𝑣) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣𝐴 → ¬ 𝑢 < 𝑣)))
109 df-ral 3146 . . . . . . . . 9 (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ↔ ∀𝑣(𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} → ¬ 𝑢 < 𝑣))
110 df-ral 3146 . . . . . . . . 9 (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ 𝑢 < 𝑣) ↔ ∀𝑣(𝑣 ∈ ℝ → (-𝑣𝐴 → ¬ 𝑢 < 𝑣)))
111108, 109, 1103bitr4ri 306 . . . . . . . 8 (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ 𝑢 < 𝑣) ↔ ∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣)
112 ltneg 11143 . . . . . . . . . . 11 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (𝑢 < 𝑣 ↔ -𝑣 < -𝑢))
113112notbid 320 . . . . . . . . . 10 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (¬ 𝑢 < 𝑣 ↔ ¬ -𝑣 < -𝑢))
114113imbi2d 343 . . . . . . . . 9 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → ((-𝑣𝐴 → ¬ 𝑢 < 𝑣) ↔ (-𝑣𝐴 → ¬ -𝑣 < -𝑢)))
115114ralbidva 3199 . . . . . . . 8 (𝑢 ∈ ℝ → (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ 𝑢 < 𝑣) ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < -𝑢)))
116111, 115syl5bbr 287 . . . . . . 7 (𝑢 ∈ ℝ → (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ↔ ∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < -𝑢)))
117 ltneg 11143 . . . . . . . . . 10 ((𝑣 ∈ ℝ ∧ 𝑢 ∈ ℝ) → (𝑣 < 𝑢 ↔ -𝑢 < -𝑣))
118117ancoms 461 . . . . . . . . 9 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (𝑣 < 𝑢 ↔ -𝑢 < -𝑣))
119 negeq 10881 . . . . . . . . . . . . 13 (𝑤 = 𝑡 → -𝑤 = -𝑡)
120119eleq1d 2900 . . . . . . . . . . . 12 (𝑤 = 𝑡 → (-𝑤𝐴 ↔ -𝑡𝐴))
121120rexrab 3690 . . . . . . . . . . 11 (∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡 ↔ ∃𝑡 ∈ ℝ (-𝑡𝐴𝑣 < 𝑡))
122 ltneg 11143 . . . . . . . . . . . . 13 ((𝑣 ∈ ℝ ∧ 𝑡 ∈ ℝ) → (𝑣 < 𝑡 ↔ -𝑡 < -𝑣))
123122anbi2d 630 . . . . . . . . . . . 12 ((𝑣 ∈ ℝ ∧ 𝑡 ∈ ℝ) → ((-𝑡𝐴𝑣 < 𝑡) ↔ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))
124123rexbidva 3299 . . . . . . . . . . 11 (𝑣 ∈ ℝ → (∃𝑡 ∈ ℝ (-𝑡𝐴𝑣 < 𝑡) ↔ ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))
125121, 124syl5bb 285 . . . . . . . . . 10 (𝑣 ∈ ℝ → (∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡 ↔ ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))
126125adantl 484 . . . . . . . . 9 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → (∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡 ↔ ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))
127118, 126imbi12d 347 . . . . . . . 8 ((𝑢 ∈ ℝ ∧ 𝑣 ∈ ℝ) → ((𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡) ↔ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
128127ralbidva 3199 . . . . . . 7 (𝑢 ∈ ℝ → (∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡) ↔ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
129116, 128anbi12d 632 . . . . . 6 (𝑢 ∈ ℝ → ((∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡)) ↔ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣)))))
130129rexbiia 3249 . . . . 5 (∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡)) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < -𝑢) ∧ ∀𝑣 ∈ ℝ (-𝑢 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))))
131104, 130bitr4i 280 . . . 4 (∃𝑥 ∈ ℝ (∀𝑣 ∈ ℝ (-𝑣𝐴 → ¬ -𝑣 < 𝑥) ∧ ∀𝑣 ∈ ℝ (𝑥 < -𝑣 → ∃𝑡 ∈ ℝ (-𝑡𝐴 ∧ -𝑡 < -𝑣))) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡)))
13295, 131syl6bb 289 . . 3 (𝐴 ⊆ ℝ → (∃𝑥 ∈ ℝ (∀𝑦𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦)) ↔ ∃𝑢 ∈ ℝ (∀𝑣 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴} ¬ 𝑢 < 𝑣 ∧ ∀𝑣 ∈ ℝ (𝑣 < 𝑢 → ∃𝑡 ∈ {𝑤 ∈ ℝ ∣ -𝑤𝐴}𝑣 < 𝑡))))
13359, 132sylibrd 261 . 2 (𝐴 ⊆ ℝ → ((𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑥𝑦) → ∃𝑥 ∈ ℝ (∀𝑦𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦))))
1341333impib 1112 1 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑥𝑦) → ∃𝑥 ∈ ℝ (∀𝑦𝐴 ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧𝐴 𝑧 < 𝑦)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398  w3a 1083  wal 1534   = wceq 1536  wex 1779  wcel 2113  wne 3019  wral 3141  wrex 3142  {crab 3145  wss 3939  c0 4294   class class class wbr 5069  cr 10539   < clt 10678  cle 10679  -cneg 10874
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1969  ax-7 2014  ax-8 2115  ax-9 2123  ax-10 2144  ax-11 2160  ax-12 2176  ax-ext 2796  ax-sep 5206  ax-nul 5213  ax-pow 5269  ax-pr 5333  ax-un 7464  ax-resscn 10597  ax-1cn 10598  ax-icn 10599  ax-addcl 10600  ax-addrcl 10601  ax-mulcl 10602  ax-mulrcl 10603  ax-mulcom 10604  ax-addass 10605  ax-mulass 10606  ax-distr 10607  ax-i2m1 10608  ax-1ne0 10609  ax-1rid 10610  ax-rnegex 10611  ax-rrecex 10612  ax-cnre 10613  ax-pre-lttri 10614  ax-pre-lttrn 10615  ax-pre-ltadd 10616  ax-pre-mulgt0 10617  ax-pre-sup 10618
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1539  df-ex 1780  df-nf 1784  df-sb 2069  df-mo 2621  df-eu 2653  df-clab 2803  df-cleq 2817  df-clel 2896  df-nfc 2966  df-ne 3020  df-nel 3127  df-ral 3146  df-rex 3147  df-reu 3148  df-rab 3150  df-v 3499  df-sbc 3776  df-csb 3887  df-dif 3942  df-un 3944  df-in 3946  df-ss 3955  df-nul 4295  df-if 4471  df-pw 4544  df-sn 4571  df-pr 4573  df-op 4577  df-uni 4842  df-br 5070  df-opab 5132  df-mpt 5150  df-id 5463  df-po 5477  df-so 5478  df-xp 5564  df-rel 5565  df-cnv 5566  df-co 5567  df-dm 5568  df-rn 5569  df-res 5570  df-ima 5571  df-iota 6317  df-fun 6360  df-fn 6361  df-f 6362  df-f1 6363  df-fo 6364  df-f1o 6365  df-fv 6366  df-riota 7117  df-ov 7162  df-oprab 7163  df-mpo 7164  df-er 8292  df-en 8513  df-dom 8514  df-sdom 8515  df-pnf 10680  df-mnf 10681  df-xr 10682  df-ltxr 10683  df-le 10684  df-sub 10875  df-neg 10876
This theorem is referenced by:  infrecl  11626  infrenegsup  11627  infregelb  11628  infrelb  11629  xrinfmsslem  12704  gtinf  33671  infrglb  41877
  Copyright terms: Public domain W3C validator