---

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

.....assertion..... 
1. es : EO@i'
2. i : Id@i
3. [P] : {e:E| loc(e) = i ∈ Id}  ─→ ℙ
4. ∀e@i.Dec(P[e])@i
5. WellFnd{i}(E;x,y.(x <loc y))
6. j : E@i
7. ∀k:E. ((k <loc j) ⇒ (loc(k) = i ∈ Id) ⇒ ∃e<k.P[e] ⇒ ∃e<k.e is first@ i s.t.  e.P[e])@i
8. loc(j) = i ∈ Id@i
9. ∃e<j.P[e]@i
⊢ ¬↑first(j)
BY
{ ((Unfold `existse-before` (-1))
   THEN ExRepD
   THEN D 0
   THEN Auto
   THEN Assert ¬(e <loc j)⋅
   THEN Auto
   THEN BLemma `es-first-implies`
   THEN Auto) }

---

Latex:


.....assertion..... 
1.  es  :  EO@i'
2.  i  :  Id@i
3.  [P]  :  \{e:E|  loc(e)  =  i\}    {}\mrightarrow{}  \mBbbP{}
4.  \mforall{}e@i.Dec(P[e])@i
5.  WellFnd\{i\}(E;x,y.(x  <loc  y))
6.  j  :  E@i
7.  \mforall{}k:E.  ((k  <loc  j)  {}\mRightarrow{}  (loc(k)  =  i)  {}\mRightarrow{}  \mexists{}e<k.P[e]  {}\mRightarrow{}  \mexists{}e<k.e  is  first@  i  s.t.    e.P[e])@i
8.  loc(j)  =  i@i
9.  \mexists{}e<j.P[e]@i
\mvdash{}  \mneg{}\muparrow{}first(j)


By

((Unfold  `existse-before`  (-1))
  THEN  ExRepD
  THEN  D  0
  THEN  Auto
  THEN  Assert  \mneg{}(e  <loc  j)\mcdot{}
  THEN  Auto
  THEN  BLemma  `es-first-implies`
  THEN  Auto)

---

Home Index