---

Step * 1 2 1 of Lemma es-interval-less

.....subterm..... T:t
2:n
1. es : EO
2. e : E
3. e' : E
4. (e <loc e')
5. ¬↑first(e')
⊢ filter(λev.e ≤loc ev;[e']) = [e'] ∈ (E List)
BY
{ (RWO "filter_trivial" 0 THEN Auto THEN (Try (Unfold `so_apply` 0) THEN Reduce 0 THEN Auto)⋅) }

---

Latex:


.....subterm.....  T:t
2:n
1.  es  :  EO
2.  e  :  E
3.  e'  :  E
4.  (e  <loc  e')
5.  \mneg{}\muparrow{}first(e')
\mvdash{}  filter(\mlambda{}ev.e  \mleq{}loc  ev;[e'])  =  [e']


By

(RWO  "filter\_trivial"  0  THEN  Auto  THEN  (Try  (Unfold  `so\_apply`  0)  THEN  Reduce  0  THEN  Auto)\mcdot{})

---

Home Index