---

Step * 2 3 1 1 2 1 of Lemma proper-divisor_wf


1. n : ℕ+
2. m : ℕ
3. m^4 ≤ n
4. n < (m + 1)^4
5. 2 < m
⊢ n < ((m + 1) * (m + 1)) * (m + 1) * (m + 1)
BY
{ (NthHypSq (-2)
   THEN EqCD
   THEN Auto
   THEN RepUR ``exp`` 0
   THEN RepeatFor 3 ((xxx(RWO "primrec-unroll" 0 THENM Reduce 0)xxx THENA Auto))
   THEN Auto') }

---

Latex:

---

Latex:

1.  n  :  \mBbbN{}\msupplus{}
2.  m  :  \mBbbN{}
3.  m\^{}4  \mleq{}  n
4.  n  <  (m  +  1)\^{}4
5.  2  <  m
\mvdash{}  n  <  ((m  +  1)  *  (m  +  1))  *  (m  +  1)  *  (m  +  1)


By

---

Latex:
(NthHypSq  (-2)
  THEN  EqCD
  THEN  Auto
  THEN  RepUR  ``exp``  0
  THEN  RepeatFor  3  ((xxx(RWO  "primrec-unroll"  0  THENM  Reduce  0)xxx  THENA  Auto))
  THEN  Auto')

---

Home Index