Step
*
1
2
of Lemma
once-once-class
1. Info : Type
2. A : Type
3. X : EClass(A)
4. es : EO+(Info)@i'
5. e : E@i
6. ∀e'<e.∀v:A. (¬v ∈ (X until X)(e'))
7. class-pred((X until X);es;e) = (inr ⋅ ) ∈ (E + Top)
⊢ case class-pred((X until X);es;e) of inl(e') => {} | inr(z) => (X until X) es e = ((X until X) es e) ∈ bag(A)
BY
{ (HypSubst (-1) 0 THEN Reduce 0 THEN Auto) }
Latex:
Latex:
1.  Info  :  Type
2.  A  :  Type
3.  X  :  EClass(A)
4.  es  :  EO+(Info)@i'
5.  e  :  E@i
6.  \mforall{}e'<e.\mforall{}v:A.  (\mneg{}v  \mmember{}  (X  until  X)(e'))
7.  class-pred((X  until  X);es;e)  =  (inr  \mcdot{}  )
\mvdash{}  case  class-pred((X  until  X);es;e)  of  inl(e')  =>  \{\}  |  inr(z)  =>  (X  until  X)  es  e
=  ((X  until  X)  es  e)
By
Latex:
(HypSubst  (-1)  0  THEN  Reduce  0  THEN  Auto)
Home
Index