Step
*
1
2
1
2
of Lemma
nth_tl-es-before
1. es : EO
2. e : E@i
3. n : ℕ||before(e)||@i
4. ¬↑first(e)
5. ∀n:ℕ||before(pred(e))||
     (nth_tl(n;before(pred(e))) = filter(λa.before(pred(e))[n] ≤loc a;before(pred(e))) ∈ (E List))
6. ||before(pred(e))|| ≤ n
7. n = ||before(pred(e))|| ∈ ℤ
⊢ nth_tl(0;[pred(e)])
= (filter(λa.[pred(e)][0] ≤loc a;before(pred(e))) @ if [pred(e)][0] ≤loc pred(e) then [pred(e)] else [] fi )
∈ (E List)
BY
{ (Reduce 0 THEN AutoSplit) }
1
1. es : EO
2. e : E@i
3. n : ℕ||before(e)||@i
4. ¬↑first(e)
5. ∀n:ℕ||before(pred(e))||
     (nth_tl(n;before(pred(e))) = filter(λa.before(pred(e))[n] ≤loc a;before(pred(e))) ∈ (E List))
6. ||before(pred(e))|| ≤ n
7. n = ||before(pred(e))|| ∈ ℤ
8. pred(e) ≤loc pred(e) 
⊢ [pred(e)] = (filter(λa.pred(e) ≤loc a;before(pred(e))) @ [pred(e)]) ∈ (E List)
Latex:
1.  es  :  EO
2.  e  :  E@i
3.  n  :  \mBbbN{}||before(e)||@i
4.  \mneg{}\muparrow{}first(e)
5.  \mforall{}n:\mBbbN{}||before(pred(e))||
          (nth\_tl(n;before(pred(e)))  =  filter(\mlambda{}a.before(pred(e))[n]  \mleq{}loc  a;before(pred(e))))
6.  ||before(pred(e))||  \mleq{}  n
7.  n  =  ||before(pred(e))||
\mvdash{}  nth\_tl(0;[pred(e)])
=  (filter(\mlambda{}a.[pred(e)][0]  \mleq{}loc  a;before(pred(e)))
    @  if  [pred(e)][0]  \mleq{}loc  pred(e)  then  [pred(e)]  else  []  fi  )
By
(Reduce  0  THEN  AutoSplit)
Home
Index