Proof of Theorem supxrgelem
| Step | Hyp | Ref
| Expression |
| 1 | | supxrgelem.b |
. . . . 5
⊢ (𝜑 → 𝐵 ∈
ℝ*) |
| 2 | | pnfge 11964 |
. . . . 5
⊢ (𝐵 ∈ ℝ*
→ 𝐵 ≤
+∞) |
| 3 | 1, 2 | syl 17 |
. . . 4
⊢ (𝜑 → 𝐵 ≤ +∞) |
| 4 | 3 | adantr 481 |
. . 3
⊢ ((𝜑 ∧ sup(𝐴, ℝ*, < ) = +∞)
→ 𝐵 ≤
+∞) |
| 5 | | id 22 |
. . . . 5
⊢
(sup(𝐴,
ℝ*, < ) = +∞ → sup(𝐴, ℝ*, < ) =
+∞) |
| 6 | 5 | eqcomd 2628 |
. . . 4
⊢
(sup(𝐴,
ℝ*, < ) = +∞ → +∞ = sup(𝐴, ℝ*, <
)) |
| 7 | 6 | adantl 482 |
. . 3
⊢ ((𝜑 ∧ sup(𝐴, ℝ*, < ) = +∞)
→ +∞ = sup(𝐴,
ℝ*, < )) |
| 8 | 4, 7 | breqtrd 4679 |
. 2
⊢ ((𝜑 ∧ sup(𝐴, ℝ*, < ) = +∞)
→ 𝐵 ≤ sup(𝐴, ℝ*, <
)) |
| 9 | | simpl 473 |
. . 3
⊢ ((𝜑 ∧ ¬ sup(𝐴, ℝ*, < ) = +∞)
→ 𝜑) |
| 10 | | 1rp 11836 |
. . . . . . . 8
⊢ 1 ∈
ℝ+ |
| 11 | | nfcv 2764 |
. . . . . . . . . 10
⊢
Ⅎ𝑥1 |
| 12 | | supxrgelem.xph |
. . . . . . . . . . . 12
⊢
Ⅎ𝑥𝜑 |
| 13 | | nfv 1843 |
. . . . . . . . . . . 12
⊢
Ⅎ𝑥1 ∈
ℝ+ |
| 14 | 12, 13 | nfan 1828 |
. . . . . . . . . . 11
⊢
Ⅎ𝑥(𝜑 ∧ 1 ∈
ℝ+) |
| 15 | | nfv 1843 |
. . . . . . . . . . 11
⊢
Ⅎ𝑥∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 1) |
| 16 | 14, 15 | nfim 1825 |
. . . . . . . . . 10
⊢
Ⅎ𝑥((𝜑 ∧ 1 ∈
ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 1)) |
| 17 | | eleq1 2689 |
. . . . . . . . . . . 12
⊢ (𝑥 = 1 → (𝑥 ∈ ℝ+ ↔ 1 ∈
ℝ+)) |
| 18 | 17 | anbi2d 740 |
. . . . . . . . . . 11
⊢ (𝑥 = 1 → ((𝜑 ∧ 𝑥 ∈ ℝ+) ↔ (𝜑 ∧ 1 ∈
ℝ+))) |
| 19 | | oveq2 6658 |
. . . . . . . . . . . . 13
⊢ (𝑥 = 1 → (𝑦 +𝑒 𝑥) = (𝑦 +𝑒 1)) |
| 20 | 19 | breq2d 4665 |
. . . . . . . . . . . 12
⊢ (𝑥 = 1 → (𝐵 < (𝑦 +𝑒 𝑥) ↔ 𝐵 < (𝑦 +𝑒 1))) |
| 21 | 20 | rexbidv 3052 |
. . . . . . . . . . 11
⊢ (𝑥 = 1 → (∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 𝑥) ↔ ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 1))) |
| 22 | 18, 21 | imbi12d 334 |
. . . . . . . . . 10
⊢ (𝑥 = 1 → (((𝜑 ∧ 𝑥 ∈ ℝ+) →
∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 𝑥)) ↔ ((𝜑 ∧ 1 ∈ ℝ+) →
∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 1)))) |
| 23 | | supxrgelem.y |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑥 ∈ ℝ+) →
∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 𝑥)) |
| 24 | 11, 16, 22, 23 | vtoclgf 3264 |
. . . . . . . . 9
⊢ (1 ∈
ℝ+ → ((𝜑 ∧ 1 ∈ ℝ+) →
∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 1))) |
| 25 | 10, 24 | ax-mp 5 |
. . . . . . . 8
⊢ ((𝜑 ∧ 1 ∈
ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 1)) |
| 26 | 10, 25 | mpan2 707 |
. . . . . . 7
⊢ (𝜑 → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 1)) |
| 27 | 26 | adantr 481 |
. . . . . 6
⊢ ((𝜑 ∧ ¬ sup(𝐴, ℝ*, < ) = +∞)
→ ∃𝑦 ∈
𝐴 𝐵 < (𝑦 +𝑒 1)) |
| 28 | | mnfxr 10096 |
. . . . . . . . . . 11
⊢ -∞
∈ ℝ* |
| 29 | 28 | a1i 11 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) → -∞
∈ ℝ*) |
| 30 | | supxrgelem.a |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝐴 ⊆
ℝ*) |
| 31 | 30 | sselda 3603 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ ℝ*) |
| 32 | 31 | 3adant3 1081 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) → 𝑦 ∈
ℝ*) |
| 33 | | supxrcl 12145 |
. . . . . . . . . . . 12
⊢ (𝐴 ⊆ ℝ*
→ sup(𝐴,
ℝ*, < ) ∈ ℝ*) |
| 34 | 30, 33 | syl 17 |
. . . . . . . . . . 11
⊢ (𝜑 → sup(𝐴, ℝ*, < ) ∈
ℝ*) |
| 35 | 34 | 3ad2ant1 1082 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) → sup(𝐴, ℝ*, < )
∈ ℝ*) |
| 36 | | simpl3 1066 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) ∧ ¬
-∞ < 𝑦) →
𝐵 < (𝑦 +𝑒 1)) |
| 37 | | simpr 477 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → ¬ -∞ <
𝑦) |
| 38 | 31 | adantr 481 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → 𝑦 ∈ ℝ*) |
| 39 | | ngtmnft 11997 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑦 ∈ ℝ*
→ (𝑦 = -∞ ↔
¬ -∞ < 𝑦)) |
| 40 | 38, 39 | syl 17 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 = -∞ ↔ ¬ -∞ < 𝑦)) |
| 41 | 37, 40 | mpbird 247 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → 𝑦 = -∞) |
| 42 | 41 | oveq1d 6665 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +𝑒 1) = (-∞
+𝑒 1)) |
| 43 | | 1re 10039 |
. . . . . . . . . . . . . . . . 17
⊢ 1 ∈
ℝ |
| 44 | 43 | rexri 10097 |
. . . . . . . . . . . . . . . 16
⊢ 1 ∈
ℝ* |
| 45 | 44 | a1i 11 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → 1 ∈
ℝ*) |
| 46 | | renepnf 10087 |
. . . . . . . . . . . . . . . . 17
⊢ (1 ∈
ℝ → 1 ≠ +∞) |
| 47 | 43, 46 | ax-mp 5 |
. . . . . . . . . . . . . . . 16
⊢ 1 ≠
+∞ |
| 48 | 47 | a1i 11 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → 1 ≠
+∞) |
| 49 | | xaddmnf2 12060 |
. . . . . . . . . . . . . . 15
⊢ ((1
∈ ℝ* ∧ 1 ≠ +∞) → (-∞
+𝑒 1) = -∞) |
| 50 | 45, 48, 49 | syl2anc 693 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (-∞
+𝑒 1) = -∞) |
| 51 | 42, 50 | eqtrd 2656 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +𝑒 1) =
-∞) |
| 52 | 51 | 3adantl3 1219 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) ∧ ¬
-∞ < 𝑦) →
(𝑦 +𝑒 1)
= -∞) |
| 53 | 36, 52 | breqtrd 4679 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) ∧ ¬
-∞ < 𝑦) →
𝐵 <
-∞) |
| 54 | | nltmnf 11963 |
. . . . . . . . . . . . . 14
⊢ (𝐵 ∈ ℝ*
→ ¬ 𝐵 <
-∞) |
| 55 | 1, 54 | syl 17 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ¬ 𝐵 < -∞) |
| 56 | 55 | adantr 481 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ ¬ -∞ < 𝑦) → ¬ 𝐵 < -∞) |
| 57 | 56 | 3ad2antl1 1223 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) ∧ ¬
-∞ < 𝑦) →
¬ 𝐵 <
-∞) |
| 58 | 53, 57 | condan 835 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) → -∞
< 𝑦) |
| 59 | 30 | adantr 481 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → 𝐴 ⊆
ℝ*) |
| 60 | | simpr 477 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ 𝐴) |
| 61 | | supxrub 12154 |
. . . . . . . . . . . 12
⊢ ((𝐴 ⊆ ℝ*
∧ 𝑦 ∈ 𝐴) → 𝑦 ≤ sup(𝐴, ℝ*, <
)) |
| 62 | 59, 60, 61 | syl2anc 693 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → 𝑦 ≤ sup(𝐴, ℝ*, <
)) |
| 63 | 62 | 3adant3 1081 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) → 𝑦 ≤ sup(𝐴, ℝ*, <
)) |
| 64 | 29, 32, 35, 58, 63 | xrltletrd 11992 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) → -∞
< sup(𝐴,
ℝ*, < )) |
| 65 | 64 | 3exp 1264 |
. . . . . . . 8
⊢ (𝜑 → (𝑦 ∈ 𝐴 → (𝐵 < (𝑦 +𝑒 1) → -∞
< sup(𝐴,
ℝ*, < )))) |
| 66 | 65 | adantr 481 |
. . . . . . 7
⊢ ((𝜑 ∧ ¬ sup(𝐴, ℝ*, < ) = +∞)
→ (𝑦 ∈ 𝐴 → (𝐵 < (𝑦 +𝑒 1) → -∞
< sup(𝐴,
ℝ*, < )))) |
| 67 | 66 | rexlimdv 3030 |
. . . . . 6
⊢ ((𝜑 ∧ ¬ sup(𝐴, ℝ*, < ) = +∞)
→ (∃𝑦 ∈
𝐴 𝐵 < (𝑦 +𝑒 1) → -∞
< sup(𝐴,
ℝ*, < ))) |
| 68 | 27, 67 | mpd 15 |
. . . . 5
⊢ ((𝜑 ∧ ¬ sup(𝐴, ℝ*, < ) = +∞)
→ -∞ < sup(𝐴,
ℝ*, < )) |
| 69 | | simpr 477 |
. . . . . . 7
⊢ ((𝜑 ∧ ¬ sup(𝐴, ℝ*, < ) = +∞)
→ ¬ sup(𝐴,
ℝ*, < ) = +∞) |
| 70 | | nltpnft 11995 |
. . . . . . . . 9
⊢
(sup(𝐴,
ℝ*, < ) ∈ ℝ* → (sup(𝐴, ℝ*, < ) =
+∞ ↔ ¬ sup(𝐴, ℝ*, < ) <
+∞)) |
| 71 | 34, 70 | syl 17 |
. . . . . . . 8
⊢ (𝜑 → (sup(𝐴, ℝ*, < ) = +∞
↔ ¬ sup(𝐴,
ℝ*, < ) < +∞)) |
| 72 | 71 | adantr 481 |
. . . . . . 7
⊢ ((𝜑 ∧ ¬ sup(𝐴, ℝ*, < ) = +∞)
→ (sup(𝐴,
ℝ*, < ) = +∞ ↔ ¬ sup(𝐴, ℝ*, < ) <
+∞)) |
| 73 | 69, 72 | mtbid 314 |
. . . . . 6
⊢ ((𝜑 ∧ ¬ sup(𝐴, ℝ*, < ) = +∞)
→ ¬ ¬ sup(𝐴,
ℝ*, < ) < +∞) |
| 74 | 73 | notnotrd 128 |
. . . . 5
⊢ ((𝜑 ∧ ¬ sup(𝐴, ℝ*, < ) = +∞)
→ sup(𝐴,
ℝ*, < ) < +∞) |
| 75 | 68, 74 | jca 554 |
. . . 4
⊢ ((𝜑 ∧ ¬ sup(𝐴, ℝ*, < ) = +∞)
→ (-∞ < sup(𝐴, ℝ*, < ) ∧
sup(𝐴, ℝ*,
< ) < +∞)) |
| 76 | 34 | adantr 481 |
. . . . 5
⊢ ((𝜑 ∧ ¬ sup(𝐴, ℝ*, < ) = +∞)
→ sup(𝐴,
ℝ*, < ) ∈ ℝ*) |
| 77 | | xrrebnd 11999 |
. . . . 5
⊢
(sup(𝐴,
ℝ*, < ) ∈ ℝ* → (sup(𝐴, ℝ*, < )
∈ ℝ ↔ (-∞ < sup(𝐴, ℝ*, < ) ∧
sup(𝐴, ℝ*,
< ) < +∞))) |
| 78 | 76, 77 | syl 17 |
. . . 4
⊢ ((𝜑 ∧ ¬ sup(𝐴, ℝ*, < ) = +∞)
→ (sup(𝐴,
ℝ*, < ) ∈ ℝ ↔ (-∞ < sup(𝐴, ℝ*, < )
∧ sup(𝐴,
ℝ*, < ) < +∞))) |
| 79 | 75, 78 | mpbird 247 |
. . 3
⊢ ((𝜑 ∧ ¬ sup(𝐴, ℝ*, < ) = +∞)
→ sup(𝐴,
ℝ*, < ) ∈ ℝ) |
| 80 | | simpl 473 |
. . . . 5
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ ¬ 𝐵 ≤
sup(𝐴, ℝ*,
< )) → (𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ)) |
| 81 | | simpr 477 |
. . . . . 6
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ ¬ 𝐵 ≤
sup(𝐴, ℝ*,
< )) → ¬ 𝐵 ≤
sup(𝐴, ℝ*,
< )) |
| 82 | 34 | adantr 481 |
. . . . . . . 8
⊢ ((𝜑 ∧ ¬ 𝐵 ≤ sup(𝐴, ℝ*, < )) →
sup(𝐴, ℝ*,
< ) ∈ ℝ*) |
| 83 | 1 | adantr 481 |
. . . . . . . 8
⊢ ((𝜑 ∧ ¬ 𝐵 ≤ sup(𝐴, ℝ*, < )) → 𝐵 ∈
ℝ*) |
| 84 | | xrltnle 10105 |
. . . . . . . 8
⊢
((sup(𝐴,
ℝ*, < ) ∈ ℝ* ∧ 𝐵 ∈ ℝ*) →
(sup(𝐴,
ℝ*, < ) < 𝐵 ↔ ¬ 𝐵 ≤ sup(𝐴, ℝ*, <
))) |
| 85 | 82, 83, 84 | syl2anc 693 |
. . . . . . 7
⊢ ((𝜑 ∧ ¬ 𝐵 ≤ sup(𝐴, ℝ*, < )) →
(sup(𝐴,
ℝ*, < ) < 𝐵 ↔ ¬ 𝐵 ≤ sup(𝐴, ℝ*, <
))) |
| 86 | 85 | adantlr 751 |
. . . . . 6
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ ¬ 𝐵 ≤
sup(𝐴, ℝ*,
< )) → (sup(𝐴,
ℝ*, < ) < 𝐵 ↔ ¬ 𝐵 ≤ sup(𝐴, ℝ*, <
))) |
| 87 | 81, 86 | mpbird 247 |
. . . . 5
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ ¬ 𝐵 ≤
sup(𝐴, ℝ*,
< )) → sup(𝐴,
ℝ*, < ) < 𝐵) |
| 88 | | simpll 790 |
. . . . . . 7
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → 𝜑) |
| 89 | 28 | a1i 11 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → -∞ ∈
ℝ*) |
| 90 | 88, 34 | syl 17 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → sup(𝐴, ℝ*, < ) ∈
ℝ*) |
| 91 | 88, 1 | syl 17 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → 𝐵 ∈
ℝ*) |
| 92 | | mnfle 11969 |
. . . . . . . . . . . . . 14
⊢
(sup(𝐴,
ℝ*, < ) ∈ ℝ* → -∞ ≤
sup(𝐴, ℝ*,
< )) |
| 93 | 34, 92 | syl 17 |
. . . . . . . . . . . . 13
⊢ (𝜑 → -∞ ≤ sup(𝐴, ℝ*, <
)) |
| 94 | 93 | ad2antrr 762 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → -∞ ≤ sup(𝐴, ℝ*, <
)) |
| 95 | | simpr 477 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → sup(𝐴, ℝ*, < ) < 𝐵) |
| 96 | 89, 90, 91, 94, 95 | xrlelttrd 11991 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → -∞ < 𝐵) |
| 97 | | id 22 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → 𝜑) |
| 98 | 10 | a1i 11 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → 1 ∈
ℝ+) |
| 99 | 97, 98, 25 | syl2anc 693 |
. . . . . . . . . . . . 13
⊢ (𝜑 → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 1)) |
| 100 | 99 | ad2antrr 762 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 1)) |
| 101 | 1 | 3ad2ant1 1082 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) → 𝐵 ∈
ℝ*) |
| 102 | 44 | a1i 11 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) → 1 ∈
ℝ*) |
| 103 | 32, 102 | jca 554 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) → (𝑦 ∈ ℝ*
∧ 1 ∈ ℝ*)) |
| 104 | | xaddcl 12070 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑦 ∈ ℝ*
∧ 1 ∈ ℝ*) → (𝑦 +𝑒 1) ∈
ℝ*) |
| 105 | 103, 104 | syl 17 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) → (𝑦 +𝑒 1) ∈
ℝ*) |
| 106 | | pnfxr 10092 |
. . . . . . . . . . . . . . . . 17
⊢ +∞
∈ ℝ* |
| 107 | 106 | a1i 11 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) → +∞
∈ ℝ*) |
| 108 | | simp3 1063 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) → 𝐵 < (𝑦 +𝑒 1)) |
| 109 | 31, 44, 104 | sylancl 694 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → (𝑦 +𝑒 1) ∈
ℝ*) |
| 110 | | pnfge 11964 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝑦 +𝑒 1) ∈
ℝ* → (𝑦 +𝑒 1) ≤
+∞) |
| 111 | 109, 110 | syl 17 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → (𝑦 +𝑒 1) ≤
+∞) |
| 112 | 111 | 3adant3 1081 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) → (𝑦 +𝑒 1) ≤
+∞) |
| 113 | 101, 105,
107, 108, 112 | xrltletrd 11992 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 < (𝑦 +𝑒 1)) → 𝐵 < +∞) |
| 114 | 113 | 3exp 1264 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (𝑦 ∈ 𝐴 → (𝐵 < (𝑦 +𝑒 1) → 𝐵 <
+∞))) |
| 115 | 114 | rexlimdv 3030 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 1) → 𝐵 <
+∞)) |
| 116 | 88, 115 | syl 17 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → (∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 1) → 𝐵 <
+∞)) |
| 117 | 100, 116 | mpd 15 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → 𝐵 < +∞) |
| 118 | 96, 117 | jca 554 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → (-∞ < 𝐵 ∧ 𝐵 < +∞)) |
| 119 | | xrrebnd 11999 |
. . . . . . . . . . 11
⊢ (𝐵 ∈ ℝ*
→ (𝐵 ∈ ℝ
↔ (-∞ < 𝐵
∧ 𝐵 <
+∞))) |
| 120 | 91, 119 | syl 17 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → (𝐵 ∈ ℝ ↔ (-∞ < 𝐵 ∧ 𝐵 < +∞))) |
| 121 | 118, 120 | mpbird 247 |
. . . . . . . . 9
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → 𝐵 ∈ ℝ) |
| 122 | | simpr 477 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) → sup(𝐴,
ℝ*, < ) ∈ ℝ) |
| 123 | 122 | adantr 481 |
. . . . . . . . 9
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → sup(𝐴, ℝ*, < ) ∈
ℝ) |
| 124 | 121, 123 | resubcld 10458 |
. . . . . . . 8
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → (𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ) |
| 125 | 26, 115 | mpd 15 |
. . . . . . . . . . . . 13
⊢ (𝜑 → 𝐵 < +∞) |
| 126 | 125 | ad2antrr 762 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → 𝐵 < +∞) |
| 127 | 96, 126 | jca 554 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → (-∞ < 𝐵 ∧ 𝐵 < +∞)) |
| 128 | 127, 120 | mpbird 247 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → 𝐵 ∈ ℝ) |
| 129 | 123, 128 | posdifd 10614 |
. . . . . . . . 9
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → (sup(𝐴, ℝ*, < ) < 𝐵 ↔ 0 < (𝐵 − sup(𝐴, ℝ*, <
)))) |
| 130 | 95, 129 | mpbid 222 |
. . . . . . . 8
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → 0 < (𝐵 − sup(𝐴, ℝ*, <
))) |
| 131 | 124, 130 | elrpd 11869 |
. . . . . . 7
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → (𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ+) |
| 132 | | ovex 6678 |
. . . . . . . 8
⊢ (𝐵 − sup(𝐴, ℝ*, < )) ∈
V |
| 133 | | nfcv 2764 |
. . . . . . . . 9
⊢
Ⅎ𝑥(𝐵 − sup(𝐴, ℝ*, <
)) |
| 134 | | nfv 1843 |
. . . . . . . . . . 11
⊢
Ⅎ𝑥(𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ+ |
| 135 | 12, 134 | nfan 1828 |
. . . . . . . . . 10
⊢
Ⅎ𝑥(𝜑 ∧ (𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ+) |
| 136 | | nfv 1843 |
. . . . . . . . . 10
⊢
Ⅎ𝑥∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, <
))) |
| 137 | 135, 136 | nfim 1825 |
. . . . . . . . 9
⊢
Ⅎ𝑥((𝜑 ∧ (𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, <
)))) |
| 138 | | eleq1 2689 |
. . . . . . . . . . 11
⊢ (𝑥 = (𝐵 − sup(𝐴, ℝ*, < )) → (𝑥 ∈ ℝ+
↔ (𝐵 − sup(𝐴, ℝ*, < ))
∈ ℝ+)) |
| 139 | 138 | anbi2d 740 |
. . . . . . . . . 10
⊢ (𝑥 = (𝐵 − sup(𝐴, ℝ*, < )) →
((𝜑 ∧ 𝑥 ∈ ℝ+) ↔ (𝜑 ∧ (𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ+))) |
| 140 | | oveq2 6658 |
. . . . . . . . . . . 12
⊢ (𝑥 = (𝐵 − sup(𝐴, ℝ*, < )) → (𝑦 +𝑒 𝑥) = (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, <
)))) |
| 141 | 140 | breq2d 4665 |
. . . . . . . . . . 11
⊢ (𝑥 = (𝐵 − sup(𝐴, ℝ*, < )) → (𝐵 < (𝑦 +𝑒 𝑥) ↔ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, <
))))) |
| 142 | 141 | rexbidv 3052 |
. . . . . . . . . 10
⊢ (𝑥 = (𝐵 − sup(𝐴, ℝ*, < )) →
(∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 𝑥) ↔ ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, <
))))) |
| 143 | 139, 142 | imbi12d 334 |
. . . . . . . . 9
⊢ (𝑥 = (𝐵 − sup(𝐴, ℝ*, < )) →
(((𝜑 ∧ 𝑥 ∈ ℝ+) →
∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 𝑥)) ↔ ((𝜑 ∧ (𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, <
)))))) |
| 144 | 133, 137,
143, 23 | vtoclgf 3264 |
. . . . . . . 8
⊢ ((𝐵 − sup(𝐴, ℝ*, < )) ∈ V
→ ((𝜑 ∧ (𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, <
))))) |
| 145 | 132, 144 | ax-mp 5 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, <
)))) |
| 146 | 88, 131, 145 | syl2anc 693 |
. . . . . 6
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, <
)))) |
| 147 | | ltpnf 11954 |
. . . . . . . . . . . . 13
⊢
(sup(𝐴,
ℝ*, < ) ∈ ℝ → sup(𝐴, ℝ*, < ) <
+∞) |
| 148 | 147 | adantr 481 |
. . . . . . . . . . . 12
⊢
((sup(𝐴,
ℝ*, < ) ∈ ℝ ∧ 𝑦 = +∞) → sup(𝐴, ℝ*, < ) <
+∞) |
| 149 | | id 22 |
. . . . . . . . . . . . . 14
⊢ (𝑦 = +∞ → 𝑦 = +∞) |
| 150 | 149 | eqcomd 2628 |
. . . . . . . . . . . . 13
⊢ (𝑦 = +∞ → +∞ =
𝑦) |
| 151 | 150 | adantl 482 |
. . . . . . . . . . . 12
⊢
((sup(𝐴,
ℝ*, < ) ∈ ℝ ∧ 𝑦 = +∞) → +∞ = 𝑦) |
| 152 | 148, 151 | breqtrd 4679 |
. . . . . . . . . . 11
⊢
((sup(𝐴,
ℝ*, < ) ∈ ℝ ∧ 𝑦 = +∞) → sup(𝐴, ℝ*, < ) < 𝑦) |
| 153 | 152 | adantll 750 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ 𝑦 =
+∞) → sup(𝐴,
ℝ*, < ) < 𝑦) |
| 154 | 153 | ad5ant15 1303 |
. . . . . . . . 9
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ 𝑦 = +∞) → sup(𝐴, ℝ*, < )
< 𝑦) |
| 155 | | simplll 798 |
. . . . . . . . . 10
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ ¬
𝑦 = +∞) →
((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵)) |
| 156 | | simpl 473 |
. . . . . . . . . . . . . . 15
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ ¬
-∞ < 𝑦) →
((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, <
))))) |
| 157 | 88, 41 | sylanl1 682 |
. . . . . . . . . . . . . . . 16
⊢
(((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → 𝑦 = -∞) |
| 158 | 157 | adantlr 751 |
. . . . . . . . . . . . . . 15
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ ¬
-∞ < 𝑦) →
𝑦 =
-∞) |
| 159 | | simplr 792 |
. . . . . . . . . . . . . . . 16
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ 𝑦 = -∞) → 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, <
)))) |
| 160 | | oveq1 6657 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑦 = -∞ → (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < ))) = (-∞
+𝑒 (𝐵
− sup(𝐴,
ℝ*, < )))) |
| 161 | 160 | adantl 482 |
. . . . . . . . . . . . . . . . 17
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ 𝑦 = -∞) → (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < ))) = (-∞
+𝑒 (𝐵
− sup(𝐴,
ℝ*, < )))) |
| 162 | 128, 123 | resubcld 10458 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → (𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ) |
| 163 | 162 | rexrd 10089 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → (𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ*) |
| 164 | 163 | ad3antrrr 766 |
. . . . . . . . . . . . . . . . . 18
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ 𝑦 = -∞) → (𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ*) |
| 165 | | renepnf 10087 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ → (𝐵 −
sup(𝐴, ℝ*,
< )) ≠ +∞) |
| 166 | 124, 165 | syl 17 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → (𝐵 − sup(𝐴, ℝ*, < )) ≠
+∞) |
| 167 | 166 | ad3antrrr 766 |
. . . . . . . . . . . . . . . . . 18
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ 𝑦 = -∞) → (𝐵 − sup(𝐴, ℝ*, < )) ≠
+∞) |
| 168 | | xaddmnf2 12060 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ* ∧ (𝐵 − sup(𝐴, ℝ*, < )) ≠
+∞) → (-∞ +𝑒 (𝐵 − sup(𝐴, ℝ*, < ))) =
-∞) |
| 169 | 164, 167,
168 | syl2anc 693 |
. . . . . . . . . . . . . . . . 17
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ 𝑦 = -∞) → (-∞
+𝑒 (𝐵
− sup(𝐴,
ℝ*, < ))) = -∞) |
| 170 | 161, 169 | eqtrd 2656 |
. . . . . . . . . . . . . . . 16
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ 𝑦 = -∞) → (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < ))) =
-∞) |
| 171 | 159, 170 | breqtrd 4679 |
. . . . . . . . . . . . . . 15
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ 𝑦 = -∞) → 𝐵 < -∞) |
| 172 | 156, 158,
171 | syl2anc 693 |
. . . . . . . . . . . . . 14
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ ¬
-∞ < 𝑦) →
𝐵 <
-∞) |
| 173 | 55 | ad5antr 770 |
. . . . . . . . . . . . . 14
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ ¬
-∞ < 𝑦) →
¬ 𝐵 <
-∞) |
| 174 | 172, 173 | condan 835 |
. . . . . . . . . . . . 13
⊢
(((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) →
-∞ < 𝑦) |
| 175 | 174 | adantr 481 |
. . . . . . . . . . . 12
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ ¬
𝑦 = +∞) →
-∞ < 𝑦) |
| 176 | | simp3 1063 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ ¬ 𝑦 = +∞) → ¬ 𝑦 = +∞) |
| 177 | 31 | 3adant3 1081 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ ¬ 𝑦 = +∞) → 𝑦 ∈ ℝ*) |
| 178 | | nltpnft 11995 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑦 ∈ ℝ*
→ (𝑦 = +∞ ↔
¬ 𝑦 <
+∞)) |
| 179 | 177, 178 | syl 17 |
. . . . . . . . . . . . . . . 16
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ ¬ 𝑦 = +∞) → (𝑦 = +∞ ↔ ¬ 𝑦 < +∞)) |
| 180 | 176, 179 | mtbid 314 |
. . . . . . . . . . . . . . 15
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ ¬ 𝑦 = +∞) → ¬ ¬ 𝑦 < +∞) |
| 181 | 180 | notnotrd 128 |
. . . . . . . . . . . . . 14
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴 ∧ ¬ 𝑦 = +∞) → 𝑦 < +∞) |
| 182 | 181 | 3adant1r 1319 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ 𝑦 ∈
𝐴 ∧ ¬ 𝑦 = +∞) → 𝑦 < +∞) |
| 183 | 182 | ad5ant135 1314 |
. . . . . . . . . . . 12
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ ¬
𝑦 = +∞) → 𝑦 < +∞) |
| 184 | 175, 183 | jca 554 |
. . . . . . . . . . 11
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ ¬
𝑦 = +∞) →
(-∞ < 𝑦 ∧
𝑦 <
+∞)) |
| 185 | 31 | adantlr 751 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ 𝑦 ∈
𝐴) → 𝑦 ∈
ℝ*) |
| 186 | 185 | ad5ant13 1301 |
. . . . . . . . . . . 12
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ ¬
𝑦 = +∞) → 𝑦 ∈
ℝ*) |
| 187 | | xrrebnd 11999 |
. . . . . . . . . . . 12
⊢ (𝑦 ∈ ℝ*
→ (𝑦 ∈ ℝ
↔ (-∞ < 𝑦
∧ 𝑦 <
+∞))) |
| 188 | 186, 187 | syl 17 |
. . . . . . . . . . 11
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ ¬
𝑦 = +∞) → (𝑦 ∈ ℝ ↔ (-∞
< 𝑦 ∧ 𝑦 <
+∞))) |
| 189 | 184, 188 | mpbird 247 |
. . . . . . . . . 10
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ ¬
𝑦 = +∞) → 𝑦 ∈
ℝ) |
| 190 | | simplr 792 |
. . . . . . . . . 10
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ ¬
𝑦 = +∞) → 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, <
)))) |
| 191 | 121 | ad2antrr 762 |
. . . . . . . . . . . . 13
⊢
(((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) →
𝐵 ∈
ℝ) |
| 192 | | simpr 477 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ) |
| 193 | 124 | adantr 481 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) → (𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ) |
| 194 | | rexadd 12063 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑦 ∈ ℝ ∧ (𝐵 − sup(𝐴, ℝ*, < )) ∈
ℝ) → (𝑦
+𝑒 (𝐵
− sup(𝐴,
ℝ*, < ))) = (𝑦 + (𝐵 − sup(𝐴, ℝ*, <
)))) |
| 195 | 192, 193,
194 | syl2anc 693 |
. . . . . . . . . . . . . . 15
⊢ ((((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) → (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < ))) = (𝑦 + (𝐵 − sup(𝐴, ℝ*, <
)))) |
| 196 | 192, 193 | readdcld 10069 |
. . . . . . . . . . . . . . 15
⊢ ((((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) → (𝑦 + (𝐵 − sup(𝐴, ℝ*, < ))) ∈
ℝ) |
| 197 | 195, 196 | eqeltrd 2701 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) → (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < ))) ∈
ℝ) |
| 198 | 197 | adantr 481 |
. . . . . . . . . . . . 13
⊢
(((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) →
(𝑦 +𝑒
(𝐵 − sup(𝐴, ℝ*, < )))
∈ ℝ) |
| 199 | | simpr 477 |
. . . . . . . . . . . . 13
⊢
(((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) →
𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, <
)))) |
| 200 | 191, 198,
191, 199 | ltsub1dd 10639 |
. . . . . . . . . . . 12
⊢
(((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) →
(𝐵 − 𝐵) < ((𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < ))) −
𝐵)) |
| 201 | 121 | recnd 10068 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → 𝐵 ∈ ℂ) |
| 202 | 201 | subidd 10380 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → (𝐵 − 𝐵) = 0) |
| 203 | 202 | ad2antrr 762 |
. . . . . . . . . . . . 13
⊢
(((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) →
(𝐵 − 𝐵) = 0) |
| 204 | 192 | recnd 10068 |
. . . . . . . . . . . . . . . . . 18
⊢ ((((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℂ) |
| 205 | 201 | adantr 481 |
. . . . . . . . . . . . . . . . . 18
⊢ ((((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) → 𝐵 ∈ ℂ) |
| 206 | 122 | recnd 10068 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) → sup(𝐴,
ℝ*, < ) ∈ ℂ) |
| 207 | 206 | ad2antrr 762 |
. . . . . . . . . . . . . . . . . 18
⊢ ((((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) → sup(𝐴, ℝ*, < ) ∈
ℂ) |
| 208 | 204, 205,
207 | addsub12d 10415 |
. . . . . . . . . . . . . . . . 17
⊢ ((((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) → (𝑦 + (𝐵 − sup(𝐴, ℝ*, < ))) = (𝐵 + (𝑦 − sup(𝐴, ℝ*, <
)))) |
| 209 | 195, 208 | eqtrd 2656 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) → (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < ))) = (𝐵 + (𝑦 − sup(𝐴, ℝ*, <
)))) |
| 210 | 209 | oveq1d 6665 |
. . . . . . . . . . . . . . 15
⊢ ((((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) → ((𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < ))) −
𝐵) = ((𝐵 + (𝑦 − sup(𝐴, ℝ*, < ))) −
𝐵)) |
| 211 | 204, 207 | subcld 10392 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) → (𝑦 − sup(𝐴, ℝ*, < )) ∈
ℂ) |
| 212 | 205, 211 | pncan2d 10394 |
. . . . . . . . . . . . . . 15
⊢ ((((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) → ((𝐵 + (𝑦 − sup(𝐴, ℝ*, < ))) −
𝐵) = (𝑦 − sup(𝐴, ℝ*, <
))) |
| 213 | 210, 212 | eqtrd 2656 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) → ((𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < ))) −
𝐵) = (𝑦 − sup(𝐴, ℝ*, <
))) |
| 214 | 213 | adantr 481 |
. . . . . . . . . . . . 13
⊢
(((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) →
((𝑦 +𝑒
(𝐵 − sup(𝐴, ℝ*, < )))
− 𝐵) = (𝑦 − sup(𝐴, ℝ*, <
))) |
| 215 | 203, 214 | breq12d 4666 |
. . . . . . . . . . . 12
⊢
(((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) →
((𝐵 − 𝐵) < ((𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < ))) −
𝐵) ↔ 0 < (𝑦 − sup(𝐴, ℝ*, <
)))) |
| 216 | 200, 215 | mpbid 222 |
. . . . . . . . . . 11
⊢
(((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) → 0
< (𝑦 − sup(𝐴, ℝ*, <
))) |
| 217 | 123 | ad2antrr 762 |
. . . . . . . . . . . 12
⊢
(((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) →
sup(𝐴, ℝ*,
< ) ∈ ℝ) |
| 218 | | simplr 792 |
. . . . . . . . . . . 12
⊢
(((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) →
𝑦 ∈
ℝ) |
| 219 | 217, 218 | posdifd 10614 |
. . . . . . . . . . 11
⊢
(((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) →
(sup(𝐴,
ℝ*, < ) < 𝑦 ↔ 0 < (𝑦 − sup(𝐴, ℝ*, <
)))) |
| 220 | 216, 219 | mpbird 247 |
. . . . . . . . . 10
⊢
(((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ ℝ) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) →
sup(𝐴, ℝ*,
< ) < 𝑦) |
| 221 | 155, 189,
190, 220 | syl21anc 1325 |
. . . . . . . . 9
⊢
((((((𝜑 ∧
sup(𝐴, ℝ*,
< ) ∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) ∧ ¬
𝑦 = +∞) →
sup(𝐴, ℝ*,
< ) < 𝑦) |
| 222 | 154, 221 | pm2.61dan 832 |
. . . . . . . 8
⊢
(((((𝜑 ∧ sup(𝐴, ℝ*, < )
∈ ℝ) ∧ sup(𝐴, ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) ∧ 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < )))) →
sup(𝐴, ℝ*,
< ) < 𝑦) |
| 223 | 222 | ex 450 |
. . . . . . 7
⊢ ((((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) ∧ 𝑦 ∈ 𝐴) → (𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < ))) →
sup(𝐴, ℝ*,
< ) < 𝑦)) |
| 224 | 223 | reximdva 3017 |
. . . . . 6
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → (∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 (𝐵 − sup(𝐴, ℝ*, < ))) →
∃𝑦 ∈ 𝐴 sup(𝐴, ℝ*, < ) < 𝑦)) |
| 225 | 146, 224 | mpd 15 |
. . . . 5
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ sup(𝐴,
ℝ*, < ) < 𝐵) → ∃𝑦 ∈ 𝐴 sup(𝐴, ℝ*, < ) < 𝑦) |
| 226 | 80, 87, 225 | syl2anc 693 |
. . . 4
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ ¬ 𝐵 ≤
sup(𝐴, ℝ*,
< )) → ∃𝑦
∈ 𝐴 sup(𝐴, ℝ*, < )
< 𝑦) |
| 227 | 59, 33 | syl 17 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → sup(𝐴, ℝ*, < ) ∈
ℝ*) |
| 228 | 31, 227 | xrlenltd 10104 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → (𝑦 ≤ sup(𝐴, ℝ*, < ) ↔ ¬
sup(𝐴, ℝ*,
< ) < 𝑦)) |
| 229 | 62, 228 | mpbid 222 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → ¬ sup(𝐴, ℝ*, < ) < 𝑦) |
| 230 | 229 | ralrimiva 2966 |
. . . . . 6
⊢ (𝜑 → ∀𝑦 ∈ 𝐴 ¬ sup(𝐴, ℝ*, < ) < 𝑦) |
| 231 | | ralnex 2992 |
. . . . . 6
⊢
(∀𝑦 ∈
𝐴 ¬ sup(𝐴, ℝ*, < )
< 𝑦 ↔ ¬
∃𝑦 ∈ 𝐴 sup(𝐴, ℝ*, < ) < 𝑦) |
| 232 | 230, 231 | sylib 208 |
. . . . 5
⊢ (𝜑 → ¬ ∃𝑦 ∈ 𝐴 sup(𝐴, ℝ*, < ) < 𝑦) |
| 233 | 232 | ad2antrr 762 |
. . . 4
⊢ (((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) ∧ ¬ 𝐵 ≤
sup(𝐴, ℝ*,
< )) → ¬ ∃𝑦 ∈ 𝐴 sup(𝐴, ℝ*, < ) < 𝑦) |
| 234 | 226, 233 | condan 835 |
. . 3
⊢ ((𝜑 ∧ sup(𝐴, ℝ*, < ) ∈
ℝ) → 𝐵 ≤
sup(𝐴, ℝ*,
< )) |
| 235 | 9, 79, 234 | syl2anc 693 |
. 2
⊢ ((𝜑 ∧ ¬ sup(𝐴, ℝ*, < ) = +∞)
→ 𝐵 ≤ sup(𝐴, ℝ*, <
)) |
| 236 | 8, 235 | pm2.61dan 832 |
1
⊢ (𝜑 → 𝐵 ≤ sup(𝐴, ℝ*, <
)) |