Step * 1 1 of Lemma bag-parts'_wf2


1. Type
2. valueall-type(T)
3. eq EqDecider(T)
4. 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