Step * 1 of Lemma single-eclass-val


1. Type
2. es:EO+(T) ─→ E ─→ Type
3. EClass(A[es;e])
4. eo EO+(T)
5. E
6. ↑e ∈b X
⊢ (X eo e) {X(e)} ∈ bag(A[eo;e])
BY
(MoveToConcl (-1) THEN RepUR ``in-eclass eclass-val`` THEN Unfold `eclass` THEN GenConclAtAddr [1;1;1;1]) }

1
1. Type
2. es:EO+(T) ─→ E ─→ Type
3. es:EO+(T) ─→ e:E ─→ bag(A[es;e])
4. eo EO+(T)
5. E
6. bag(A[eo;e])@i
7. (X eo e) v ∈ bag(A[eo;e])@i
⊢ (↑(#(v) =z 1))  (v {only(v)} ∈ bag(A[eo;e]))


Latex:



1.  T  :  Type
2.  A  :  es:EO+(T)  {}\mrightarrow{}  E  {}\mrightarrow{}  Type
3.  X  :  EClass(A[es;e])
4.  eo  :  EO+(T)
5.  e  :  E
6.  \muparrow{}e  \mmember{}\msubb{}  X
\mvdash{}  (X  eo  e)  =  \{X(e)\}


By

(MoveToConcl  (-1)
  THEN  RepUR  ``in-eclass  eclass-val``  0
  THEN  Unfold  `eclass`  3
  THEN  GenConclAtAddr  [1;1;1;1])




Home Index