---

Step * 1 2 of Lemma es-prior-interface-cases


1. [Info] : Type
2. X : EClass(Top)@i'
3. es : EO+(Info)@i'
4. e : E@i
5. y : ¬(∃e':{E| ((e' <loc e) ∧ (↑(#(X es e') =z 1)))})@i
6. (last(λe.(#(X es e) =z 1)) e)
= (inr y )
∈ ((∃e':{E| ((e' <loc e)
            ∧ (↑((λe.(#(X es e) =z 1)) e'))
            ∧ (∀e'':E. ((e' <loc e'') ⇒ (e'' <loc e) ⇒ (¬↑((λe.(#(X es e) =z 1)) e'')))))})
  ∨ (¬(∃e':{E| ((e' <loc e) ∧ (↑((λe.(#(X es e) =z 1)) e')))})))@i
⊢ (¬↑first(e))
  ∧ (((↑(#(X es pred(e)) =z 1)) ∧ (⊥ = pred(e) ∈ E))
    ∨ ((¬↑(#(X es pred(e)) =z 1))
      ∧ (↑isl(last(λe.(#(X es e) =z 1)) pred(e)))
      ∧ (⊥ = outl(last(λe.(#(X es e) =z 1)) pred(e)) ∈ E))) 
  supposing False
⇒ (¬↑first(e))
   ∧ (((↑(#(X es pred(e)) =z 1)) ∧ (only({}) = pred(e) ∈ E))
     ∨ ((¬↑(#(X es pred(e)) =z 1))
       ∧ (↑(#(case last(λe.(#(X es e) =z 1)) pred(e) of inl(e') => {e'} | inr(x) => {}) =z 1))
       ∧ (only({}) = only(case last(λe.(#(X es e) =z 1)) pred(e) of inl(e') => {e'} | inr(x) => {}) ∈ E))) 
   supposing False
BY
{ Auto }

---

Latex:

---

Latex:

1.  [Info]  :  Type
2.  X  :  EClass(Top)@i'
3.  es  :  EO+(Info)@i'
4.  e  :  E@i
5.  y  :  \mneg{}(\mexists{}e':\{E|  ((e'  <loc  e)  \mwedge{}  (\muparrow{}(\#(X  es  e')  =\msubz{}  1)))\})@i
6.  (last(\mlambda{}e.(\#(X  es  e)  =\msubz{}  1))  e)  =  (inr  y  )@i
\mvdash{}  (\mneg{}\muparrow{}first(e))
    \mwedge{}  (((\muparrow{}(\#(X  es  pred(e))  =\msubz{}  1))  \mwedge{}  (\mbot{}  =  pred(e)))
        \mvee{}  ((\mneg{}\muparrow{}(\#(X  es  pred(e))  =\msubz{}  1))
            \mwedge{}  (\muparrow{}isl(last(\mlambda{}e.(\#(X  es  e)  =\msubz{}  1))  pred(e)))
            \mwedge{}  (\mbot{}  =  outl(last(\mlambda{}e.(\#(X  es  e)  =\msubz{}  1))  pred(e))))) 
    supposing  False
{}\mRightarrow{}  (\mneg{}\muparrow{}first(e))
      \mwedge{}  (((\muparrow{}(\#(X  es  pred(e))  =\msubz{}  1))  \mwedge{}  (only(\{\})  =  pred(e)))
          \mvee{}  ((\mneg{}\muparrow{}(\#(X  es  pred(e))  =\msubz{}  1))
              \mwedge{}  (\muparrow{}(\#(case  last(\mlambda{}e.(\#(X  es  e)  =\msubz{}  1))  pred(e)  of  inl(e')  =>  \{e'\}  |  inr(x)  =>  \{\})  =\msubz{}  1))
              \mwedge{}  (only(\{\})
                  =  only(case  last(\mlambda{}e.(\#(X  es  e)  =\msubz{}  1))  pred(e)  of  inl(e')  =>  \{e'\}  |  inr(x)  =>  \{\})))) 
      supposing  False


By

---

Latex:
Auto

---

Home Index