Step
*
of Lemma
equipollent-int_upper-nat
∀k:ℤ. {k...} ~ ℕ
BY
{ (Auto THEN With ⌜λx.(x - k)⌝ (D 0)⋅ THEN Auto THEN RepeatFor 2 (D 0) THEN Reduce 0 THEN Auto) }
1
1. k : ℤ@i
2. b : ℕ@i
⊢ ∃a:{k...}. ((a - k) = b ∈ ℕ)
Latex:
Latex:
\mforall{}k:\mBbbZ{}.  \{k...\}  \msim{}  \mBbbN{}
By
Latex:
(Auto  THEN  With  \mkleeneopen{}\mlambda{}x.(x  -  k)\mkleeneclose{}  (D  0)\mcdot{}  THEN  Auto  THEN  RepeatFor  2  (D  0)  THEN  Reduce  0  THEN  Auto)
Home
Index