| Step | Hyp | Ref
| Expression |
| 1 | | elz12s 28468 |
. 2
⊢ (𝐴 ∈ ℤs[1/2]
↔ ∃𝑎 ∈
ℤs ∃𝑏 ∈ ℕ0s 𝐴 = (𝑎 /su
(2s↑s𝑏))) |
| 2 | | oveq2 7366 |
. . . . . . . . . . . 12
⊢ (𝑐 = 0s →
(2s↑s𝑐) = (2s↑s
0s )) |
| 3 | | 2no 28415 |
. . . . . . . . . . . . 13
⊢
2s ∈ No |
| 4 | | exps0 28423 |
. . . . . . . . . . . . 13
⊢
(2s ∈ No →
(2s↑s 0s ) = 1s
) |
| 5 | 3, 4 | ax-mp 5 |
. . . . . . . . . . . 12
⊢
(2s↑s 0s ) =
1s |
| 6 | 2, 5 | eqtrdi 2787 |
. . . . . . . . . . 11
⊢ (𝑐 = 0s →
(2s↑s𝑐) = 1s ) |
| 7 | 6 | oveq2d 7374 |
. . . . . . . . . 10
⊢ (𝑐 = 0s → (𝑎 /su
(2s↑s𝑐)) = (𝑎 /su 1s
)) |
| 8 | 7 | eleq1d 2821 |
. . . . . . . . 9
⊢ (𝑐 = 0s → ((𝑎 /su
(2s↑s𝑐)) ∈ ℤs ↔ (𝑎 /su
1s ) ∈ ℤs)) |
| 9 | 7 | eqeq1d 2738 |
. . . . . . . . . 10
⊢ (𝑐 = 0s → ((𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)) ↔ (𝑎 /su 1s ) =
(((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦)))) |
| 10 | 9 | 2rexbidv 3201 |
. . . . . . . . 9
⊢ (𝑐 = 0s →
(∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)) ↔ ∃𝑥 ∈ ℤs
∃𝑦 ∈
ℕs (𝑎
/su 1s ) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) |
| 11 | 8, 10 | orbi12d 918 |
. . . . . . . 8
⊢ (𝑐 = 0s → (((𝑎 /su
(2s↑s𝑐)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) ↔ ((𝑎 /su 1s ) ∈
ℤs ∨ ∃𝑥 ∈ ℤs ∃𝑦 ∈ ℕs
(𝑎 /su
1s ) = (((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦))))) |
| 12 | 11 | ralbidv 3159 |
. . . . . . 7
⊢ (𝑐 = 0s →
(∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑐)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) ↔ ∀𝑎 ∈ ℤs
((𝑎 /su
1s ) ∈ ℤs ∨ ∃𝑥 ∈ ℤs ∃𝑦 ∈ ℕs
(𝑎 /su
1s ) = (((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦))))) |
| 13 | | oveq2 7366 |
. . . . . . . . . . 11
⊢ (𝑐 = 𝑤 → (2s↑s𝑐) =
(2s↑s𝑤)) |
| 14 | 13 | oveq2d 7374 |
. . . . . . . . . 10
⊢ (𝑐 = 𝑤 → (𝑎 /su
(2s↑s𝑐)) = (𝑎 /su
(2s↑s𝑤))) |
| 15 | 14 | eleq1d 2821 |
. . . . . . . . 9
⊢ (𝑐 = 𝑤 → ((𝑎 /su
(2s↑s𝑐)) ∈ ℤs ↔ (𝑎 /su
(2s↑s𝑤)) ∈
ℤs)) |
| 16 | 14 | eqeq1d 2738 |
. . . . . . . . . 10
⊢ (𝑐 = 𝑤 → ((𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)) ↔ (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) |
| 17 | 16 | 2rexbidv 3201 |
. . . . . . . . 9
⊢ (𝑐 = 𝑤 → (∃𝑥 ∈ ℤs ∃𝑦 ∈ ℕs
(𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)) ↔ ∃𝑥 ∈ ℤs
∃𝑦 ∈
ℕs (𝑎
/su (2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) |
| 18 | 15, 17 | orbi12d 918 |
. . . . . . . 8
⊢ (𝑐 = 𝑤 → (((𝑎 /su
(2s↑s𝑐)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) ↔ ((𝑎 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))))) |
| 19 | 18 | ralbidv 3159 |
. . . . . . 7
⊢ (𝑐 = 𝑤 → (∀𝑎 ∈ ℤs ((𝑎 /su
(2s↑s𝑐)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) ↔ ∀𝑎 ∈ ℤs
((𝑎 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))))) |
| 20 | | oveq2 7366 |
. . . . . . . . . . . 12
⊢ (𝑐 = (𝑤 +s 1s ) →
(2s↑s𝑐) = (2s↑s(𝑤 +s 1s
))) |
| 21 | 20 | oveq2d 7374 |
. . . . . . . . . . 11
⊢ (𝑐 = (𝑤 +s 1s ) → (𝑎 /su
(2s↑s𝑐)) = (𝑎 /su
(2s↑s(𝑤 +s 1s
)))) |
| 22 | 21 | eleq1d 2821 |
. . . . . . . . . 10
⊢ (𝑐 = (𝑤 +s 1s ) → ((𝑎 /su
(2s↑s𝑐)) ∈ ℤs ↔ (𝑎 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs)) |
| 23 | 21 | eqeq1d 2738 |
. . . . . . . . . . 11
⊢ (𝑐 = (𝑤 +s 1s ) → ((𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)) ↔ (𝑎 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦)))) |
| 24 | 23 | 2rexbidv 3201 |
. . . . . . . . . 10
⊢ (𝑐 = (𝑤 +s 1s ) →
(∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)) ↔ ∃𝑥 ∈ ℤs
∃𝑦 ∈
ℕs (𝑎
/su (2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦)))) |
| 25 | 22, 24 | orbi12d 918 |
. . . . . . . . 9
⊢ (𝑐 = (𝑤 +s 1s ) →
(((𝑎 /su
(2s↑s𝑐)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) ↔ ((𝑎 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑥 ∈ ℤs ∃𝑦 ∈ ℕs
(𝑎 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦))))) |
| 26 | 25 | ralbidv 3159 |
. . . . . . . 8
⊢ (𝑐 = (𝑤 +s 1s ) →
(∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑐)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) ↔ ∀𝑎 ∈ ℤs
((𝑎 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑥 ∈ ℤs ∃𝑦 ∈ ℕs
(𝑎 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦))))) |
| 27 | | oveq1 7365 |
. . . . . . . . . . 11
⊢ (𝑎 = 𝑏 → (𝑎 /su
(2s↑s(𝑤 +s 1s ))) = (𝑏 /su
(2s↑s(𝑤 +s 1s
)))) |
| 28 | 27 | eleq1d 2821 |
. . . . . . . . . 10
⊢ (𝑎 = 𝑏 → ((𝑎 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ↔ (𝑏 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs)) |
| 29 | 27 | eqeq1d 2738 |
. . . . . . . . . . . 12
⊢ (𝑎 = 𝑏 → ((𝑎 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦)) ↔ (𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦)))) |
| 30 | 29 | 2rexbidv 3201 |
. . . . . . . . . . 11
⊢ (𝑎 = 𝑏 → (∃𝑥 ∈ ℤs ∃𝑦 ∈ ℕs
(𝑎 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦)) ↔ ∃𝑥 ∈ ℤs ∃𝑦 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦)))) |
| 31 | | oveq2 7366 |
. . . . . . . . . . . . . . 15
⊢ (𝑥 = 𝑝 → (2s ·s
𝑥) = (2s
·s 𝑝)) |
| 32 | 31 | oveq1d 7373 |
. . . . . . . . . . . . . 14
⊢ (𝑥 = 𝑝 → ((2s ·s
𝑥) +s
1s ) = ((2s ·s 𝑝) +s 1s
)) |
| 33 | 32 | oveq1d 7373 |
. . . . . . . . . . . . 13
⊢ (𝑥 = 𝑝 → (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)) = (((2s
·s 𝑝)
+s 1s ) /su
(2s↑s𝑦))) |
| 34 | 33 | eqeq2d 2747 |
. . . . . . . . . . . 12
⊢ (𝑥 = 𝑝 → ((𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦)) ↔ (𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑦)))) |
| 35 | | oveq2 7366 |
. . . . . . . . . . . . . 14
⊢ (𝑦 = 𝑞 → (2s↑s𝑦) =
(2s↑s𝑞)) |
| 36 | 35 | oveq2d 7374 |
. . . . . . . . . . . . 13
⊢ (𝑦 = 𝑞 → (((2s ·s
𝑝) +s
1s ) /su (2s↑s𝑦)) = (((2s
·s 𝑝)
+s 1s ) /su
(2s↑s𝑞))) |
| 37 | 36 | eqeq2d 2747 |
. . . . . . . . . . . 12
⊢ (𝑦 = 𝑞 → ((𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑦)) ↔ (𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)))) |
| 38 | 34, 37 | cbvrex2vw 3219 |
. . . . . . . . . . 11
⊢
(∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦)) ↔ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))) |
| 39 | 30, 38 | bitrdi 287 |
. . . . . . . . . 10
⊢ (𝑎 = 𝑏 → (∃𝑥 ∈ ℤs ∃𝑦 ∈ ℕs
(𝑎 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦)) ↔ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)))) |
| 40 | 28, 39 | orbi12d 918 |
. . . . . . . . 9
⊢ (𝑎 = 𝑏 → (((𝑎 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑥 ∈ ℤs ∃𝑦 ∈ ℕs
(𝑎 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦))) ↔ ((𝑏 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))))) |
| 41 | 40 | cbvralvw 3214 |
. . . . . . . 8
⊢
(∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑥 ∈ ℤs ∃𝑦 ∈ ℕs
(𝑎 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑥) +s 1s )
/su (2s↑s𝑦))) ↔ ∀𝑏 ∈ ℤs ((𝑏 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)))) |
| 42 | 26, 41 | bitrdi 287 |
. . . . . . 7
⊢ (𝑐 = (𝑤 +s 1s ) →
(∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑐)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) ↔ ∀𝑏 ∈ ℤs
((𝑏 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))))) |
| 43 | | oveq2 7366 |
. . . . . . . . . . 11
⊢ (𝑐 = 𝑏 → (2s↑s𝑐) =
(2s↑s𝑏)) |
| 44 | 43 | oveq2d 7374 |
. . . . . . . . . 10
⊢ (𝑐 = 𝑏 → (𝑎 /su
(2s↑s𝑐)) = (𝑎 /su
(2s↑s𝑏))) |
| 45 | 44 | eleq1d 2821 |
. . . . . . . . 9
⊢ (𝑐 = 𝑏 → ((𝑎 /su
(2s↑s𝑐)) ∈ ℤs ↔ (𝑎 /su
(2s↑s𝑏)) ∈
ℤs)) |
| 46 | 44 | eqeq1d 2738 |
. . . . . . . . . 10
⊢ (𝑐 = 𝑏 → ((𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)) ↔ (𝑎 /su
(2s↑s𝑏)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) |
| 47 | 46 | 2rexbidv 3201 |
. . . . . . . . 9
⊢ (𝑐 = 𝑏 → (∃𝑥 ∈ ℤs ∃𝑦 ∈ ℕs
(𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)) ↔ ∃𝑥 ∈ ℤs
∃𝑦 ∈
ℕs (𝑎
/su (2s↑s𝑏)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) |
| 48 | 45, 47 | orbi12d 918 |
. . . . . . . 8
⊢ (𝑐 = 𝑏 → (((𝑎 /su
(2s↑s𝑐)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) ↔ ((𝑎 /su
(2s↑s𝑏)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑏)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))))) |
| 49 | 48 | ralbidv 3159 |
. . . . . . 7
⊢ (𝑐 = 𝑏 → (∀𝑎 ∈ ℤs ((𝑎 /su
(2s↑s𝑐)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑐)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) ↔ ∀𝑎 ∈ ℤs
((𝑎 /su
(2s↑s𝑏)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑏)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))))) |
| 50 | | zno 28378 |
. . . . . . . . . . 11
⊢ (𝑎 ∈ ℤs
→ 𝑎 ∈ No ) |
| 51 | 50 | divs1d 28201 |
. . . . . . . . . 10
⊢ (𝑎 ∈ ℤs
→ (𝑎
/su 1s ) = 𝑎) |
| 52 | | id 22 |
. . . . . . . . . 10
⊢ (𝑎 ∈ ℤs
→ 𝑎 ∈
ℤs) |
| 53 | 51, 52 | eqeltrd 2836 |
. . . . . . . . 9
⊢ (𝑎 ∈ ℤs
→ (𝑎
/su 1s ) ∈ ℤs) |
| 54 | 53 | orcd 873 |
. . . . . . . 8
⊢ (𝑎 ∈ ℤs
→ ((𝑎
/su 1s ) ∈ ℤs ∨ ∃𝑥 ∈ ℤs
∃𝑦 ∈
ℕs (𝑎
/su 1s ) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) |
| 55 | 54 | rgen 3053 |
. . . . . . 7
⊢
∀𝑎 ∈
ℤs ((𝑎
/su 1s ) ∈ ℤs ∨ ∃𝑥 ∈ ℤs
∃𝑦 ∈
ℕs (𝑎
/su 1s ) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) |
| 56 | | zseo 28418 |
. . . . . . . . . 10
⊢ (𝑏 ∈ ℤs
→ (∃𝑐 ∈
ℤs 𝑏 =
(2s ·s 𝑐) ∨ ∃𝑐 ∈ ℤs 𝑏 = ((2s
·s 𝑐)
+s 1s ))) |
| 57 | | oveq1 7365 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (𝑎 = 𝑐 → (𝑎 /su
(2s↑s𝑤)) = (𝑐 /su
(2s↑s𝑤))) |
| 58 | 57 | eleq1d 2821 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝑎 = 𝑐 → ((𝑎 /su
(2s↑s𝑤)) ∈ ℤs ↔ (𝑐 /su
(2s↑s𝑤)) ∈
ℤs)) |
| 59 | 57 | eqeq1d 2738 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (𝑎 = 𝑐 → ((𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)) ↔ (𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) |
| 60 | 59 | 2rexbidv 3201 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝑎 = 𝑐 → (∃𝑥 ∈ ℤs ∃𝑦 ∈ ℕs
(𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)) ↔ ∃𝑥 ∈ ℤs
∃𝑦 ∈
ℕs (𝑐
/su (2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) |
| 61 | 58, 60 | orbi12d 918 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝑎 = 𝑐 → (((𝑎 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) ↔ ((𝑐 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))))) |
| 62 | 61 | rspcv 3572 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑐 ∈ ℤs
→ (∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) → ((𝑐 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))))) |
| 63 | 62 | adantl 481 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (∀𝑎 ∈ ℤs ((𝑎 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) → ((𝑐 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))))) |
| 64 | 33 | eqeq2d 2747 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝑥 = 𝑝 → ((𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)) ↔ (𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑝) +s
1s ) /su (2s↑s𝑦)))) |
| 65 | 36 | eqeq2d 2747 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝑦 = 𝑞 → ((𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑝) +s
1s ) /su (2s↑s𝑦)) ↔ (𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑝) +s
1s ) /su (2s↑s𝑞)))) |
| 66 | 64, 65 | cbvrex2vw 3219 |
. . . . . . . . . . . . . . . . . 18
⊢
(∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)) ↔ ∃𝑝 ∈ ℤs
∃𝑞 ∈
ℕs (𝑐
/su (2s↑s𝑤)) = (((2s ·s
𝑝) +s
1s ) /su (2s↑s𝑞))) |
| 67 | 66 | orbi2i 912 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝑐 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) ↔ ((𝑐 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑝 ∈
ℤs ∃𝑞 ∈ ℕs (𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑝) +s
1s ) /su (2s↑s𝑞)))) |
| 68 | 63, 67 | imbitrdi 251 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (∀𝑎 ∈ ℤs ((𝑎 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) → ((𝑐 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑝 ∈
ℤs ∃𝑞 ∈ ℕs (𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑝) +s
1s ) /su (2s↑s𝑞))))) |
| 69 | 68 | imp 406 |
. . . . . . . . . . . . . . 15
⊢ (((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) ∧ ∀𝑎 ∈ ℤs ((𝑎 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) → ((𝑐 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑝 ∈
ℤs ∃𝑞 ∈ ℕs (𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑝) +s
1s ) /su (2s↑s𝑞)))) |
| 70 | 69 | an32s 652 |
. . . . . . . . . . . . . 14
⊢ (((𝑤 ∈ ℕ0s
∧ ∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) ∧ 𝑐 ∈ ℤs) → ((𝑐 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑝 ∈
ℤs ∃𝑞 ∈ ℕs (𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑝) +s
1s ) /su (2s↑s𝑞)))) |
| 71 | | simpl 482 |
. . . . . . . . . . . . . . . . . . . . . . . 24
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → 𝑤 ∈
ℕ0s) |
| 72 | | expsp1 28425 |
. . . . . . . . . . . . . . . . . . . . . . . 24
⊢
((2s ∈ No ∧ 𝑤 ∈ ℕ0s)
→ (2s↑s(𝑤 +s 1s )) =
((2s↑s𝑤) ·s
2s)) |
| 73 | 3, 71, 72 | sylancr 587 |
. . . . . . . . . . . . . . . . . . . . . . 23
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (2s↑s(𝑤 +s 1s )) =
((2s↑s𝑤) ·s
2s)) |
| 74 | 73 | oveq1d 7373 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → ((2s↑s(𝑤 +s 1s ))
·s 𝑐) =
(((2s↑s𝑤) ·s 2s)
·s 𝑐)) |
| 75 | | expscl 28427 |
. . . . . . . . . . . . . . . . . . . . . . . 24
⊢
((2s ∈ No ∧ 𝑤 ∈ ℕ0s)
→ (2s↑s𝑤) ∈ No
) |
| 76 | 3, 71, 75 | sylancr 587 |
. . . . . . . . . . . . . . . . . . . . . . 23
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (2s↑s𝑤) ∈ No
) |
| 77 | 3 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . 23
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → 2s ∈ No
) |
| 78 | | zno 28378 |
. . . . . . . . . . . . . . . . . . . . . . . 24
⊢ (𝑐 ∈ ℤs
→ 𝑐 ∈ No ) |
| 79 | 78 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . . . 23
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → 𝑐 ∈ No
) |
| 80 | 76, 77, 79 | mulsassd 28163 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (((2s↑s𝑤) ·s
2s) ·s 𝑐) = ((2s↑s𝑤) ·s
(2s ·s 𝑐))) |
| 81 | 74, 80 | eqtrd 2771 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → ((2s↑s(𝑤 +s 1s ))
·s 𝑐) =
((2s↑s𝑤) ·s (2s
·s 𝑐))) |
| 82 | 81 | oveq1d 7373 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (((2s↑s(𝑤 +s 1s ))
·s 𝑐)
/su (2s↑s(𝑤 +s 1s ))) =
(((2s↑s𝑤) ·s (2s
·s 𝑐))
/su (2s↑s(𝑤 +s 1s
)))) |
| 83 | | peano2n0s 28326 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ (𝑤 ∈ ℕ0s
→ (𝑤 +s
1s ) ∈ ℕ0s) |
| 84 | 83 | adantr 480 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (𝑤 +s 1s ) ∈
ℕ0s) |
| 85 | 79, 84 | pw2divscan3d 28437 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (((2s↑s(𝑤 +s 1s ))
·s 𝑐)
/su (2s↑s(𝑤 +s 1s ))) = 𝑐) |
| 86 | 77, 79 | mulscld 28131 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (2s ·s 𝑐) ∈
No ) |
| 87 | | expscl 28427 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢
((2s ∈ No ∧ (𝑤 +s 1s )
∈ ℕ0s) → (2s↑s(𝑤 +s 1s ))
∈ No ) |
| 88 | 3, 84, 87 | sylancr 587 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (2s↑s(𝑤 +s 1s )) ∈ No ) |
| 89 | | 2ne0s 28416 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢
2s ≠ 0s |
| 90 | | expsne0 28432 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢
((2s ∈ No ∧
2s ≠ 0s ∧ (𝑤 +s 1s ) ∈
ℕ0s) → (2s↑s(𝑤 +s 1s ))
≠ 0s ) |
| 91 | 3, 89, 84, 90 | mp3an12i 1467 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (2s↑s(𝑤 +s 1s )) ≠
0s ) |
| 92 | | pw2recs 28434 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ ((𝑤 +s 1s )
∈ ℕ0s → ∃𝑥 ∈ No
((2s↑s(𝑤 +s 1s ))
·s 𝑥) =
1s ) |
| 93 | 84, 92 | syl 17 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → ∃𝑥 ∈ No
((2s↑s(𝑤 +s 1s ))
·s 𝑥) =
1s ) |
| 94 | 76, 86, 88, 91, 93 | divsasswd 28199 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (((2s↑s𝑤) ·s
(2s ·s 𝑐)) /su
(2s↑s(𝑤 +s 1s ))) =
((2s↑s𝑤) ·s ((2s
·s 𝑐)
/su (2s↑s(𝑤 +s 1s
))))) |
| 95 | 82, 85, 94 | 3eqtr3rd 2780 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → ((2s↑s𝑤) ·s ((2s
·s 𝑐)
/su (2s↑s(𝑤 +s 1s )))) = 𝑐) |
| 96 | 86, 84 | pw2divscld 28435 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → ((2s ·s 𝑐) /su
(2s↑s(𝑤 +s 1s ))) ∈ No ) |
| 97 | 79, 96, 71 | pw2divmulsd 28436 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → ((𝑐 /su
(2s↑s𝑤)) = ((2s ·s
𝑐) /su
(2s↑s(𝑤 +s 1s ))) ↔
((2s↑s𝑤) ·s ((2s
·s 𝑐)
/su (2s↑s(𝑤 +s 1s )))) = 𝑐)) |
| 98 | 95, 97 | mpbird 257 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (𝑐 /su
(2s↑s𝑤)) = ((2s ·s
𝑐) /su
(2s↑s(𝑤 +s 1s
)))) |
| 99 | 98 | eqcomd 2742 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → ((2s ·s 𝑐) /su
(2s↑s(𝑤 +s 1s ))) = (𝑐 /su
(2s↑s𝑤))) |
| 100 | 99 | eleq1d 2821 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (((2s ·s 𝑐) /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ↔ (𝑐 /su
(2s↑s𝑤)) ∈
ℤs)) |
| 101 | 99 | eqeq1d 2738 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (((2s ·s 𝑐) /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)) ↔ (𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑝) +s
1s ) /su (2s↑s𝑞)))) |
| 102 | 101 | 2rexbidv 3201 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
((2s ·s 𝑐) /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)) ↔ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑝) +s
1s ) /su (2s↑s𝑞)))) |
| 103 | 100, 102 | orbi12d 918 |
. . . . . . . . . . . . . . 15
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → ((((2s ·s 𝑐) /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
((2s ·s 𝑐) /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))) ↔ ((𝑐 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑝 ∈
ℤs ∃𝑞 ∈ ℕs (𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑝) +s
1s ) /su (2s↑s𝑞))))) |
| 104 | 103 | adantlr 715 |
. . . . . . . . . . . . . 14
⊢ (((𝑤 ∈ ℕ0s
∧ ∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) ∧ 𝑐 ∈ ℤs) →
((((2s ·s 𝑐) /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
((2s ·s 𝑐) /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))) ↔ ((𝑐 /su
(2s↑s𝑤)) ∈ ℤs ∨
∃𝑝 ∈
ℤs ∃𝑞 ∈ ℕs (𝑐 /su
(2s↑s𝑤)) = (((2s ·s
𝑝) +s
1s ) /su (2s↑s𝑞))))) |
| 105 | 70, 104 | mpbird 257 |
. . . . . . . . . . . . 13
⊢ (((𝑤 ∈ ℕ0s
∧ ∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) ∧ 𝑐 ∈ ℤs) →
(((2s ·s 𝑐) /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
((2s ·s 𝑐) /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)))) |
| 106 | | oveq1 7365 |
. . . . . . . . . . . . . . 15
⊢ (𝑏 = (2s
·s 𝑐)
→ (𝑏
/su (2s↑s(𝑤 +s 1s ))) =
((2s ·s 𝑐) /su
(2s↑s(𝑤 +s 1s
)))) |
| 107 | 106 | eleq1d 2821 |
. . . . . . . . . . . . . 14
⊢ (𝑏 = (2s
·s 𝑐)
→ ((𝑏
/su (2s↑s(𝑤 +s 1s ))) ∈
ℤs ↔ ((2s ·s 𝑐) /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs)) |
| 108 | 106 | eqeq1d 2738 |
. . . . . . . . . . . . . . 15
⊢ (𝑏 = (2s
·s 𝑐)
→ ((𝑏
/su (2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)) ↔ ((2s
·s 𝑐)
/su (2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)))) |
| 109 | 108 | 2rexbidv 3201 |
. . . . . . . . . . . . . 14
⊢ (𝑏 = (2s
·s 𝑐)
→ (∃𝑝 ∈
ℤs ∃𝑞 ∈ ℕs (𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)) ↔ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
((2s ·s 𝑐) /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)))) |
| 110 | 107, 109 | orbi12d 918 |
. . . . . . . . . . . . 13
⊢ (𝑏 = (2s
·s 𝑐)
→ (((𝑏
/su (2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))) ↔ (((2s
·s 𝑐)
/su (2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
((2s ·s 𝑐) /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))))) |
| 111 | 105, 110 | syl5ibrcom 247 |
. . . . . . . . . . . 12
⊢ (((𝑤 ∈ ℕ0s
∧ ∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) ∧ 𝑐 ∈ ℤs) → (𝑏 = (2s
·s 𝑐)
→ ((𝑏
/su (2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))))) |
| 112 | 111 | rexlimdva 3137 |
. . . . . . . . . . 11
⊢ ((𝑤 ∈ ℕ0s
∧ ∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) → (∃𝑐 ∈ ℤs
𝑏 = (2s
·s 𝑐)
→ ((𝑏
/su (2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))))) |
| 113 | | oveq2 7366 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝑝 = 𝑐 → (2s ·s
𝑝) = (2s
·s 𝑐)) |
| 114 | 113 | oveq1d 7373 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑝 = 𝑐 → ((2s ·s
𝑝) +s
1s ) = ((2s ·s 𝑐) +s 1s
)) |
| 115 | 114 | oveq1d 7373 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑝 = 𝑐 → (((2s ·s
𝑝) +s
1s ) /su (2s↑s𝑞)) = (((2s
·s 𝑐)
+s 1s ) /su
(2s↑s𝑞))) |
| 116 | 115 | eqeq2d 2747 |
. . . . . . . . . . . . . . . 16
⊢ (𝑝 = 𝑐 → ((((2s
·s 𝑐)
+s 1s ) /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)) ↔ (((2s
·s 𝑐)
+s 1s ) /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑐) +s 1s )
/su (2s↑s𝑞)))) |
| 117 | | oveq2 7366 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑞 = (𝑤 +s 1s ) →
(2s↑s𝑞) = (2s↑s(𝑤 +s 1s
))) |
| 118 | 117 | oveq2d 7374 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑞 = (𝑤 +s 1s ) →
(((2s ·s 𝑐) +s 1s )
/su (2s↑s𝑞)) = (((2s ·s
𝑐) +s
1s ) /su (2s↑s(𝑤 +s 1s
)))) |
| 119 | 118 | eqeq2d 2747 |
. . . . . . . . . . . . . . . 16
⊢ (𝑞 = (𝑤 +s 1s ) →
((((2s ·s 𝑐) +s 1s )
/su (2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑐) +s 1s )
/su (2s↑s𝑞)) ↔ (((2s
·s 𝑐)
+s 1s ) /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑐) +s 1s )
/su (2s↑s(𝑤 +s 1s
))))) |
| 120 | | simpr 484 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → 𝑐 ∈ ℤs) |
| 121 | | n0p1nns 28367 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑤 ∈ ℕ0s
→ (𝑤 +s
1s ) ∈ ℕs) |
| 122 | 121 | adantr 480 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (𝑤 +s 1s ) ∈
ℕs) |
| 123 | | eqidd 2737 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → (((2s ·s 𝑐) +s 1s )
/su (2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑐) +s 1s )
/su (2s↑s(𝑤 +s 1s
)))) |
| 124 | 116, 119,
120, 122, 123 | 2rspcedvdw 3590 |
. . . . . . . . . . . . . . 15
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(((2s ·s 𝑐) +s 1s )
/su (2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))) |
| 125 | 124 | olcd 874 |
. . . . . . . . . . . . . 14
⊢ ((𝑤 ∈ ℕ0s
∧ 𝑐 ∈
ℤs) → ((((2s ·s 𝑐) +s 1s )
/su (2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(((2s ·s 𝑐) +s 1s )
/su (2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)))) |
| 126 | 125 | adantlr 715 |
. . . . . . . . . . . . 13
⊢ (((𝑤 ∈ ℕ0s
∧ ∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) ∧ 𝑐 ∈ ℤs) →
((((2s ·s 𝑐) +s 1s )
/su (2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(((2s ·s 𝑐) +s 1s )
/su (2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)))) |
| 127 | | oveq1 7365 |
. . . . . . . . . . . . . . 15
⊢ (𝑏 = ((2s
·s 𝑐)
+s 1s ) → (𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑐) +s 1s )
/su (2s↑s(𝑤 +s 1s
)))) |
| 128 | 127 | eleq1d 2821 |
. . . . . . . . . . . . . 14
⊢ (𝑏 = ((2s
·s 𝑐)
+s 1s ) → ((𝑏 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ↔ (((2s ·s 𝑐) +s 1s )
/su (2s↑s(𝑤 +s 1s ))) ∈
ℤs)) |
| 129 | 127 | eqeq1d 2738 |
. . . . . . . . . . . . . . 15
⊢ (𝑏 = ((2s
·s 𝑐)
+s 1s ) → ((𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)) ↔ (((2s
·s 𝑐)
+s 1s ) /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)))) |
| 130 | 129 | 2rexbidv 3201 |
. . . . . . . . . . . . . 14
⊢ (𝑏 = ((2s
·s 𝑐)
+s 1s ) → (∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)) ↔ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(((2s ·s 𝑐) +s 1s )
/su (2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)))) |
| 131 | 128, 130 | orbi12d 918 |
. . . . . . . . . . . . 13
⊢ (𝑏 = ((2s
·s 𝑐)
+s 1s ) → (((𝑏 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))) ↔ ((((2s
·s 𝑐)
+s 1s ) /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(((2s ·s 𝑐) +s 1s )
/su (2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))))) |
| 132 | 126, 131 | syl5ibrcom 247 |
. . . . . . . . . . . 12
⊢ (((𝑤 ∈ ℕ0s
∧ ∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) ∧ 𝑐 ∈ ℤs) → (𝑏 = ((2s
·s 𝑐)
+s 1s ) → ((𝑏 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))))) |
| 133 | 132 | rexlimdva 3137 |
. . . . . . . . . . 11
⊢ ((𝑤 ∈ ℕ0s
∧ ∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) → (∃𝑐 ∈ ℤs
𝑏 = ((2s
·s 𝑐)
+s 1s ) → ((𝑏 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))))) |
| 134 | 112, 133 | jaod 859 |
. . . . . . . . . 10
⊢ ((𝑤 ∈ ℕ0s
∧ ∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) → ((∃𝑐 ∈ ℤs
𝑏 = (2s
·s 𝑐)
∨ ∃𝑐 ∈
ℤs 𝑏 =
((2s ·s 𝑐) +s 1s )) →
((𝑏 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))))) |
| 135 | 56, 134 | syl5 34 |
. . . . . . . . 9
⊢ ((𝑤 ∈ ℕ0s
∧ ∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) → (𝑏 ∈ ℤs → ((𝑏 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))))) |
| 136 | 135 | ralrimiv 3127 |
. . . . . . . 8
⊢ ((𝑤 ∈ ℕ0s
∧ ∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) → ∀𝑏 ∈ ℤs
((𝑏 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞)))) |
| 137 | 136 | ex 412 |
. . . . . . 7
⊢ (𝑤 ∈ ℕ0s
→ (∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑤)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑤)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) → ∀𝑏 ∈ ℤs
((𝑏 /su
(2s↑s(𝑤 +s 1s ))) ∈
ℤs ∨ ∃𝑝 ∈ ℤs ∃𝑞 ∈ ℕs
(𝑏 /su
(2s↑s(𝑤 +s 1s ))) =
(((2s ·s 𝑝) +s 1s )
/su (2s↑s𝑞))))) |
| 138 | 12, 19, 42, 49, 55, 137 | n0sind 28329 |
. . . . . 6
⊢ (𝑏 ∈ ℕ0s
→ ∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑏)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑏)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) |
| 139 | | rsp 3224 |
. . . . . 6
⊢
(∀𝑎 ∈
ℤs ((𝑎
/su (2s↑s𝑏)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑏)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) → (𝑎 ∈ ℤs → ((𝑎 /su
(2s↑s𝑏)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑏)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))))) |
| 140 | 138, 139 | syl 17 |
. . . . 5
⊢ (𝑏 ∈ ℕ0s
→ (𝑎 ∈
ℤs → ((𝑎 /su
(2s↑s𝑏)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑏)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))))) |
| 141 | 140 | impcom 407 |
. . . 4
⊢ ((𝑎 ∈ ℤs
∧ 𝑏 ∈
ℕ0s) → ((𝑎 /su
(2s↑s𝑏)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑏)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) |
| 142 | | eleq1 2824 |
. . . . 5
⊢ (𝐴 = (𝑎 /su
(2s↑s𝑏)) → (𝐴 ∈ ℤs ↔ (𝑎 /su
(2s↑s𝑏)) ∈
ℤs)) |
| 143 | | eqeq1 2740 |
. . . . . 6
⊢ (𝐴 = (𝑎 /su
(2s↑s𝑏)) → (𝐴 = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)) ↔ (𝑎 /su
(2s↑s𝑏)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) |
| 144 | 143 | 2rexbidv 3201 |
. . . . 5
⊢ (𝐴 = (𝑎 /su
(2s↑s𝑏)) → (∃𝑥 ∈ ℤs ∃𝑦 ∈ ℕs
𝐴 = (((2s
·s 𝑥)
+s 1s ) /su
(2s↑s𝑦)) ↔ ∃𝑥 ∈ ℤs ∃𝑦 ∈ ℕs
(𝑎 /su
(2s↑s𝑏)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) |
| 145 | 142, 144 | orbi12d 918 |
. . . 4
⊢ (𝐴 = (𝑎 /su
(2s↑s𝑏)) → ((𝐴 ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs 𝐴 = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))) ↔ ((𝑎 /su
(2s↑s𝑏)) ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs (𝑎 /su
(2s↑s𝑏)) = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))))) |
| 146 | 141, 145 | syl5ibrcom 247 |
. . 3
⊢ ((𝑎 ∈ ℤs
∧ 𝑏 ∈
ℕ0s) → (𝐴 = (𝑎 /su
(2s↑s𝑏)) → (𝐴 ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs 𝐴 = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦))))) |
| 147 | 146 | rexlimivv 3178 |
. 2
⊢
(∃𝑎 ∈
ℤs ∃𝑏 ∈ ℕ0s 𝐴 = (𝑎 /su
(2s↑s𝑏)) → (𝐴 ∈ ℤs ∨
∃𝑥 ∈
ℤs ∃𝑦 ∈ ℕs 𝐴 = (((2s ·s
𝑥) +s
1s ) /su (2s↑s𝑦)))) |
| 148 | 1, 147 | sylbi 217 |
1
⊢ (𝐴 ∈ ℤs[1/2]
→ (𝐴 ∈
ℤs ∨ ∃𝑥 ∈ ℤs ∃𝑦 ∈ ℕs
𝐴 = (((2s
·s 𝑥)
+s 1s ) /su
(2s↑s𝑦)))) |