Step
*
1
1
of Lemma
bag-parts'_wf2
1. T : Type
2. valueall-type(T)
3. eq : EqDecider(T)
4. x : T
5. bs : bag(T)
⊢ bag-parts'(eq;bs;x) ∈ bag({L:bag(T) List+| L ↓∈ bag-parts'(eq;bs;x)} )
BY
{ (BLemma `bag-subtype` THEN Auto) }
Latex:
Latex:
1.  T  :  Type
2.  valueall-type(T)
3.  eq  :  EqDecider(T)
4.  x  :  T
5.  bs  :  bag(T)
\mvdash{}  bag-parts'(eq;bs;x)  \mmember{}  bag(\{L:bag(T)  List\msupplus{}|  L  \mdownarrow{}\mmember{}  bag-parts'(eq;bs;x)\}  )
By
Latex:
(BLemma  `bag-subtype`  THEN  Auto)
Home
Index