Step
*
1
1
of Lemma
bag-parts_wf
.....aux..... 
1. T : Type
2. valueall-type(T)
3. eq : EqDecider(T)
4. n : ℕ
5. ∀n:ℕn. ∀bs:bag(T).  ((#(bs) ≤ n) 
⇒ (bag-parts(eq;bs) ∈ bag(bag(T) List+)))
6. bs : bag(T)@i
7. #(bs) ≤ n
⊢ has-valueall(bag-partitions(eq;bs))
BY
{ Auto }
Latex:
Latex:
.....aux..... 
1.  T  :  Type
2.  valueall-type(T)
3.  eq  :  EqDecider(T)
4.  n  :  \mBbbN{}
5.  \mforall{}n:\mBbbN{}n.  \mforall{}bs:bag(T).    ((\#(bs)  \mleq{}  n)  {}\mRightarrow{}  (bag-parts(eq;bs)  \mmember{}  bag(bag(T)  List\msupplus{})))
6.  bs  :  bag(T)@i
7.  \#(bs)  \mleq{}  n
\mvdash{}  has-valueall(bag-partitions(eq;bs))
By
Latex:
Auto
Home
Index