---

Step * of Lemma prior-val-is

∀[Info:Type]. ∀[es:EO+(Info)]. ∀[T:Type]. ∀[X:EClass(T)]. ∀[e:E]. ∀[e':E(X)].
  ({(↑e ∈b (X)') ∧ ((X)'(e) = X(e') ∈ T)}) supposing 
     ((∀e'':E. ((e' <loc e'') ⇒ (e'' <loc e) ⇒ (¬↑e'' ∈b X))) and 
     (e' <loc e))
BY
{ ((InstLemma `prior-val-val` []⋅ THEN RepeatFor 5 (ParallelLast'))
   THEN Auto
   THEN (Unfold `guard` 0 THEN Auto THEN Try ((BLemma `is-prior-val` THEN Auto)) THEN ThinTrivial THEN ExRepD)) }

1
1. Info : Type
2. es : EO+(Info)
3. T : Type
4. X : EClass(T)
5. e : E
6. e' : E(X)
7. (e' <loc e)
8. ∀e'':E. ((e' <loc e'') ⇒ (e'' <loc e) ⇒ (¬↑e'' ∈b X))
9. ↑e ∈b (X)'
10. e1 : E
11. (e1 <loc e)
12. ↑e1 ∈b X
13. ∀e'':E. ((e1 <loc e'') ⇒ (e'' <loc e) ⇒ (¬↑e'' ∈b X))
14. (X)'(e) = X(e1) ∈ T
⊢ (X)'(e) = X(e') ∈ T

---

Latex:

---

Latex:
\mforall{}[Info:Type].  \mforall{}[es:EO+(Info)].  \mforall{}[T:Type].  \mforall{}[X:EClass(T)].  \mforall{}[e:E].  \mforall{}[e':E(X)].
    (\{(\muparrow{}e  \mmember{}\msubb{}  (X)')  \mwedge{}  ((X)'(e)  =  X(e'))\})  supposing 
          ((\mforall{}e'':E.  ((e'  <loc  e'')  {}\mRightarrow{}  (e''  <loc  e)  {}\mRightarrow{}  (\mneg{}\muparrow{}e''  \mmember{}\msubb{}  X)))  and 
          (e'  <loc  e))


By

---

Latex:
((InstLemma  `prior-val-val`  []\mcdot{}  THEN  RepeatFor  5  (ParallelLast'))
  THEN  Auto
  THEN  (Unfold  `guard`  0
              THEN  Auto
              THEN  Try  ((BLemma  `is-prior-val`  THEN  Auto))
              THEN  ThinTrivial
              THEN  ExRepD))

---

Home Index