Step
*
2
1
3
2
2
1
of Lemma
tl-lastn
.....falsecase..... 
1. u : Top
2. v : Top List
3. ∀[n:ℤ]. (tl(lastn(n;v)) ~ if n <z ||v|| then lastn(n - 1;v) else lastn(n;tl(v)) fi )
4. n : ℤ
5. 0 < (||v|| + 1) - n
6. n < ||v|| + 1
7. 0 < (||v|| + 1) - n - 1
8. tl(lastn(n;v)) ~ if n <z ||v|| then lastn(n - 1;v) else lastn(n;tl(v)) fi 
9. ||v|| ≤ n
10. 0 < ||tl(v)|| - n
⊢ tl(v) ~ nth_tl(||tl(v)|| - n - 1;tl(tl(v)))
BY
{ (DVar `v' THEN All Reduce THEN Auto') }
Latex:
Latex:
.....falsecase..... 
1.  u  :  Top
2.  v  :  Top  List
3.  \mforall{}[n:\mBbbZ{}].  (tl(lastn(n;v))  \msim{}  if  n  <z  ||v||  then  lastn(n  -  1;v)  else  lastn(n;tl(v))  fi  )
4.  n  :  \mBbbZ{}
5.  0  <  (||v||  +  1)  -  n
6.  n  <  ||v||  +  1
7.  0  <  (||v||  +  1)  -  n  -  1
8.  tl(lastn(n;v))  \msim{}  if  n  <z  ||v||  then  lastn(n  -  1;v)  else  lastn(n;tl(v))  fi 
9.  ||v||  \mleq{}  n
10.  0  <  ||tl(v)||  -  n
\mvdash{}  tl(v)  \msim{}  nth\_tl(||tl(v)||  -  n  -  1;tl(tl(v)))
By
Latex:
(DVar  `v'  THEN  All  Reduce  THEN  Auto')
Home
Index