---

Step * 2 of Lemma bag-parts_wf


1. T : Type
2. valueall-type(T)
3. eq : EqDecider(T)
4. ∀n:ℕ. ∀bs:bag(T).  ((#(bs) ≤ n) ⇒ (bag-parts(eq;bs) ∈ bag(bag(T) List+)))
⊢ ∀bs:bag(T). (bag-parts(eq;bs) ∈ bag(bag(T) List+))
BY
{ (Auto THEN InstHyp [⌜#(bs)⌝;⌜bs⌝] (-2)⋅ THEN Auto) }

---

Latex:

---

Latex:

1.  T  :  Type
2.  valueall-type(T)
3.  eq  :  EqDecider(T)
4.  \mforall{}n:\mBbbN{}.  \mforall{}bs:bag(T).    ((\#(bs)  \mleq{}  n)  {}\mRightarrow{}  (bag-parts(eq;bs)  \mmember{}  bag(bag(T)  List\msupplus{})))
\mvdash{}  \mforall{}bs:bag(T).  (bag-parts(eq;bs)  \mmember{}  bag(bag(T)  List\msupplus{}))


By

---

Latex:
(Auto  THEN  InstHyp  [\mkleeneopen{}\#(bs)\mkleeneclose{};\mkleeneopen{}bs\mkleeneclose{}]  (-2)\mcdot{}  THEN  Auto)

---

Home Index