| Step | Hyp | Ref
| Expression |
| 1 | | renegcl 8287 |
. . . . . . . . . . . 12
⊢ (𝑧 ∈ ℝ → -𝑧 ∈
ℝ) |
| 2 | | elprg 3642 |
. . . . . . . . . . . 12
⊢ (-𝑧 ∈ ℝ → (-𝑧 ∈ {𝐴, 𝐵} ↔ (-𝑧 = 𝐴 ∨ -𝑧 = 𝐵))) |
| 3 | 1, 2 | syl 14 |
. . . . . . . . . . 11
⊢ (𝑧 ∈ ℝ → (-𝑧 ∈ {𝐴, 𝐵} ↔ (-𝑧 = 𝐴 ∨ -𝑧 = 𝐵))) |
| 4 | 3 | adantl 277 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → (-𝑧 ∈ {𝐴, 𝐵} ↔ (-𝑧 = 𝐴 ∨ -𝑧 = 𝐵))) |
| 5 | | simpr 110 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → 𝑧 ∈
ℝ) |
| 6 | 5 | recnd 8055 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → 𝑧 ∈
ℂ) |
| 7 | | simpll 527 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → 𝐴 ∈
ℝ) |
| 8 | 7 | recnd 8055 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → 𝐴 ∈
ℂ) |
| 9 | 6, 8 | negcon1d 8331 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → (-𝑧 = 𝐴 ↔ -𝐴 = 𝑧)) |
| 10 | | eqcom 2198 |
. . . . . . . . . . . 12
⊢ (-𝐴 = 𝑧 ↔ 𝑧 = -𝐴) |
| 11 | 9, 10 | bitrdi 196 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → (-𝑧 = 𝐴 ↔ 𝑧 = -𝐴)) |
| 12 | | simplr 528 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → 𝐵 ∈
ℝ) |
| 13 | 12 | recnd 8055 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → 𝐵 ∈
ℂ) |
| 14 | 6, 13 | negcon1d 8331 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → (-𝑧 = 𝐵 ↔ -𝐵 = 𝑧)) |
| 15 | | eqcom 2198 |
. . . . . . . . . . . 12
⊢ (-𝐵 = 𝑧 ↔ 𝑧 = -𝐵) |
| 16 | 14, 15 | bitrdi 196 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → (-𝑧 = 𝐵 ↔ 𝑧 = -𝐵)) |
| 17 | 11, 16 | orbi12d 794 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → ((-𝑧 = 𝐴 ∨ -𝑧 = 𝐵) ↔ (𝑧 = -𝐴 ∨ 𝑧 = -𝐵))) |
| 18 | 4, 17 | bitrd 188 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → (-𝑧 ∈ {𝐴, 𝐵} ↔ (𝑧 = -𝐴 ∨ 𝑧 = -𝐵))) |
| 19 | 18 | rabbidva 2751 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → {𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}} = {𝑧 ∈ ℝ ∣ (𝑧 = -𝐴 ∨ 𝑧 = -𝐵)}) |
| 20 | | dfrab2 3438 |
. . . . . . . . . 10
⊢ {𝑧 ∈ ℝ ∣ (𝑧 = -𝐴 ∨ 𝑧 = -𝐵)} = ({𝑧 ∣ (𝑧 = -𝐴 ∨ 𝑧 = -𝐵)} ∩ ℝ) |
| 21 | | dfpr2 3641 |
. . . . . . . . . . 11
⊢ {-𝐴, -𝐵} = {𝑧 ∣ (𝑧 = -𝐴 ∨ 𝑧 = -𝐵)} |
| 22 | 21 | ineq1i 3360 |
. . . . . . . . . 10
⊢ ({-𝐴, -𝐵} ∩ ℝ) = ({𝑧 ∣ (𝑧 = -𝐴 ∨ 𝑧 = -𝐵)} ∩ ℝ) |
| 23 | 20, 22 | eqtr4i 2220 |
. . . . . . . . 9
⊢ {𝑧 ∈ ℝ ∣ (𝑧 = -𝐴 ∨ 𝑧 = -𝐵)} = ({-𝐴, -𝐵} ∩ ℝ) |
| 24 | | renegcl 8287 |
. . . . . . . . . . 11
⊢ (𝐴 ∈ ℝ → -𝐴 ∈
ℝ) |
| 25 | | renegcl 8287 |
. . . . . . . . . . 11
⊢ (𝐵 ∈ ℝ → -𝐵 ∈
ℝ) |
| 26 | | prssi 3780 |
. . . . . . . . . . 11
⊢ ((-𝐴 ∈ ℝ ∧ -𝐵 ∈ ℝ) → {-𝐴, -𝐵} ⊆ ℝ) |
| 27 | 24, 25, 26 | syl2an 289 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → {-𝐴, -𝐵} ⊆ ℝ) |
| 28 | | df-ss 3170 |
. . . . . . . . . 10
⊢ ({-𝐴, -𝐵} ⊆ ℝ ↔ ({-𝐴, -𝐵} ∩ ℝ) = {-𝐴, -𝐵}) |
| 29 | 27, 28 | sylib 122 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ({-𝐴, -𝐵} ∩ ℝ) = {-𝐴, -𝐵}) |
| 30 | 23, 29 | eqtrid 2241 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → {𝑧 ∈ ℝ ∣ (𝑧 = -𝐴 ∨ 𝑧 = -𝐵)} = {-𝐴, -𝐵}) |
| 31 | 19, 30 | eqtrd 2229 |
. . . . . . 7
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → {𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}} = {-𝐴, -𝐵}) |
| 32 | 31 | supeq1d 7053 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) = sup({-𝐴, -𝐵}, ℝ, < )) |
| 33 | | maxcl 11375 |
. . . . . . 7
⊢ ((-𝐴 ∈ ℝ ∧ -𝐵 ∈ ℝ) →
sup({-𝐴, -𝐵}, ℝ, < ) ∈
ℝ) |
| 34 | 24, 25, 33 | syl2an 289 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
sup({-𝐴, -𝐵}, ℝ, < ) ∈
ℝ) |
| 35 | 32, 34 | eqeltrd 2273 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) ∈
ℝ) |
| 36 | 35 | renegcld 8406 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) ∈
ℝ) |
| 37 | | simpr 110 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐴) → 𝑦 = 𝐴) |
| 38 | 37 | negeqd 8221 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐴) → -𝑦 = -𝐴) |
| 39 | | maxle1 11376 |
. . . . . . . . . 10
⊢ ((-𝐴 ∈ ℝ ∧ -𝐵 ∈ ℝ) → -𝐴 ≤ sup({-𝐴, -𝐵}, ℝ, < )) |
| 40 | 24, 25, 39 | syl2an 289 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → -𝐴 ≤ sup({-𝐴, -𝐵}, ℝ, < )) |
| 41 | 40 | ad2antrr 488 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐴) → -𝐴 ≤ sup({-𝐴, -𝐵}, ℝ, < )) |
| 42 | 38, 41 | eqbrtrd 4055 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐴) → -𝑦 ≤ sup({-𝐴, -𝐵}, ℝ, < )) |
| 43 | | simpll 527 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐴) → (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ)) |
| 44 | | simplll 533 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐴) → 𝐴 ∈ ℝ) |
| 45 | 37, 44 | eqeltrd 2273 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐴) → 𝑦 ∈ ℝ) |
| 46 | 32 | negeqd 8221 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) = -sup({-𝐴, -𝐵}, ℝ, < )) |
| 47 | 46 | breq2d 4045 |
. . . . . . . . . . 11
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝑦 < -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) ↔ 𝑦 < -sup({-𝐴, -𝐵}, ℝ, < ))) |
| 48 | 47 | notbid 668 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (¬
𝑦 < -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) ↔ ¬ 𝑦 < -sup({-𝐴, -𝐵}, ℝ, < ))) |
| 49 | 48 | adantr 276 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) → (¬
𝑦 < -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) ↔ ¬ 𝑦 < -sup({-𝐴, -𝐵}, ℝ, < ))) |
| 50 | 34 | adantr 276 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) →
sup({-𝐴, -𝐵}, ℝ, < ) ∈
ℝ) |
| 51 | 50 | renegcld 8406 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) →
-sup({-𝐴, -𝐵}, ℝ, < ) ∈
ℝ) |
| 52 | | simpr 110 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) → 𝑦 ∈
ℝ) |
| 53 | 51, 52 | lenltd 8144 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) →
(-sup({-𝐴, -𝐵}, ℝ, < ) ≤ 𝑦 ↔ ¬ 𝑦 < -sup({-𝐴, -𝐵}, ℝ, < ))) |
| 54 | | lenegcon1 8493 |
. . . . . . . . . 10
⊢
((sup({-𝐴, -𝐵}, ℝ, < ) ∈
ℝ ∧ 𝑦 ∈
ℝ) → (-sup({-𝐴,
-𝐵}, ℝ, < ) ≤
𝑦 ↔ -𝑦 ≤ sup({-𝐴, -𝐵}, ℝ, < ))) |
| 55 | 34, 54 | sylan 283 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) →
(-sup({-𝐴, -𝐵}, ℝ, < ) ≤ 𝑦 ↔ -𝑦 ≤ sup({-𝐴, -𝐵}, ℝ, < ))) |
| 56 | 49, 53, 55 | 3bitr2d 216 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) → (¬
𝑦 < -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) ↔ -𝑦 ≤ sup({-𝐴, -𝐵}, ℝ, < ))) |
| 57 | 43, 45, 56 | syl2anc 411 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐴) → (¬ 𝑦 < -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) ↔ -𝑦 ≤ sup({-𝐴, -𝐵}, ℝ, < ))) |
| 58 | 42, 57 | mpbird 167 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐴) → ¬ 𝑦 < -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < )) |
| 59 | | simpr 110 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐵) → 𝑦 = 𝐵) |
| 60 | 59 | negeqd 8221 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐵) → -𝑦 = -𝐵) |
| 61 | | maxle2 11377 |
. . . . . . . . . 10
⊢ ((-𝐴 ∈ ℝ ∧ -𝐵 ∈ ℝ) → -𝐵 ≤ sup({-𝐴, -𝐵}, ℝ, < )) |
| 62 | 24, 25, 61 | syl2an 289 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → -𝐵 ≤ sup({-𝐴, -𝐵}, ℝ, < )) |
| 63 | 62 | ad2antrr 488 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐵) → -𝐵 ≤ sup({-𝐴, -𝐵}, ℝ, < )) |
| 64 | 60, 63 | eqbrtrd 4055 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐵) → -𝑦 ≤ sup({-𝐴, -𝐵}, ℝ, < )) |
| 65 | | simpll 527 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐵) → (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ)) |
| 66 | | simpllr 534 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐵) → 𝐵 ∈ ℝ) |
| 67 | 59, 66 | eqeltrd 2273 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐵) → 𝑦 ∈ ℝ) |
| 68 | 65, 67, 56 | syl2anc 411 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐵) → (¬ 𝑦 < -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) ↔ -𝑦 ≤ sup({-𝐴, -𝐵}, ℝ, < ))) |
| 69 | 64, 68 | mpbird 167 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) ∧ 𝑦 = 𝐵) → ¬ 𝑦 < -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < )) |
| 70 | | elpri 3645 |
. . . . . . 7
⊢ (𝑦 ∈ {𝐴, 𝐵} → (𝑦 = 𝐴 ∨ 𝑦 = 𝐵)) |
| 71 | 70 | adantl 277 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) → (𝑦 = 𝐴 ∨ 𝑦 = 𝐵)) |
| 72 | 58, 69, 71 | mpjaodan 799 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ {𝐴, 𝐵}) → ¬ 𝑦 < -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < )) |
| 73 | 72 | ralrimiva 2570 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
∀𝑦 ∈ {𝐴, 𝐵} ¬ 𝑦 < -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < )) |
| 74 | 24 | ad3antrrr 492 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → -𝐴 ∈ ℝ) |
| 75 | 25 | ad3antlr 493 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → -𝐵 ∈ ℝ) |
| 76 | | simplr 528 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → 𝑦 ∈ ℝ) |
| 77 | 76 | renegcld 8406 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → -𝑦 ∈ ℝ) |
| 78 | 34 | ad2antrr 488 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → sup({-𝐴, -𝐵}, ℝ, < ) ∈
ℝ) |
| 79 | | simpr 110 |
. . . . . . . . . . 11
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) |
| 80 | 46 | breq1d 4043 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
(-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦 ↔ -sup({-𝐴, -𝐵}, ℝ, < ) < 𝑦)) |
| 81 | 80 | ad2antrr 488 |
. . . . . . . . . . 11
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → (-sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦 ↔ -sup({-𝐴, -𝐵}, ℝ, < ) < 𝑦)) |
| 82 | 79, 81 | mpbid 147 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → -sup({-𝐴, -𝐵}, ℝ, < ) < 𝑦) |
| 83 | 78, 76, 82 | ltnegcon1d 8552 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → -𝑦 < sup({-𝐴, -𝐵}, ℝ, < )) |
| 84 | | maxleastlt 11380 |
. . . . . . . . 9
⊢ (((-𝐴 ∈ ℝ ∧ -𝐵 ∈ ℝ) ∧ (-𝑦 ∈ ℝ ∧ -𝑦 < sup({-𝐴, -𝐵}, ℝ, < ))) → (-𝑦 < -𝐴 ∨ -𝑦 < -𝐵)) |
| 85 | 74, 75, 77, 83, 84 | syl22anc 1250 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → (-𝑦 < -𝐴 ∨ -𝑦 < -𝐵)) |
| 86 | | simplll 533 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → 𝐴 ∈ ℝ) |
| 87 | 86, 76 | ltnegd 8550 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → (𝐴 < 𝑦 ↔ -𝑦 < -𝐴)) |
| 88 | | simpllr 534 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → 𝐵 ∈ ℝ) |
| 89 | 88, 76 | ltnegd 8550 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → (𝐵 < 𝑦 ↔ -𝑦 < -𝐵)) |
| 90 | 87, 89 | orbi12d 794 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → ((𝐴 < 𝑦 ∨ 𝐵 < 𝑦) ↔ (-𝑦 < -𝐴 ∨ -𝑦 < -𝐵))) |
| 91 | 85, 90 | mpbird 167 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → (𝐴 < 𝑦 ∨ 𝐵 < 𝑦)) |
| 92 | | breq1 4036 |
. . . . . . . . 9
⊢ (𝑧 = 𝐴 → (𝑧 < 𝑦 ↔ 𝐴 < 𝑦)) |
| 93 | | breq1 4036 |
. . . . . . . . 9
⊢ (𝑧 = 𝐵 → (𝑧 < 𝑦 ↔ 𝐵 < 𝑦)) |
| 94 | 92, 93 | rexprg 3674 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
(∃𝑧 ∈ {𝐴, 𝐵}𝑧 < 𝑦 ↔ (𝐴 < 𝑦 ∨ 𝐵 < 𝑦))) |
| 95 | 94 | ad2antrr 488 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → (∃𝑧 ∈ {𝐴, 𝐵}𝑧 < 𝑦 ↔ (𝐴 < 𝑦 ∨ 𝐵 < 𝑦))) |
| 96 | 91, 95 | mpbird 167 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) ∧
-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦) → ∃𝑧 ∈ {𝐴, 𝐵}𝑧 < 𝑦) |
| 97 | 96 | ex 115 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑦 ∈ ℝ) →
(-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦 → ∃𝑧 ∈ {𝐴, 𝐵}𝑧 < 𝑦)) |
| 98 | 97 | ralrimiva 2570 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
∀𝑦 ∈ ℝ
(-sup({𝑧 ∈ ℝ
∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦 → ∃𝑧 ∈ {𝐴, 𝐵}𝑧 < 𝑦)) |
| 99 | | breq2 4037 |
. . . . . . . 8
⊢ (𝑥 = -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) → (𝑦 < 𝑥 ↔ 𝑦 < -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ))) |
| 100 | 99 | notbid 668 |
. . . . . . 7
⊢ (𝑥 = -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) → (¬ 𝑦 < 𝑥 ↔ ¬ 𝑦 < -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ))) |
| 101 | 100 | ralbidv 2497 |
. . . . . 6
⊢ (𝑥 = -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) → (∀𝑦 ∈ {𝐴, 𝐵} ¬ 𝑦 < 𝑥 ↔ ∀𝑦 ∈ {𝐴, 𝐵} ¬ 𝑦 < -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ))) |
| 102 | | breq1 4036 |
. . . . . . . 8
⊢ (𝑥 = -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) → (𝑥 < 𝑦 ↔ -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦)) |
| 103 | 102 | imbi1d 231 |
. . . . . . 7
⊢ (𝑥 = -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) → ((𝑥 < 𝑦 → ∃𝑧 ∈ {𝐴, 𝐵}𝑧 < 𝑦) ↔ (-sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦 → ∃𝑧 ∈ {𝐴, 𝐵}𝑧 < 𝑦))) |
| 104 | 103 | ralbidv 2497 |
. . . . . 6
⊢ (𝑥 = -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) → (∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ {𝐴, 𝐵}𝑧 < 𝑦) ↔ ∀𝑦 ∈ ℝ (-sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦 → ∃𝑧 ∈ {𝐴, 𝐵}𝑧 < 𝑦))) |
| 105 | 101, 104 | anbi12d 473 |
. . . . 5
⊢ (𝑥 = -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) → ((∀𝑦 ∈ {𝐴, 𝐵} ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ {𝐴, 𝐵}𝑧 < 𝑦)) ↔ (∀𝑦 ∈ {𝐴, 𝐵} ¬ 𝑦 < -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) ∧ ∀𝑦 ∈ ℝ (-sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦 → ∃𝑧 ∈ {𝐴, 𝐵}𝑧 < 𝑦)))) |
| 106 | 105 | rspcev 2868 |
. . . 4
⊢
((-sup({𝑧 ∈
ℝ ∣ -𝑧 ∈
{𝐴, 𝐵}}, ℝ, < ) ∈ ℝ ∧
(∀𝑦 ∈ {𝐴, 𝐵} ¬ 𝑦 < -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) ∧ ∀𝑦 ∈ ℝ (-sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < ) < 𝑦 → ∃𝑧 ∈ {𝐴, 𝐵}𝑧 < 𝑦))) → ∃𝑥 ∈ ℝ (∀𝑦 ∈ {𝐴, 𝐵} ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ {𝐴, 𝐵}𝑧 < 𝑦))) |
| 107 | 36, 73, 98, 106 | syl12anc 1247 |
. . 3
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
∃𝑥 ∈ ℝ
(∀𝑦 ∈ {𝐴, 𝐵} ¬ 𝑦 < 𝑥 ∧ ∀𝑦 ∈ ℝ (𝑥 < 𝑦 → ∃𝑧 ∈ {𝐴, 𝐵}𝑧 < 𝑦))) |
| 108 | | prssi 3780 |
. . 3
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → {𝐴, 𝐵} ⊆ ℝ) |
| 109 | 107, 108 | infrenegsupex 9668 |
. 2
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
inf({𝐴, 𝐵}, ℝ, < ) = -sup({𝑧 ∈ ℝ ∣ -𝑧 ∈ {𝐴, 𝐵}}, ℝ, < )) |
| 110 | 109, 46 | eqtrd 2229 |
1
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
inf({𝐴, 𝐵}, ℝ, < ) = -sup({-𝐴, -𝐵}, ℝ, < )) |