| Step | Hyp | Ref
| Expression |
| 1 | | bdayn0sf1o 28756 |
. . . . . . 7
⊢ (bday ↾
ℕ0s):ℕ0s–1-1-onto→ω |
| 2 | | f1ocnvdm 7293 |
. . . . . . 7
⊢ (((bday ↾
ℕ0s):ℕ0s–1-1-onto→ω ∧ (bday‘𝐴) ∈ ω) → (◡(bday ↾
ℕ0s)‘(bday‘𝐴)) ∈
ℕ0s) |
| 3 | 1, 2 | mpan 703 |
. . . . . 6
⊢ ((bday‘𝐴) ∈ ω → (◡(bday ↾
ℕ0s)‘(bday‘𝐴)) ∈
ℕ0s) |
| 4 | 3 | 3ad2ant3 1153 |
. . . . 5
⊢ ((𝐴 ∈ No ∧ 0s ≤s 𝐴 ∧ (bday‘𝐴) ∈ ω) → (◡(bday ↾
ℕ0s)‘(bday‘𝐴)) ∈
ℕ0s) |
| 5 | 4 | n0zsd 28776 |
. . . 4
⊢ ((𝐴 ∈ No ∧ 0s ≤s 𝐴 ∧ (bday‘𝐴) ∈ ω) → (◡(bday ↾
ℕ0s)‘(bday‘𝐴)) ∈
ℤs) |
| 6 | | zz12s 28861 |
. . . 4
⊢ ((◡(bday ↾
ℕ0s)‘(bday‘𝐴)) ∈ ℤs
→ (◡(bday ↾ ℕ0s)‘(bday‘𝐴)) ∈
ℤs[1/2]) |
| 7 | 5, 6 | syl 18 |
. . 3
⊢ ((𝐴 ∈ No ∧ 0s ≤s 𝐴 ∧ (bday‘𝐴) ∈ ω) → (◡(bday ↾
ℕ0s)‘(bday‘𝐴)) ∈
ℤs[1/2]) |
| 8 | | eleq1 2848 |
. . 3
⊢ (𝐴 = (◡(bday ↾
ℕ0s)‘(bday‘𝐴)) → (𝐴 ∈ ℤs[1/2] ↔
(◡(bday
↾ ℕ0s)‘(bday‘𝐴)) ∈
ℤs[1/2])) |
| 9 | 7, 8 | syl5ibrcom 250 |
. 2
⊢ ((𝐴 ∈ No ∧ 0s ≤s 𝐴 ∧ (bday‘𝐴) ∈ ω) → (𝐴 = (◡(bday ↾
ℕ0s)‘(bday‘𝐴)) → 𝐴 ∈
ℤs[1/2])) |
| 10 | | n0zs 28775 |
. . . . . . . . 9
⊢ (𝑥 ∈ ℕ0s
→ 𝑥 ∈
ℤs) |
| 11 | | zz12s 28861 |
. . . . . . . . 9
⊢ (𝑥 ∈ ℤs
→ 𝑥 ∈
ℤs[1/2]) |
| 12 | 10, 11 | syl 18 |
. . . . . . . 8
⊢ (𝑥 ∈ ℕ0s
→ 𝑥 ∈
ℤs[1/2]) |
| 13 | 12 | adantr 486 |
. . . . . . 7
⊢ ((𝑥 ∈ ℕ0s
∧ 𝑦 ∈
ℕ0s) → 𝑥 ∈
ℤs[1/2]) |
| 14 | | n0zs 28775 |
. . . . . . . . 9
⊢ (𝑦 ∈ ℕ0s
→ 𝑦 ∈
ℤs) |
| 15 | | elz12si 28859 |
. . . . . . . . 9
⊢ ((𝑦 ∈ ℤs
∧ 𝑧 ∈
ℕ0s) → (𝑦 /su
(2s↑s𝑧)) ∈
ℤs[1/2]) |
| 16 | 14, 15 | sylan 592 |
. . . . . . . 8
⊢ ((𝑦 ∈ ℕ0s
∧ 𝑧 ∈
ℕ0s) → (𝑦 /su
(2s↑s𝑧)) ∈
ℤs[1/2]) |
| 17 | 16 | adantll 727 |
. . . . . . 7
⊢ (((𝑥 ∈ ℕ0s
∧ 𝑦 ∈
ℕ0s) ∧ 𝑧 ∈ ℕ0s) → (𝑦 /su
(2s↑s𝑧)) ∈
ℤs[1/2]) |
| 18 | | z12addscl 28863 |
. . . . . . 7
⊢ ((𝑥 ∈ ℤs[1/2]
∧ (𝑦 /su
(2s↑s𝑧)) ∈ ℤs[1/2]) →
(𝑥 +s (𝑦 /su
(2s↑s𝑧))) ∈
ℤs[1/2]) |
| 19 | 13, 17, 18 | syl2an2r 698 |
. . . . . 6
⊢ (((𝑥 ∈ ℕ0s
∧ 𝑦 ∈
ℕ0s) ∧ 𝑧 ∈ ℕ0s) → (𝑥 +s (𝑦 /su
(2s↑s𝑧))) ∈
ℤs[1/2]) |
| 20 | | eleq1 2848 |
. . . . . . 7
⊢ (𝐴 = (𝑥 +s (𝑦 /su
(2s↑s𝑧))) → (𝐴 ∈ ℤs[1/2] ↔
(𝑥 +s (𝑦 /su
(2s↑s𝑧))) ∈
ℤs[1/2])) |
| 21 | 20 | 3ad2ant1 1151 |
. . . . . 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 250 |
. . . . 5
⊢ (((𝑥 ∈ ℕ0s
∧ 𝑦 ∈
ℕ0s) ∧ 𝑧 ∈ ℕ0s) → ((𝐴 = (𝑥 +s (𝑦 /su
(2s↑s𝑧))) ∧ 𝑦 <s (2s↑s𝑧) ∧ (𝑥 +s 𝑧) <s (◡(bday ↾
ℕ0s)‘(bday‘𝐴))) → 𝐴 ∈
ℤs[1/2])) |
| 23 | 22 | rexlimdva 3163 |
. . . 4
⊢ ((𝑥 ∈ ℕ0s
∧ 𝑦 ∈
ℕ0s) → (∃𝑧 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su
(2s↑s𝑧))) ∧ 𝑦 <s (2s↑s𝑧) ∧ (𝑥 +s 𝑧) <s (◡(bday ↾
ℕ0s)‘(bday‘𝐴))) → 𝐴 ∈
ℤs[1/2])) |
| 24 | 23 | rexlimivv 3204 |
. . 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 1154 |
. . 3
⊢ ((𝐴 ∈ No ∧ 0s ≤s 𝐴 ∧ (bday‘𝐴) ∈ ω) → 𝐴 ∈ No) |
| 27 | 4 | fvresd 6905 |
. . . . 5
⊢ ((𝐴 ∈ No ∧ 0s ≤s 𝐴 ∧ (bday‘𝐴) ∈ ω) → ((bday ↾ ℕ0s)‘(◡(bday ↾
ℕ0s)‘(bday‘𝐴))) = (bday‘(◡(bday ↾
ℕ0s)‘(bday‘𝐴)))) |
| 28 | | f1ocnvfv2 7285 |
. . . . . . 7
⊢ (((bday ↾
ℕ0s):ℕ0s–1-1-onto→ω ∧ (bday‘𝐴) ∈ ω) → ((bday ↾ ℕ0s)‘(◡(bday ↾
ℕ0s)‘(bday‘𝐴))) = (bday‘𝐴)) |
| 29 | 1, 28 | mpan 703 |
. . . . . 6
⊢ ((bday‘𝐴) ∈ ω → ((bday ↾ ℕ0s)‘(◡(bday ↾
ℕ0s)‘(bday‘𝐴))) = (bday‘𝐴)) |
| 30 | 29 | 3ad2ant3 1153 |
. . . . 5
⊢ ((𝐴 ∈ No ∧ 0s ≤s 𝐴 ∧ (bday‘𝐴) ∈ ω) → ((bday ↾ ℕ0s)‘(◡(bday ↾
ℕ0s)‘(bday‘𝐴))) = (bday‘𝐴)) |
| 31 | 27, 30 | eqtr3d 2797 |
. . . 4
⊢ ((𝐴 ∈ No ∧ 0s ≤s 𝐴 ∧ (bday‘𝐴) ∈ ω) → (bday‘(◡(bday ↾
ℕ0s)‘(bday‘𝐴))) = (bday‘𝐴)) |
| 32 | 31 | eqimsscd 3965 |
. . 3
⊢ ((𝐴 ∈ No ∧ 0s ≤s 𝐴 ∧ (bday‘𝐴) ∈ ω) → (bday‘𝐴) ⊆ (bday‘(◡(bday ↾
ℕ0s)‘(bday‘𝐴)))) |
| 33 | | simp2 1155 |
. . 3
⊢ ((𝐴 ∈ No ∧ 0s ≤s 𝐴 ∧ (bday‘𝐴) ∈ ω) → 0s ≤s
𝐴) |
| 34 | 4, 26, 32, 33 | bdayfinbnd 28855 |
. 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 874 |
1
⊢ ((𝐴 ∈ No ∧ 0s ≤s 𝐴 ∧ (bday‘𝐴) ∈ ω) → 𝐴 ∈
ℤs[1/2]) |