---

Step * 1 1 of Lemma run_local_pred_time_less


1. M : Type ─→ Type@i'
2. r : pRunType(P.M[P])@i
3. e1 : {1...}
4. e2 : Id@i
5. ¬↑is-run-event(r;e1 - 1;e2)
6. ↑is-run-event(r;e1;e2)@i
7. x1 : ℕ@i
8. x2 : Id@i
9. ↑is-run-event(r;x1;x2)@i
10. x2 = e2 ∈ Id@i
11. x1 < e1@i
⊢ fst(run-local-pred(r;e2;e1;e1 - 1)) < e1
BY
{ Assert ⌈∀t:ℕ. (x1 < t ⇒ ((fst(run-local-pred(r;e2;e1;t))) ≤ t))⌉⋅ }

1
.....assertion..... 
1. M : Type ─→ Type@i'
2. r : pRunType(P.M[P])@i
3. e1 : {1...}
4. e2 : Id@i
5. ¬↑is-run-event(r;e1 - 1;e2)
6. ↑is-run-event(r;e1;e2)@i
7. x1 : ℕ@i
8. x2 : Id@i
9. ↑is-run-event(r;x1;x2)@i
10. x2 = e2 ∈ Id@i
11. x1 < e1@i
⊢ ∀t:ℕ. (x1 < t ⇒ ((fst(run-local-pred(r;e2;e1;t))) ≤ t))

2
1. M : Type ─→ Type@i'
2. r : pRunType(P.M[P])@i
3. e1 : {1...}
4. e2 : Id@i
5. ¬↑is-run-event(r;e1 - 1;e2)
6. ↑is-run-event(r;e1;e2)@i
7. x1 : ℕ@i
8. x2 : Id@i
9. ↑is-run-event(r;x1;x2)@i
10. x2 = e2 ∈ Id@i
11. x1 < e1@i
12. ∀t:ℕ. (x1 < t ⇒ ((fst(run-local-pred(r;e2;e1;t))) ≤ t))
⊢ fst(run-local-pred(r;e2;e1;e1 - 1)) < e1

---

Latex:

---

Latex:

1.  M  :  Type  {}\mrightarrow{}  Type@i'
2.  r  :  pRunType(P.M[P])@i
3.  e1  :  \{1...\}
4.  e2  :  Id@i
5.  \mneg{}\muparrow{}is-run-event(r;e1  -  1;e2)
6.  \muparrow{}is-run-event(r;e1;e2)@i
7.  x1  :  \mBbbN{}@i
8.  x2  :  Id@i
9.  \muparrow{}is-run-event(r;x1;x2)@i
10.  x2  =  e2@i
11.  x1  <  e1@i
\mvdash{}  fst(run-local-pred(r;e2;e1;e1  -  1))  <  e1


By

---

Latex:
Assert  \mkleeneopen{}\mforall{}t:\mBbbN{}.  (x1  <  t  {}\mRightarrow{}  ((fst(run-local-pred(r;e2;e1;t)))  \mleq{}  t))\mkleeneclose{}\mcdot{}

---

Home Index