---

Step * 1 5 of Lemma until-classrel


1. Info : Type
2. A : Type
3. B : Type
4. X : EClass(A)
5. Y : EClass(B)
6. es : EO+(Info)
7. e : E
8. v : A
9. v ↓∈ X es e@i
10. ∀e'<e.∀w:B. (¬w ↓∈ Y es e')@i
11. ∃e'<e.((↓∃v:B. v ∈ Y(e')) ∧ ∀e''<e.(↓∃v:B. v ∈ Y(e'')) ⇒ e'' ≤loc e' )
∧ (class-pred(Y;es;e) = (inl e') ∈ (E + Top))
⊢ v ↓∈ case class-pred(Y;es;e) of inl(e') => {} | inr(z) => X es e
BY
{ (Assert ⌈False⌉⋅
   THEN Auto
   THEN (RepeatFor 3 (D (-1))
         THEN D -2
         THEN D -3
         THEN (With ⌈e'⌉ (D (-6))⋅ THENM D -1)
         THEN Auto
         THEN Fold `classrel` (-1)
         THEN ExRepD
         THEN InstHyp [⌈v1⌉] (-1)⋅
         THEN Auto)⋅)⋅ }

---

Latex:

---

Latex:

1.  Info  :  Type
2.  A  :  Type
3.  B  :  Type
4.  X  :  EClass(A)
5.  Y  :  EClass(B)
6.  es  :  EO+(Info)
7.  e  :  E
8.  v  :  A
9.  v  \mdownarrow{}\mmember{}  X  es  e@i
10.  \mforall{}e'<e.\mforall{}w:B.  (\mneg{}w  \mdownarrow{}\mmember{}  Y  es  e')@i
11.  \mexists{}e'<e.((\mdownarrow{}\mexists{}v:B.  v  \mmember{}  Y(e'))  \mwedge{}  \mforall{}e''<e.(\mdownarrow{}\mexists{}v:B.  v  \mmember{}  Y(e''))  {}\mRightarrow{}  e''  \mleq{}loc  e'  )
\mwedge{}  (class-pred(Y;es;e)  =  (inl  e'))
\mvdash{}  v  \mdownarrow{}\mmember{}  case  class-pred(Y;es;e)  of  inl(e')  =>  \{\}  |  inr(z)  =>  X  es  e


By

---

Latex:
(Assert  \mkleeneopen{}False\mkleeneclose{}\mcdot{}
  THEN  Auto
  THEN  (RepeatFor  3  (D  (-1))
              THEN  D  -2
              THEN  D  -3
              THEN  (With  \mkleeneopen{}e'\mkleeneclose{}  (D  (-6))\mcdot{}  THENM  D  -1)
              THEN  Auto
              THEN  Fold  `classrel`  (-1)
              THEN  ExRepD
              THEN  InstHyp  [\mkleeneopen{}v1\mkleeneclose{}]  (-1)\mcdot{}
              THEN  Auto)\mcdot{})\mcdot{}

---

Home Index