---

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

.....subterm..... T:t
2:n
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;e1;e2)@i
7. e1 < t@i
8. (e1 ∈ upto(t))
9. ↑isl(fst((r e1)))
⊢ e2 = (fst(snd(outl(fst((r e1)))))) ∈ Id
BY
{ (MoveToConcl (-4)
   THEN MoveToConcl (-1)
   THEN RepUR ``is-run-event`` 0
   THEN GenConclAtAddr [1;1;1;1]
   THEN (D -2 THEN D -3)
   THEN Reduce 0
   THEN Try (Complete (Auto))
   THEN RepeatFor 2 (D -3)
   THEN Reduce 0
   THEN RW assert_pushdownC 0
   THEN Auto) }

---

Latex:

---

Latex:
.....subterm.....  T:t
2:n
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;e1;e2)@i
7.  e1  <  t@i
8.  (e1  \mmember{}  upto(t))
9.  \muparrow{}isl(fst((r  e1)))
\mvdash{}  e2  =  (fst(snd(outl(fst((r  e1))))))


By

---

Latex:
(MoveToConcl  (-4)
  THEN  MoveToConcl  (-1)
  THEN  RepUR  ``is-run-event``  0
  THEN  GenConclAtAddr  [1;1;1;1]
  THEN  (D  -2  THEN  D  -3)
  THEN  Reduce  0
  THEN  Try  (Complete  (Auto))
  THEN  RepeatFor  2  (D  -3)
  THEN  Reduce  0
  THEN  RW  assert\_pushdownC  0
  THEN  Auto)

---

Home Index