Step
*
2
3
1
1
2
2
1
of Lemma
proper-divisor_wf
.....assertion..... 
1. n : ℕ+
2. m : ℕ
3. m^4 ≤ n
4. n < (m + 1)^4
5. 2 < m
⊢ (m + 1) * (m + 1) < m^4
BY
{ (RepUR ``exp`` 0 THEN RepeatFor 3 ((xxx(RWO "primrec-unroll" 0 THENM Reduce 0)xxx THENA Auto)) THEN Auto) }
1
1. n : ℕ+
2. m : ℕ
3. m^4 ≤ n
4. n < (m + 1)^4
5. 2 < m
⊢ (m + 1) * (m + 1) < m * m * m * m * 1
Latex:
Latex:
.....assertion..... 
1.  n  :  \mBbbN{}\msupplus{}
2.  m  :  \mBbbN{}
3.  m\^{}4  \mleq{}  n
4.  n  <  (m  +  1)\^{}4
5.  2  <  m
\mvdash{}  (m  +  1)  *  (m  +  1)  <  m\^{}4
By
Latex:
(RepUR  ``exp``  0
  THEN  RepeatFor  3  ((xxx(RWO  "primrec-unroll"  0  THENM  Reduce  0)xxx  THENA  Auto))
  THEN  Auto)
Home
Index