---

Step * 2 1 2 2 1 of Lemma fact-greater-exp


1. ∀k:ℕ+. ∀m:ℕ.  (((k - 1)! * k^m * (m + k)) ≤ (m + k)!)
2. k : ℕ
3. n : ℕ
4. ¬(k = 0 ∈ ℤ)
5. m : ℕ
6. n * k^k < m + k
7. ((k - 1)! * k^m * (m + k)) ≤ (m + k)!
⊢ n * k^(m + k) < (m + k)!
BY
{ xxx(InstLemma `mul_preserves_le` [⌜1⌝;⌜(k - 1)!⌝;⌜k^m * (m + k)⌝]⋅ THEN Auto')xxx }

1
1. ∀k:ℕ+. ∀m:ℕ.  (((k - 1)! * k^m * (m + k)) ≤ (m + k)!)
2. k : ℕ
3. n : ℕ
4. ¬(k = 0 ∈ ℤ)
5. m : ℕ
6. n * k^k < m + k
7. ((k - 1)! * k^m * (m + k)) ≤ (m + k)!
8. ((k^m * (m + k)) * 1) ≤ ((k^m * (m + k)) * (k - 1)!)
⊢ n * k^(m + k) < (m + k)!

---

Latex:

---

Latex:

1.  \mforall{}k:\mBbbN{}\msupplus{}.  \mforall{}m:\mBbbN{}.    (((k  -  1)!  *  k\^{}m  *  (m  +  k))  \mleq{}  (m  +  k)!)
2.  k  :  \mBbbN{}
3.  n  :  \mBbbN{}
4.  \mneg{}(k  =  0)
5.  m  :  \mBbbN{}
6.  n  *  k\^{}k  <  m  +  k
7.  ((k  -  1)!  *  k\^{}m  *  (m  +  k))  \mleq{}  (m  +  k)!
\mvdash{}  n  *  k\^{}(m  +  k)  <  (m  +  k)!


By

---

Latex:
xxx(InstLemma  `mul\_preserves\_le`  [\mkleeneopen{}1\mkleeneclose{};\mkleeneopen{}(k  -  1)!\mkleeneclose{};\mkleeneopen{}k\^{}m  *  (m  +  k)\mkleeneclose{}]\mcdot{}  THEN  Auto')xxx

---

Home Index