Step
*
2
of Lemma
polyconst-val
1. n : ℤ
2. 0 < n
3. ∀[l:{l:ℤ List| ||l|| = (n - 1) ∈ ℤ} ]. ∀[k:ℤ].  (polyconst(n - 1;k)@l ~ k)
4. u : ℤ
5. v : ℤ List
6. ||[u / v]|| = n ∈ ℤ
7. k : ℤ
⊢ if n=0  then k  else if k=0  then []  else [polyconst(n - 1;k)]@[u / v] ~ k
BY
{ ((Decide ⌜n = 0 ∈ ℤ⌝⋅ THEN Reduce 0 THEN Auto) THEN Decide ⌜k = 0 ∈ ℤ⌝⋅ THEN Reduce 0 THEN Auto) }
1
1. n : ℤ
2. 0 < n
3. ∀[l:{l:ℤ List| ||l|| = (n - 1) ∈ ℤ} ]. ∀[k:ℤ].  (polyconst(n - 1;k)@l ~ k)
4. u : ℤ
5. v : ℤ List
6. ||[u / v]|| = n ∈ ℤ
7. k : ℤ
8. ¬(n = 0 ∈ ℤ)
9. ¬(k = 0 ∈ ℤ)
⊢ [polyconst(n - 1;k)]@[u / v] = k ∈ ℤ
Latex:
Latex:
1.  n  :  \mBbbZ{}
2.  0  <  n
3.  \mforall{}[l:\{l:\mBbbZ{}  List|  ||l||  =  (n  -  1)\}  ].  \mforall{}[k:\mBbbZ{}].    (polyconst(n  -  1;k)@l  \msim{}  k)
4.  u  :  \mBbbZ{}
5.  v  :  \mBbbZ{}  List
6.  ||[u  /  v]||  =  n
7.  k  :  \mBbbZ{}
\mvdash{}  if  n=0    then  k    else  if  k=0    then  []    else  [polyconst(n  -  1;k)]@[u  /  v]  \msim{}  k
By
Latex:
((Decide  \mkleeneopen{}n  =  0\mkleeneclose{}\mcdot{}  THEN  Reduce  0  THEN  Auto)  THEN  Decide  \mkleeneopen{}k  =  0\mkleeneclose{}\mcdot{}  THEN  Reduce  0  THEN  Auto)
Home
Index