---

Step * 1 2 1 of Lemma member-prior-run-events


1. M : Type ─→ Type
2. r : pRunType(P.M[P])@i
3. t : ℕ@i
4. e1 : ℕ@i
5. e2 : Id@i
6. ↑is-run-event(r;fst(<e1, e2>);snd(<e1, e2>))@i
7. y : ℕt
8. (y ∈ upto(t))
9. ↑isl(fst((r y)))
10. <e1, e2> = <y, fst(snd(outl(fst((r y)))))> ∈ (ℕ × Id)
11. ↑is-run-event(r;fst(<e1, e2>);snd(<e1, e2>))
⊢ e1 < t
BY
{ (AutoSimpHyp Auto (-2)⋅ THEN Auto') }

---

Latex:

---

Latex:

1.  M  :  Type  {}\mrightarrow{}  Type
2.  r  :  pRunType(P.M[P])@i
3.  t  :  \mBbbN{}@i
4.  e1  :  \mBbbN{}@i
5.  e2  :  Id@i
6.  \muparrow{}is-run-event(r;fst(<e1,  e2>);snd(<e1,  e2>))@i
7.  y  :  \mBbbN{}t
8.  (y  \mmember{}  upto(t))
9.  \muparrow{}isl(fst((r  y)))
10.  <e1,  e2>  =  <y,  fst(snd(outl(fst((r  y)))))>
11.  \muparrow{}is-run-event(r;fst(<e1,  e2>);snd(<e1,  e2>))
\mvdash{}  e1  <  t


By

---

Latex:
(AutoSimpHyp  Auto  (-2)\mcdot{}  THEN  Auto')

---

Home Index