MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  z12sge0 Structured version   Visualization version   GIF version

Theorem z12sge0 28851
Description: An expression for non-negative dyadic rationals. (Contributed by Scott Fenton, 8-Nov-2025.)
Assertion
Ref Expression
z12sge0 ((𝐴 ∈ No ∧ 0s ≤s 𝐴) → (𝐴 ∈ ℤs[1/2] ↔ ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s ∃𝑝 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝))))
Distinct variable group:   𝑥,𝐴,𝑦,𝑝

Proof of Theorem z12sge0
Dummy variable 𝑧 is distinct from all other variables.
StepHypRef Expression
1 simprl 783 . . . . . . 7 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑧 ∈ ℤs ∧ 𝐴 = (𝑧 /su (2s↑s𝑝)))) → 𝑧 ∈ ℤs)
2 simpllr 788 . . . . . . . . 9 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑧 ∈ ℤs ∧ 𝐴 = (𝑧 /su (2s↑s𝑝)))) → 0s ≤s 𝐴)
3 simprr 785 . . . . . . . . 9 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑧 ∈ ℤs ∧ 𝐴 = (𝑧 /su (2s↑s𝑝)))) → 𝐴 = (𝑧 /su (2s↑s𝑝)))
42, 3breqtrd 5131 . . . . . . . 8 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑧 ∈ ℤs ∧ 𝐴 = (𝑧 /su (2s↑s𝑝)))) → 0s ≤s (𝑧 /su (2s↑s𝑝)))
51znod 28751 . . . . . . . . 9 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑧 ∈ ℤs ∧ 𝐴 = (𝑧 /su (2s↑s𝑝)))) → 𝑧 ∈ No )
6 simplr 781 . . . . . . . . 9 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑧 ∈ ℤs ∧ 𝐴 = (𝑧 /su (2s↑s𝑝)))) → 𝑝 ∈ ℕ0s)
75, 6pw2ge0divsd 28814 . . . . . . . 8 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑧 ∈ ℤs ∧ 𝐴 = (𝑧 /su (2s↑s𝑝)))) → ( 0s ≤s 𝑧 ↔ 0s ≤s (𝑧 /su (2s↑s𝑝))))
84, 7mpbird 260 . . . . . . 7 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑧 ∈ ℤs ∧ 𝐴 = (𝑧 /su (2s↑s𝑝)))) → 0s ≤s 𝑧)
9 eln0zs 28768 . . . . . . 7 (𝑧 ∈ ℕ0s ↔ (𝑧 ∈ ℤs ∧ 0s ≤s 𝑧))
101, 8, 9sylanbrc 595 . . . . . 6 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑧 ∈ ℤs ∧ 𝐴 = (𝑧 /su (2s↑s𝑝)))) → 𝑧 ∈ ℕ0s)
11 simpr 490 . . . . . . . . . . . 12 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) → 𝑧 ∈ ℕ0s)
12 2nns 28786 . . . . . . . . . . . . 13 2s ∈ ℕs
13 simplr 781 . . . . . . . . . . . . 13 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) → 𝑝 ∈ ℕ0s)
14 nnexpscl 28801 . . . . . . . . . . . . 13 ((2s ∈ ℕs ∧ 𝑝 ∈ ℕ0s) → (2s↑s𝑝) ∈ ℕs)
1512, 13, 14sylancr 599 . . . . . . . . . . . 12 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) → (2s↑s𝑝) ∈ ℕs)
16 eucliddivs 28744 . . . . . . . . . . . 12 ((𝑧 ∈ ℕ0s ∧ (2s↑s𝑝) ∈ ℕs) → ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝑧 = (((2s↑s𝑝) ·s 𝑥) +s 𝑦) ∧ 𝑦 <s (2s↑s𝑝)))
1711, 15, 16syl2anc 596 . . . . . . . . . . 11 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) → ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝑧 = (((2s↑s𝑝) ·s 𝑥) +s 𝑦) ∧ 𝑦 <s (2s↑s𝑝)))
18 2no 28787 . . . . . . . . . . . . . . . . . . 19 2s ∈ No
19 simpllr 788 . . . . . . . . . . . . . . . . . . 19 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → 𝑝 ∈ ℕ0s)
20 expscl 28799 . . . . . . . . . . . . . . . . . . 19 ((2s ∈ No ∧ 𝑝 ∈ ℕ0s) → (2s↑s𝑝) ∈ No )
2118, 19, 20sylancr 599 . . . . . . . . . . . . . . . . . 18 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → (2s↑s𝑝) ∈ No )
22 simprl 783 . . . . . . . . . . . . . . . . . . 19 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → 𝑥 ∈ ℕ0s)
2322n0nod 28693 . . . . . . . . . . . . . . . . . 18 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → 𝑥 ∈ No )
24 simprr 785 . . . . . . . . . . . . . . . . . . . 20 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → 𝑦 ∈ ℕ0s)
2524n0nod 28693 . . . . . . . . . . . . . . . . . . 19 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → 𝑦 ∈ No )
2625, 19pw2divscld 28807 . . . . . . . . . . . . . . . . . 18 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → (𝑦 /su (2s↑s𝑝)) ∈ No )
2721, 23, 26addsdid 28524 . . . . . . . . . . . . . . . . 17 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → ((2s↑s𝑝) ·s (𝑥 +s (𝑦 /su (2s↑s𝑝)))) = (((2s↑s𝑝) ·s 𝑥) +s ((2s↑s𝑝) ·s (𝑦 /su (2s↑s𝑝)))))
2825, 19pw2divscan2d 28810 . . . . . . . . . . . . . . . . . 18 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → ((2s↑s𝑝) ·s (𝑦 /su (2s↑s𝑝))) = 𝑦)
2928oveq2d 7428 . . . . . . . . . . . . . . . . 17 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → (((2s↑s𝑝) ·s 𝑥) +s ((2s↑s𝑝) ·s (𝑦 /su (2s↑s𝑝)))) = (((2s↑s𝑝) ·s 𝑥) +s 𝑦))
3027, 29eqtrd 2796 . . . . . . . . . . . . . . . 16 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → ((2s↑s𝑝) ·s (𝑥 +s (𝑦 /su (2s↑s𝑝)))) = (((2s↑s𝑝) ·s 𝑥) +s 𝑦))
3130eqeq2d 2772 . . . . . . . . . . . . . . 15 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → (𝑧 = ((2s↑s𝑝) ·s (𝑥 +s (𝑦 /su (2s↑s𝑝)))) ↔ 𝑧 = (((2s↑s𝑝) ·s 𝑥) +s 𝑦)))
32 eqcom 2768 . . . . . . . . . . . . . . 15 (𝑧 = ((2s↑s𝑝) ·s (𝑥 +s (𝑦 /su (2s↑s𝑝)))) ↔ ((2s↑s𝑝) ·s (𝑥 +s (𝑦 /su (2s↑s𝑝)))) = 𝑧)
3331, 32bitr3di 289 . . . . . . . . . . . . . 14 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → (𝑧 = (((2s↑s𝑝) ·s 𝑥) +s 𝑦) ↔ ((2s↑s𝑝) ·s (𝑥 +s (𝑦 /su (2s↑s𝑝)))) = 𝑧))
34 simplr 781 . . . . . . . . . . . . . . . 16 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → 𝑧 ∈ ℕ0s)
3534n0nod 28693 . . . . . . . . . . . . . . 15 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → 𝑧 ∈ No )
3623, 26addscld 28348 . . . . . . . . . . . . . . 15 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∈ No )
3735, 36, 19pw2divmulsd 28808 . . . . . . . . . . . . . 14 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → ((𝑧 /su (2s↑s𝑝)) = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ↔ ((2s↑s𝑝) ·s (𝑥 +s (𝑦 /su (2s↑s𝑝)))) = 𝑧))
3833, 37bitr4d 285 . . . . . . . . . . . . 13 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → (𝑧 = (((2s↑s𝑝) ·s 𝑥) +s 𝑦) ↔ (𝑧 /su (2s↑s𝑝)) = (𝑥 +s (𝑦 /su (2s↑s𝑝)))))
3938anbi1d 643 . . . . . . . . . . . 12 (((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → ((𝑧 = (((2s↑s𝑝) ·s 𝑥) +s 𝑦) ∧ 𝑦 <s (2s↑s𝑝)) ↔ ((𝑧 /su (2s↑s𝑝)) = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝))))
40392rexbidva 3226 . . . . . . . . . . 11 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) → (∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝑧 = (((2s↑s𝑝) ·s 𝑥) +s 𝑦) ∧ 𝑦 <s (2s↑s𝑝)) ↔ ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s ((𝑧 /su (2s↑s𝑝)) = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝))))
4117, 40mpbid 235 . . . . . . . . . 10 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝑧 ∈ ℕ0s) → ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s ((𝑧 /su (2s↑s𝑝)) = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)))
4241adantrl 729 . . . . . . . . 9 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝐴 = (𝑧 /su (2s↑s𝑝)) ∧ 𝑧 ∈ ℕ0s)) → ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s ((𝑧 /su (2s↑s𝑝)) = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)))
43 simprl 783 . . . . . . . . . . . 12 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝐴 = (𝑧 /su (2s↑s𝑝)) ∧ 𝑧 ∈ ℕ0s)) → 𝐴 = (𝑧 /su (2s↑s𝑝)))
4443eqeq1d 2763 . . . . . . . . . . 11 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝐴 = (𝑧 /su (2s↑s𝑝)) ∧ 𝑧 ∈ ℕ0s)) → (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ↔ (𝑧 /su (2s↑s𝑝)) = (𝑥 +s (𝑦 /su (2s↑s𝑝)))))
4544anbi1d 643 . . . . . . . . . 10 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝐴 = (𝑧 /su (2s↑s𝑝)) ∧ 𝑧 ∈ ℕ0s)) → ((𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)) ↔ ((𝑧 /su (2s↑s𝑝)) = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝))))
46452rexbidv 3228 . . . . . . . . 9 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝐴 = (𝑧 /su (2s↑s𝑝)) ∧ 𝑧 ∈ ℕ0s)) → (∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)) ↔ ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s ((𝑧 /su (2s↑s𝑝)) = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝))))
4742, 46mpbird 260 . . . . . . . 8 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝐴 = (𝑧 /su (2s↑s𝑝)) ∧ 𝑧 ∈ ℕ0s)) → ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)))
4847expr 462 . . . . . . 7 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ 𝐴 = (𝑧 /su (2s↑s𝑝))) → (𝑧 ∈ ℕ0s → ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝))))
4948adantrl 729 . . . . . 6 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑧 ∈ ℤs ∧ 𝐴 = (𝑧 /su (2s↑s𝑝)))) → (𝑧 ∈ ℕ0s → ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝))))
5010, 49mpd 16 . . . . 5 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑧 ∈ ℤs ∧ 𝐴 = (𝑧 /su (2s↑s𝑝)))) → ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)))
5150rexlimdvaa 3165 . . . 4 (((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) → (∃𝑧 ∈ ℤs 𝐴 = (𝑧 /su (2s↑s𝑝)) → ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝))))
52 oveq1 7419 . . . . . . . . 9 (𝑧 = (((2s↑s𝑝) ·s 𝑥) +s 𝑦) → (𝑧 /su (2s↑s𝑝)) = ((((2s↑s𝑝) ·s 𝑥) +s 𝑦) /su (2s↑s𝑝)))
5352eqeq2d 2772 . . . . . . . 8 (𝑧 = (((2s↑s𝑝) ·s 𝑥) +s 𝑦) → ((𝑥 +s (𝑦 /su (2s↑s𝑝))) = (𝑧 /su (2s↑s𝑝)) ↔ (𝑥 +s (𝑦 /su (2s↑s𝑝))) = ((((2s↑s𝑝) ·s 𝑥) +s 𝑦) /su (2s↑s𝑝))))
54 nnn0s 28695 . . . . . . . . . . . . 13 (2s ∈ ℕs → 2s ∈ ℕ0s)
5512, 54ax-mp 5 . . . . . . . . . . . 12 2s ∈ ℕ0s
56 simplr 781 . . . . . . . . . . . 12 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → 𝑝 ∈ ℕ0s)
57 n0expscl 28800 . . . . . . . . . . . 12 ((2s ∈ ℕ0s ∧ 𝑝 ∈ ℕ0s) → (2s↑s𝑝) ∈ ℕ0s)
5855, 56, 57sylancr 599 . . . . . . . . . . 11 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → (2s↑s𝑝) ∈ ℕ0s)
59 simprl 783 . . . . . . . . . . 11 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → 𝑥 ∈ ℕ0s)
60 n0mulscl 28713 . . . . . . . . . . 11 (((2s↑s𝑝) ∈ ℕ0s ∧ 𝑥 ∈ ℕ0s) → ((2s↑s𝑝) ·s 𝑥) ∈ ℕ0s)
6158, 59, 60syl2anc 596 . . . . . . . . . 10 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → ((2s↑s𝑝) ·s 𝑥) ∈ ℕ0s)
62 simprr 785 . . . . . . . . . 10 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → 𝑦 ∈ ℕ0s)
63 n0addscl 28712 . . . . . . . . . 10 ((((2s↑s𝑝) ·s 𝑥) ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s) → (((2s↑s𝑝) ·s 𝑥) +s 𝑦) ∈ ℕ0s)
6461, 62, 63syl2anc 596 . . . . . . . . 9 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → (((2s↑s𝑝) ·s 𝑥) +s 𝑦) ∈ ℕ0s)
6564n0zsd 28758 . . . . . . . 8 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → (((2s↑s𝑝) ·s 𝑥) +s 𝑦) ∈ ℤs)
6659n0nod 28693 . . . . . . . . . . . 12 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → 𝑥 ∈ No )
6766, 56pw2divscan3d 28809 . . . . . . . . . . 11 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → (((2s↑s𝑝) ·s 𝑥) /su (2s↑s𝑝)) = 𝑥)
6867eqcomd 2767 . . . . . . . . . 10 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → 𝑥 = (((2s↑s𝑝) ·s 𝑥) /su (2s↑s𝑝)))
6968oveq1d 7427 . . . . . . . . 9 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → (𝑥 +s (𝑦 /su (2s↑s𝑝))) = ((((2s↑s𝑝) ·s 𝑥) /su (2s↑s𝑝)) +s (𝑦 /su (2s↑s𝑝))))
7018, 56, 20sylancr 599 . . . . . . . . . . 11 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → (2s↑s𝑝) ∈ No )
7170, 66mulscld 28503 . . . . . . . . . 10 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → ((2s↑s𝑝) ·s 𝑥) ∈ No )
7262n0nod 28693 . . . . . . . . . 10 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → 𝑦 ∈ No )
7371, 72, 56pw2divsdird 28816 . . . . . . . . 9 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → ((((2s↑s𝑝) ·s 𝑥) +s 𝑦) /su (2s↑s𝑝)) = ((((2s↑s𝑝) ·s 𝑥) /su (2s↑s𝑝)) +s (𝑦 /su (2s↑s𝑝))))
7469, 73eqtr4d 2799 . . . . . . . 8 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → (𝑥 +s (𝑦 /su (2s↑s𝑝))) = ((((2s↑s𝑝) ·s 𝑥) +s 𝑦) /su (2s↑s𝑝)))
7553, 65, 74rspcedvdw 3580 . . . . . . 7 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → ∃𝑧 ∈ ℤs (𝑥 +s (𝑦 /su (2s↑s𝑝))) = (𝑧 /su (2s↑s𝑝)))
76 eqeq1 2765 . . . . . . . 8 (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) → (𝐴 = (𝑧 /su (2s↑s𝑝)) ↔ (𝑥 +s (𝑦 /su (2s↑s𝑝))) = (𝑧 /su (2s↑s𝑝))))
7776rexbidv 3187 . . . . . . 7 (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) → (∃𝑧 ∈ ℤs 𝐴 = (𝑧 /su (2s↑s𝑝)) ↔ ∃𝑧 ∈ ℤs (𝑥 +s (𝑦 /su (2s↑s𝑝))) = (𝑧 /su (2s↑s𝑝))))
7875, 77syl5ibrcom 250 . . . . . 6 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) → ∃𝑧 ∈ ℤs 𝐴 = (𝑧 /su (2s↑s𝑝))))
7978adantrd 497 . . . . 5 ((((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) ∧ (𝑥 ∈ ℕ0s ∧ 𝑦 ∈ ℕ0s)) → ((𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)) → ∃𝑧 ∈ ℤs 𝐴 = (𝑧 /su (2s↑s𝑝))))
8079rexlimdvva 3220 . . . 4 (((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) → (∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)) → ∃𝑧 ∈ ℤs 𝐴 = (𝑧 /su (2s↑s𝑝))))
8151, 80impbid 215 . . 3 (((𝐴 ∈ No ∧ 0s ≤s 𝐴) ∧ 𝑝 ∈ ℕ0s) → (∃𝑧 ∈ ℤs 𝐴 = (𝑧 /su (2s↑s𝑝)) ↔ ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝))))
8281rexbidva 3185 . 2 ((𝐴 ∈ No ∧ 0s ≤s 𝐴) → (∃𝑝 ∈ ℕ0s ∃𝑧 ∈ ℤs 𝐴 = (𝑧 /su (2s↑s𝑝)) ↔ ∃𝑝 ∈ ℕ0s ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝))))
83 elz12s 28840 . . 3 (𝐴 ∈ ℤs[1/2] ↔ ∃𝑧 ∈ ℤs ∃𝑝 ∈ ℕ0s 𝐴 = (𝑧 /su (2s↑s𝑝)))
84 rexcom 3292 . . 3 (∃𝑧 ∈ ℤs ∃𝑝 ∈ ℕ0s 𝐴 = (𝑧 /su (2s↑s𝑝)) ↔ ∃𝑝 ∈ ℕ0s ∃𝑧 ∈ ℤs 𝐴 = (𝑧 /su (2s↑s𝑝)))
8583, 84bitri 278 . 2 (𝐴 ∈ ℤs[1/2] ↔ ∃𝑝 ∈ ℕ0s ∃𝑧 ∈ ℤs 𝐴 = (𝑧 /su (2s↑s𝑝)))
86 rexcom 3292 . . . 4 (∃𝑦 ∈ ℕ0s ∃𝑝 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)) ↔ ∃𝑝 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)))
8786rexbii 3110 . . 3 (∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s ∃𝑝 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)) ↔ ∃𝑥 ∈ ℕ0s ∃𝑝 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)))
88 rexcom 3292 . . 3 (∃𝑥 ∈ ℕ0s ∃𝑝 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)) ↔ ∃𝑝 ∈ ℕ0s ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)))
8987, 88bitri 278 . 2 (∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s ∃𝑝 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)) ↔ ∃𝑝 ∈ ℕ0s ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝)))
9082, 85, 893bitr4g 317 1 ((𝐴 ∈ No ∧ 0s ≤s 𝐴) → (𝐴 ∈ ℤs[1/2] ↔ ∃𝑥 ∈ ℕ0s ∃𝑦 ∈ ℕ0s ∃𝑝 ∈ ℕ0s (𝐴 = (𝑥 +s (𝑦 /su (2s↑s𝑝))) ∧ 𝑦 <s (2s↑s𝑝))))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1570   ∈ wcel 2145  ∃wrex 3087   class class class wbr 5103  (class class class)co 7412   No csur 27979   <s clts 27980   ≤s cles 28083   0s c0s 28173   +s cadds 28327   ·s cmuls 28474   /su cdivs 28555  ℕ0scn0s 28680  ℕscnns 28681  ℤsczs 28746  2sc2s 28778  ↑scexps 28780  ℤs[1/2]cz12s 28782
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7740
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-ot 4593  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6297  df-ord 6358  df-on 6359  df-lim 6360  df-suc 6361  df-iota 6487  df-fun 6533  df-fn 6534  df-f 6535  df-f1 6536  df-fo 6537  df-f1o 6538  df-fv 6539  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7867  df-1st 7990  df-2nd 7991  df-frecs 8283  df-wrecs 8314  df-recs 8363  df-rdg 8402  df-1o 8460  df-2o 8461  df-oadd 8464  df-nadd 8659  df-no 27982  df-lts 27983  df-bday 27984  df-les 28084  df-slts 28126  df-cuts 28128  df-0s 28175  df-1s 28176  df-made 28195  df-old 28196  df-left 28198  df-right 28199  df-norec 28306  df-norec2 28317  df-adds 28328  df-negs 28389  df-subs 28390  df-muls 28475  df-divs 28556  df-seqs 28652  df-n0s 28682  df-nns 28683  df-zs 28747  df-2s 28779  df-exps 28781  df-z12s 28783
This theorem is used by:  z12bdaylem  28852
  Copyright terms: Public domain W3C validator