| Step | Hyp | Ref
| Expression |
| 1 | | bdayn0sf1o 28347 |
. . . . . . 7
⊢ ( bday ↾
ℕ0s):ℕ0s–1-1-onto→ω |
| 2 | | f1ocnvdm 7231 |
. . . . . . 7
⊢ ((( bday ↾
ℕ0s):ℕ0s–1-1-onto→ω ∧ ( bday
‘𝐴) ∈
ω) → (◡( bday ↾ ℕ0s)‘( bday ‘𝐴)) ∈
ℕ0s) |
| 3 | 1, 2 | mpan 691 |
. . . . . 6
⊢ (( bday ‘𝐴) ∈ ω → (◡( bday ↾
ℕ0s)‘( bday ‘𝐴)) ∈
ℕ0s) |
| 4 | 3 | 3ad2ant3 1136 |
. . . . 5
⊢ ((𝐴 ∈
No ∧ 0s ≤s 𝐴 ∧ ( bday
‘𝐴) ∈
ω) → (◡( bday ↾ ℕ0s)‘( bday ‘𝐴)) ∈
ℕ0s) |
| 5 | 4 | n0zsd 28367 |
. . . 4
⊢ ((𝐴 ∈
No ∧ 0s ≤s 𝐴 ∧ ( bday
‘𝐴) ∈
ω) → (◡( bday ↾ ℕ0s)‘( bday ‘𝐴)) ∈
ℤs) |
| 6 | | zzs12 28452 |
. . . 4
⊢ ((◡( bday ↾
ℕ0s)‘( bday ‘𝐴)) ∈ ℤs
→ (◡( bday
↾ ℕ0s)‘( bday
‘𝐴)) ∈
ℤs[1/2]) |
| 7 | 5, 6 | syl 17 |
. . 3
⊢ ((𝐴 ∈
No ∧ 0s ≤s 𝐴 ∧ ( bday
‘𝐴) ∈
ω) → (◡( bday ↾ ℕ0s)‘( bday ‘𝐴)) ∈
ℤs[1/2]) |
| 8 | | eleq1 2823 |
. . 3
⊢ (𝐴 = (◡( bday ↾
ℕ0s)‘( bday ‘𝐴)) → (𝐴 ∈ ℤs[1/2] ↔
(◡( bday
↾ ℕ0s)‘( bday
‘𝐴)) ∈
ℤs[1/2])) |
| 9 | 7, 8 | syl5ibrcom 247 |
. 2
⊢ ((𝐴 ∈
No ∧ 0s ≤s 𝐴 ∧ ( bday
‘𝐴) ∈
ω) → (𝐴 = (◡( bday ↾
ℕ0s)‘( bday ‘𝐴)) → 𝐴 ∈
ℤs[1/2])) |
| 10 | | n0zs 28366 |
. . . . . . . . 9
⊢ (𝑥 ∈ ℕ0s
→ 𝑥 ∈
ℤs) |
| 11 | | zzs12 28452 |
. . . . . . . . 9
⊢ (𝑥 ∈ ℤs
→ 𝑥 ∈
ℤs[1/2]) |
| 12 | 10, 11 | syl 17 |
. . . . . . . 8
⊢ (𝑥 ∈ ℕ0s
→ 𝑥 ∈
ℤs[1/2]) |
| 13 | 12 | adantr 480 |
. . . . . . 7
⊢ ((𝑥 ∈ ℕ0s
∧ 𝑦 ∈
ℕ0s) → 𝑥 ∈
ℤs[1/2]) |
| 14 | | n0zs 28366 |
. . . . . . . . 9
⊢ (𝑦 ∈ ℕ0s
→ 𝑦 ∈
ℤs) |
| 15 | | elzs12i 28450 |
. . . . . . . . 9
⊢ ((𝑦 ∈ ℤs
∧ 𝑧 ∈
ℕ0s) → (𝑦 /su
(2s↑s𝑧)) ∈
ℤs[1/2]) |
| 16 | 14, 15 | sylan 581 |
. . . . . . . 8
⊢ ((𝑦 ∈ ℕ0s
∧ 𝑧 ∈
ℕ0s) → (𝑦 /su
(2s↑s𝑧)) ∈
ℤs[1/2]) |
| 17 | 16 | adantll 715 |
. . . . . . 7
⊢ (((𝑥 ∈ ℕ0s
∧ 𝑦 ∈
ℕ0s) ∧ 𝑧 ∈ ℕ0s) → (𝑦 /su
(2s↑s𝑧)) ∈
ℤs[1/2]) |
| 18 | | zs12addscl 28454 |
. . . . . . 7
⊢ ((𝑥 ∈ ℤs[1/2]
∧ (𝑦 /su
(2s↑s𝑧)) ∈ ℤs[1/2]) →
(𝑥 +s (𝑦 /su
(2s↑s𝑧))) ∈
ℤs[1/2]) |
| 19 | 13, 17, 18 | syl2an2r 686 |
. . . . . 6
⊢ (((𝑥 ∈ ℕ0s
∧ 𝑦 ∈
ℕ0s) ∧ 𝑧 ∈ ℕ0s) → (𝑥 +s (𝑦 /su
(2s↑s𝑧))) ∈
ℤs[1/2]) |
| 20 | | eleq1 2823 |
. . . . . . 7
⊢ (𝐴 = (𝑥 +s (𝑦 /su
(2s↑s𝑧))) → (𝐴 ∈ ℤs[1/2] ↔
(𝑥 +s (𝑦 /su
(2s↑s𝑧))) ∈
ℤs[1/2])) |
| 21 | 20 | 3ad2ant1 1134 |
. . . . . 6
⊢ ((𝐴 = (𝑥 +s (𝑦 /su
(2s↑s𝑧))) ∧ 𝑦 <s (2s↑s𝑧) ∧ (𝑥 +s 𝑧) <s (◡( bday ↾
ℕ0s)‘( bday ‘𝐴))) → (𝐴 ∈ ℤs[1/2] ↔
(𝑥 +s (𝑦 /su
(2s↑s𝑧))) ∈
ℤs[1/2])) |
| 22 | 19, 21 | syl5ibrcom 247 |
. . . . 5
⊢ (((𝑥 ∈ ℕ0s
∧ 𝑦 ∈
ℕ0s) ∧ 𝑧 ∈ ℕ0s) → ((𝐴 = (𝑥 +s (𝑦 /su
(2s↑s𝑧))) ∧ 𝑦 <s (2s↑s𝑧) ∧ (𝑥 +s 𝑧) <s (◡( bday ↾
ℕ0s)‘( bday ‘𝐴))) → 𝐴 ∈
ℤs[1/2])) |
| 23 | 22 | rexlimdva 3136 |
. . . 4
⊢ ((𝑥 ∈ ℕ0s
∧ 𝑦 ∈
ℕ0s) → (∃𝑧 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su
(2s↑s𝑧))) ∧ 𝑦 <s (2s↑s𝑧) ∧ (𝑥 +s 𝑧) <s (◡( bday ↾
ℕ0s)‘( bday ‘𝐴))) → 𝐴 ∈
ℤs[1/2])) |
| 24 | 23 | rexlimivv 3177 |
. . 3
⊢
(∃𝑥 ∈
ℕ0s ∃𝑦 ∈ ℕ0s ∃𝑧 ∈ ℕ0s
(𝐴 = (𝑥 +s (𝑦 /su
(2s↑s𝑧))) ∧ 𝑦 <s (2s↑s𝑧) ∧ (𝑥 +s 𝑧) <s (◡( bday ↾
ℕ0s)‘( bday ‘𝐴))) → 𝐴 ∈
ℤs[1/2]) |
| 25 | 24 | a1i 11 |
. 2
⊢ ((𝐴 ∈
No ∧ 0s ≤s 𝐴 ∧ ( bday
‘𝐴) ∈
ω) → (∃𝑥
∈ ℕ0s ∃𝑦 ∈ ℕ0s ∃𝑧 ∈ ℕ0s
(𝐴 = (𝑥 +s (𝑦 /su
(2s↑s𝑧))) ∧ 𝑦 <s (2s↑s𝑧) ∧ (𝑥 +s 𝑧) <s (◡( bday ↾
ℕ0s)‘( bday ‘𝐴))) → 𝐴 ∈
ℤs[1/2])) |
| 26 | | simp1 1137 |
. . 3
⊢ ((𝐴 ∈
No ∧ 0s ≤s 𝐴 ∧ ( bday
‘𝐴) ∈
ω) → 𝐴 ∈
No ) |
| 27 | 4 | fvresd 6853 |
. . . . 5
⊢ ((𝐴 ∈
No ∧ 0s ≤s 𝐴 ∧ ( bday
‘𝐴) ∈
ω) → (( bday ↾
ℕ0s)‘(◡( bday ↾ ℕ0s)‘( bday ‘𝐴))) = ( bday
‘(◡(
bday ↾ ℕ0s)‘( bday
‘𝐴)))) |
| 28 | | f1ocnvfv2 7223 |
. . . . . . 7
⊢ ((( bday ↾
ℕ0s):ℕ0s–1-1-onto→ω ∧ ( bday
‘𝐴) ∈
ω) → (( bday ↾
ℕ0s)‘(◡( bday ↾ ℕ0s)‘( bday ‘𝐴))) = ( bday
‘𝐴)) |
| 29 | 1, 28 | mpan 691 |
. . . . . 6
⊢ (( bday ‘𝐴) ∈ ω → (( bday ↾ ℕ0s)‘(◡( bday ↾
ℕ0s)‘( bday ‘𝐴))) = (
bday ‘𝐴)) |
| 30 | 29 | 3ad2ant3 1136 |
. . . . 5
⊢ ((𝐴 ∈
No ∧ 0s ≤s 𝐴 ∧ ( bday
‘𝐴) ∈
ω) → (( bday ↾
ℕ0s)‘(◡( bday ↾ ℕ0s)‘( bday ‘𝐴))) = ( bday
‘𝐴)) |
| 31 | 27, 30 | eqtr3d 2772 |
. . . 4
⊢ ((𝐴 ∈
No ∧ 0s ≤s 𝐴 ∧ ( bday
‘𝐴) ∈
ω) → ( bday ‘(◡( bday ↾
ℕ0s)‘( bday ‘𝐴))) = (
bday ‘𝐴)) |
| 32 | 31 | eqimsscd 3990 |
. . 3
⊢ ((𝐴 ∈
No ∧ 0s ≤s 𝐴 ∧ ( bday
‘𝐴) ∈
ω) → ( bday ‘𝐴) ⊆ ( bday
‘(◡(
bday ↾ ℕ0s)‘( bday
‘𝐴)))) |
| 33 | | simp2 1138 |
. . 3
⊢ ((𝐴 ∈
No ∧ 0s ≤s 𝐴 ∧ ( bday
‘𝐴) ∈
ω) → 0s ≤s 𝐴) |
| 34 | 4, 26, 32, 33 | bdayfinbnd 28446 |
. 2
⊢ ((𝐴 ∈
No ∧ 0s ≤s 𝐴 ∧ ( bday
‘𝐴) ∈
ω) → (𝐴 = (◡( bday ↾
ℕ0s)‘( bday ‘𝐴)) ∨ ∃𝑥 ∈ ℕ0s
∃𝑦 ∈
ℕ0s ∃𝑧 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su
(2s↑s𝑧))) ∧ 𝑦 <s (2s↑s𝑧) ∧ (𝑥 +s 𝑧) <s (◡( bday ↾
ℕ0s)‘( bday ‘𝐴))))) |
| 35 | 9, 25, 34 | mpjaod 861 |
1
⊢ ((𝐴 ∈
No ∧ 0s ≤s 𝐴 ∧ ( bday
‘𝐴) ∈
ω) → 𝐴 ∈
ℤs[1/2]) |