---

Step * 1 1 1 1 2 1 of Lemma genfact-unbounded

.....assertion..... 
1. f : ℕ+ ⟶ ℤ
2. ∀m:ℕ+. 1 < f[m]
3. b : ℕ+
4. N : ℤ
5. [n] : ℕ
6. ∀[m:ℕn]. ∀k:ℕ. ∀x:{x:ℤ| x = genfact(k;b;m.f[m]) ∈ ℤ} .  ∃n:ℕ [(N ≤ genfact(n;b;m.f[m]))] supposing N ≤ (x + m)
7. k : ℕ
8. x : {x:ℤ| x = genfact(k;b;m.f[m]) ∈ ℤ} 
9. N ≤ (x + n)
10. ¬(N ≤ x)
11. k' : ℤ
12. k' = (k + 1) ∈ ℤ
13. z : ℤ
14. z = f[k'] ∈ ℤ
15. x' : ℤ
16. x' = (z * x) ∈ ℤ
17. x' = genfact(k';b;m.f[m]) ∈ ℤ
⊢ x ∈ ℕ+
BY
{ (DSetVars THEN HypSubst' 9 0 THEN MoveToConcl 2 THEN All Thin THEN Auto) }

1
1. f : ℕ+ ⟶ ℤ
2. b : ℕ+
3. k : ℕ
4. ∀m:ℕ+. 1 < f[m]
⊢ genfact(k;b;m.f[m]) ∈ ℕ+

---

Latex:

---

Latex:
.....assertion..... 
1.  f  :  \mBbbN{}\msupplus{}  {}\mrightarrow{}  \mBbbZ{}
2.  \mforall{}m:\mBbbN{}\msupplus{}.  1  <  f[m]
3.  b  :  \mBbbN{}\msupplus{}
4.  N  :  \mBbbZ{}
5.  [n]  :  \mBbbN{}
6.  \mforall{}[m:\mBbbN{}n]
          \mforall{}k:\mBbbN{}.  \mforall{}x:\{x:\mBbbZ{}|  x  =  genfact(k;b;m.f[m])\}  .
              \mexists{}n:\mBbbN{}  [(N  \mleq{}  genfact(n;b;m.f[m]))]  supposing  N  \mleq{}  (x  +  m)
7.  k  :  \mBbbN{}
8.  x  :  \{x:\mBbbZ{}|  x  =  genfact(k;b;m.f[m])\} 
9.  N  \mleq{}  (x  +  n)
10.  \mneg{}(N  \mleq{}  x)
11.  k'  :  \mBbbZ{}
12.  k'  =  (k  +  1)
13.  z  :  \mBbbZ{}
14.  z  =  f[k']
15.  x'  :  \mBbbZ{}
16.  x'  =  (z  *  x)
17.  x'  =  genfact(k';b;m.f[m])
\mvdash{}  x  \mmember{}  \mBbbN{}\msupplus{}


By

---

Latex:
(DSetVars  THEN  HypSubst'  9  0  THEN  MoveToConcl  2  THEN  All  Thin  THEN  Auto)

---

Home Index