Step
*
1
2
of Lemma
polyvar-val
1. n : ℕ+
2. v : ℤ
3. l : {l:ℤ List| ||l|| = 1 ∈ ℤ} 
4. ¬(v = 0 ∈ ℤ)
⊢ l@if (v) < (0)  then []  else if (0) < (v)  then []  else eval v' = v - 1 in eval a = polyvar(0;v') in   [a]
= if 0 ≤z v ∧b v <z 1 then l[v] else 0 fi 
∈ ℤ
BY
{ (RepeatFor 2 (DVar `l') THEN All Reduce THEN Auto) }
Latex:
Latex:
1.  n  :  \mBbbN{}\msupplus{}
2.  v  :  \mBbbZ{}
3.  l  :  \{l:\mBbbZ{}  List|  ||l||  =  1\} 
4.  \mneg{}(v  =  0)
\mvdash{}  l@if  (v)  <  (0)
              then  []
              else  if  (0)  <  (v)    then  []    else  eval  v'  =  v  -  1  in  eval  a  =  polyvar(0;v')  in      [a]
=  if  0  \mleq{}z  v  \mwedge{}\msubb{}  v  <z  1  then  l[v]  else  0  fi 
By
Latex:
(RepeatFor  2  (DVar  `l')  THEN  All  Reduce  THEN  Auto)
Home
Index