---

Step * 1 of Lemma stdEO-le


1. [M] : Type ─→ Type
2. Continuous+(P.M[P])
3. S0 : InitialSystem(P.M[P])@i
4. n2m : ℕ ─→ pMsg(P.M[P])@i
5. l2m : Id ─→ pMsg(P.M[P])@i
6. env : pEnvType(P.M[P])@i
7. e1 : E@i
8. e2 : E@i
9. (e1 <loc e2) ⇐⇒ (run-event-loc(e1) = run-event-loc(e2) ∈ Id) ∧ run-event-step(e1) < run-event-step(e2)
10. e1 = e2 ∈ E ⇐⇒ (run-event-loc(e1) = run-event-loc(e2) ∈ Id) ∧ (run-event-step(e1) = run-event-step(e2) ∈ ℤ)
⊢ (e1 <loc e2) ∨ (e1 = e2 ∈ E)
⇐⇒ (run-event-loc(e1) = run-event-loc(e2) ∈ Id) ∧ (run-event-step(e1) ≤ run-event-step(e2))
BY
{ (RepeatFor 2 (MoveToConcl (-1) ) THEN GenConclTerms Auto [⌈(e1 <loc e2)⌉;⌈e1 = e2 ∈ E⌉]⋅) }

1
1. [M] : Type ─→ Type
2. Continuous+(P.M[P])
3. S0 : InitialSystem(P.M[P])@i
4. n2m : ℕ ─→ pMsg(P.M[P])@i
5. l2m : Id ─→ pMsg(P.M[P])@i
6. env : pEnvType(P.M[P])@i
7. e1 : E@i
8. e2 : E@i
9. v : ℙ@i'
10. (e1 <loc e2) = v ∈ ℙ@i'
11. v1 : ℙ@i'
12. (e1 = e2 ∈ E) = v1 ∈ ℙ@i'
⊢ (v ⇐⇒ (run-event-loc(e1) = run-event-loc(e2) ∈ Id) ∧ run-event-step(e1) < run-event-step(e2))
⇒ (v1 ⇐⇒ (run-event-loc(e1) = run-event-loc(e2) ∈ Id) ∧ (run-event-step(e1) = run-event-step(e2) ∈ ℤ))
⇒ (v ∨ v1 ⇐⇒ (run-event-loc(e1) = run-event-loc(e2) ∈ Id) ∧ (run-event-step(e1) ≤ run-event-step(e2)))

---

Latex:

---

Latex:

1.  [M]  :  Type  {}\mrightarrow{}  Type
2.  Continuous+(P.M[P])
3.  S0  :  InitialSystem(P.M[P])@i
4.  n2m  :  \mBbbN{}  {}\mrightarrow{}  pMsg(P.M[P])@i
5.  l2m  :  Id  {}\mrightarrow{}  pMsg(P.M[P])@i
6.  env  :  pEnvType(P.M[P])@i
7.  e1  :  E@i
8.  e2  :  E@i
9.  (e1  <loc  e2)
\mLeftarrow{}{}\mRightarrow{}  (run-event-loc(e1)  =  run-event-loc(e2))  \mwedge{}  run-event-step(e1)  <  run-event-step(e2)
10.  e1  =  e2  \mLeftarrow{}{}\mRightarrow{}  (run-event-loc(e1)  =  run-event-loc(e2))  \mwedge{}  (run-event-step(e1)  =  run-event-step(e2))
\mvdash{}  (e1  <loc  e2)  \mvee{}  (e1  =  e2)
\mLeftarrow{}{}\mRightarrow{}  (run-event-loc(e1)  =  run-event-loc(e2))  \mwedge{}  (run-event-step(e1)  \mleq{}  run-event-step(e2))


By

---

Latex:
(RepeatFor  2  (MoveToConcl  (-1)  )  THEN  GenConclTerms  Auto  [\mkleeneopen{}(e1  <loc  e2)\mkleeneclose{};\mkleeneopen{}e1  =  e2\mkleeneclose{}]\mcdot{})

---

Home Index