| Step | Hyp | Ref
| Expression |
| 1 | | elreal 6997 |
. . 3
⊢ (𝐴 ∈ ℝ ↔
∃𝑧 ∈
R 〈𝑧,
0R〉 = 𝐴) |
| 2 | 1 | biimpi 118 |
. 2
⊢ (𝐴 ∈ ℝ →
∃𝑧 ∈
R 〈𝑧,
0R〉 = 𝐴) |
| 3 | | archsr 6958 |
. . . 4
⊢ (𝑧 ∈ R →
∃𝑤 ∈
N 𝑧
<R [〈(〈{𝑙 ∣ 𝑙 <Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R ) |
| 4 | 3 | ad2antrl 473 |
. . 3
⊢ ((𝐴 ∈ ℝ ∧ (𝑧 ∈ R ∧
〈𝑧,
0R〉 = 𝐴)) → ∃𝑤 ∈ N 𝑧 <R
[〈(〈{𝑙 ∣
𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R ) |
| 5 | | simplrr 502 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ (𝑧 ∈ R ∧
〈𝑧,
0R〉 = 𝐴)) ∧ (𝑤 ∈ N ∧ 𝑧 <R
[〈(〈{𝑙 ∣
𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R )) → 〈𝑧, 0R〉 = 𝐴) |
| 6 | | simprr 498 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ (𝑧 ∈ R ∧
〈𝑧,
0R〉 = 𝐴)) ∧ (𝑤 ∈ N ∧ 𝑧 <R
[〈(〈{𝑙 ∣
𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R )) → 𝑧 <R
[〈(〈{𝑙 ∣
𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R ) |
| 7 | | ltresr 7007 |
. . . . . 6
⊢
(〈𝑧,
0R〉 <ℝ
〈[〈(〈{𝑙
∣ 𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R , 0R〉 ↔ 𝑧 <R
[〈(〈{𝑙 ∣
𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R ) |
| 8 | 6, 7 | sylibr 132 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ (𝑧 ∈ R ∧
〈𝑧,
0R〉 = 𝐴)) ∧ (𝑤 ∈ N ∧ 𝑧 <R
[〈(〈{𝑙 ∣
𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R )) → 〈𝑧, 0R〉
<ℝ 〈[〈(〈{𝑙 ∣ 𝑙 <Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R ,
0R〉) |
| 9 | 5, 8 | eqbrtrrd 3807 |
. . . 4
⊢ (((𝐴 ∈ ℝ ∧ (𝑧 ∈ R ∧
〈𝑧,
0R〉 = 𝐴)) ∧ (𝑤 ∈ N ∧ 𝑧 <R
[〈(〈{𝑙 ∣
𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R )) → 𝐴 <ℝ
〈[〈(〈{𝑙
∣ 𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R ,
0R〉) |
| 10 | | pitonn 7016 |
. . . . . 6
⊢ (𝑤 ∈ N →
〈[〈(〈{𝑙
∣ 𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R , 0R〉 ∈ ∩ {𝑥
∣ (1 ∈ 𝑥 ∧
∀𝑦 ∈ 𝑥 (𝑦 + 1) ∈ 𝑥)}) |
| 11 | 10 | ad2antrl 473 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ (𝑧 ∈ R ∧
〈𝑧,
0R〉 = 𝐴)) ∧ (𝑤 ∈ N ∧ 𝑧 <R
[〈(〈{𝑙 ∣
𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R )) → 〈[〈(〈{𝑙 ∣ 𝑙 <Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R , 0R〉 ∈ ∩ {𝑥
∣ (1 ∈ 𝑥 ∧
∀𝑦 ∈ 𝑥 (𝑦 + 1) ∈ 𝑥)}) |
| 12 | | simpr 108 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ (𝑧 ∈ R ∧
〈𝑧,
0R〉 = 𝐴)) ∧ (𝑤 ∈ N ∧ 𝑧 <R
[〈(〈{𝑙 ∣
𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R )) ∧ 𝑛 = 〈[〈(〈{𝑙 ∣ 𝑙 <Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R , 0R〉) → 𝑛 = 〈[〈(〈{𝑙 ∣ 𝑙 <Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R ,
0R〉) |
| 13 | 12 | breq2d 3797 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ (𝑧 ∈ R ∧
〈𝑧,
0R〉 = 𝐴)) ∧ (𝑤 ∈ N ∧ 𝑧 <R
[〈(〈{𝑙 ∣
𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R )) ∧ 𝑛 = 〈[〈(〈{𝑙 ∣ 𝑙 <Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R , 0R〉) → (𝐴 <ℝ 𝑛 ↔ 𝐴 <ℝ
〈[〈(〈{𝑙
∣ 𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R ,
0R〉)) |
| 14 | 11, 13 | rspcedv 2705 |
. . . 4
⊢ (((𝐴 ∈ ℝ ∧ (𝑧 ∈ R ∧
〈𝑧,
0R〉 = 𝐴)) ∧ (𝑤 ∈ N ∧ 𝑧 <R
[〈(〈{𝑙 ∣
𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R )) → (𝐴 <ℝ
〈[〈(〈{𝑙
∣ 𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R , 0R〉 →
∃𝑛 ∈ ∩ {𝑥
∣ (1 ∈ 𝑥 ∧
∀𝑦 ∈ 𝑥 (𝑦 + 1) ∈ 𝑥)}𝐴 <ℝ 𝑛)) |
| 15 | 9, 14 | mpd 13 |
. . 3
⊢ (((𝐴 ∈ ℝ ∧ (𝑧 ∈ R ∧
〈𝑧,
0R〉 = 𝐴)) ∧ (𝑤 ∈ N ∧ 𝑧 <R
[〈(〈{𝑙 ∣
𝑙
<Q [〈𝑤, 1𝑜〉]
~Q }, {𝑢 ∣ [〈𝑤, 1𝑜〉]
~Q <Q 𝑢}〉 +P
1P), 1P〉]
~R )) → ∃𝑛 ∈ ∩ {𝑥 ∣ (1 ∈ 𝑥 ∧ ∀𝑦 ∈ 𝑥 (𝑦 + 1) ∈ 𝑥)}𝐴 <ℝ 𝑛) |
| 16 | 4, 15 | rexlimddv 2481 |
. 2
⊢ ((𝐴 ∈ ℝ ∧ (𝑧 ∈ R ∧
〈𝑧,
0R〉 = 𝐴)) → ∃𝑛 ∈ ∩ {𝑥 ∣ (1 ∈ 𝑥 ∧ ∀𝑦 ∈ 𝑥 (𝑦 + 1) ∈ 𝑥)}𝐴 <ℝ 𝑛) |
| 17 | 2, 16 | rexlimddv 2481 |
1
⊢ (𝐴 ∈ ℝ →
∃𝑛 ∈ ∩ {𝑥
∣ (1 ∈ 𝑥 ∧
∀𝑦 ∈ 𝑥 (𝑦 + 1) ∈ 𝑥)}𝐴 <ℝ 𝑛) |