Step
*
1
1
of Lemma
single-eclass-val
1. T : Type
2. A : es:EO+(T) ─→ E ─→ Type
3. X : es:EO+(T) ─→ e:E ─→ bag(A[es;e])
4. eo : EO+(T)
5. e : E
6. v : 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]))
BY
{ ((Auto THEN RWO "bag-size-one<" 0⋅) THEN Auto) }
Latex:
1.  T  :  Type
2.  A  :  es:EO+(T)  {}\mrightarrow{}  E  {}\mrightarrow{}  Type
3.  X  :  es:EO+(T)  {}\mrightarrow{}  e:E  {}\mrightarrow{}  bag(A[es;e])
4.  eo  :  EO+(T)
5.  e  :  E
6.  v  :  bag(A[eo;e])@i
7.  (X  eo  e)  =  v@i
\mvdash{}  (\muparrow{}(\#(v)  =\msubz{}  1))  {}\mRightarrow{}  (v  =  \{only(v)\})
By
((Auto  THEN  RWO  "bag-size-one<"  0\mcdot{})  THEN  Auto)
Home
Index