---

Step * 1 of Lemma eo-strict-forward-first


1. Info : Type
2. eo : EO+(Info)
3. e : E
4. e' : E
⊢ first(e') = if loc(e') = loc(e) then es-eq(eo) pred(e') e else first(e') fi 
BY
{ (Assert es-eq(eo) pred(e') e ∈ 𝔹 BY
         ((InstLemma `es-eq-wf-base` [⌈eo⌉]⋅ THENA Auto)
          THEN RepeatFor 2 ((MemCD THEN Try (Complete (Auto))))
          THEN BLemma `es-pred-wf-base` 
          THEN Auto
          THEN InstLemma `eo-strict-forward-E-member` [⌈Info⌉;⌈eo⌉;⌈e⌉;⌈e'⌉]⋅
          THEN Auto)) }

1
1. Info : Type
2. eo : EO+(Info)
3. e : E
4. e' : E
5. es-eq(eo) pred(e') e ∈ 𝔹
⊢ first(e') = if loc(e') = loc(e) then es-eq(eo) pred(e') e else first(e') fi 

---

Latex:



1.  Info  :  Type
2.  eo  :  EO+(Info)
3.  e  :  E
4.  e'  :  E
\mvdash{}  first(e')  =  if  loc(e')  =  loc(e)  then  es-eq(eo)  pred(e')  e  else  first(e')  fi 


By

(Assert  es-eq(eo)  pred(e')  e  \mmember{}  \mBbbB{}  BY
              ((InstLemma  `es-eq-wf-base`  [\mkleeneopen{}eo\mkleeneclose{}]\mcdot{}  THENA  Auto)
                THEN  RepeatFor  2  ((MemCD  THEN  Try  (Complete  (Auto))))
                THEN  BLemma  `es-pred-wf-base` 
                THEN  Auto
                THEN  InstLemma  `eo-strict-forward-E-member`  [\mkleeneopen{}Info\mkleeneclose{};\mkleeneopen{}eo\mkleeneclose{};\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}e'\mkleeneclose{}]\mcdot{}
                THEN  Auto))

---

Home Index