Step
*
1
2
1
1
1
of Lemma
sum-of-three-cubes-iff-2
1. k : ℕ
2. a : ℤ
3. b : ℤ
4. c : ℤ
5. 0 ≤ (a + b)
6. ((a * a * a) + (b * b * b) + (c * c * c)) = k ∈ ℤ
7. d : ℕ
8. (a + b) = d ∈ ℤ
9. ¬(d = 0 ∈ ℤ)
10. (k - c * c * c rem d) = 0 ∈ ℤ
11. ((a * a) + ((b * b) - a * b)) = ((k - c * c * c) ÷ d) ∈ ℤ
12. ¬(d = 0 ∈ ℤ)
13. (k - c * c * c rem d) = 0 ∈ ℤ
⊢ ∃n:ℕ. (((4 * ((k - c * c * c) ÷ d)) - d * d) = (3 * n * n) ∈ ℤ)
BY
{ ((RWO "three-cubes-lemma<" 0 THENW Auto) THEN InstConcl [⌜a⌝;⌜b⌝]⋅ THEN Auto) }
Latex:
Latex:
1.  k  :  \mBbbN{}
2.  a  :  \mBbbZ{}
3.  b  :  \mBbbZ{}
4.  c  :  \mBbbZ{}
5.  0  \mleq{}  (a  +  b)
6.  ((a  *  a  *  a)  +  (b  *  b  *  b)  +  (c  *  c  *  c))  =  k
7.  d  :  \mBbbN{}
8.  (a  +  b)  =  d
9.  \mneg{}(d  =  0)
10.  (k  -  c  *  c  *  c  rem  d)  =  0
11.  ((a  *  a)  +  ((b  *  b)  -  a  *  b))  =  ((k  -  c  *  c  *  c)  \mdiv{}  d)
12.  \mneg{}(d  =  0)
13.  (k  -  c  *  c  *  c  rem  d)  =  0
\mvdash{}  \mexists{}n:\mBbbN{}.  (((4  *  ((k  -  c  *  c  *  c)  \mdiv{}  d))  -  d  *  d)  =  (3  *  n  *  n))
By
Latex:
((RWO  "three-cubes-lemma<"  0  THENW  Auto)  THEN  InstConcl  [\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{}]\mcdot{}  THEN  Auto)
Home
Index