Step * 1 2 1 2 of Lemma nth_tl-es-before


1. es EO
2. E@i
3. : ℕ||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. ||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 THEN AutoSplit) }

1
1. es EO
2. E@i
3. : ℕ||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. ||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