---

Step * 1 2 1 of Lemma decidable__sub-bag


1. T : Type
2. eq : EqDecider(T)
3. as : bag(T)@i
4. bs : bag(T)@i
5. ∀x:T. ((#x in as) ≤ (#x in bs))@i
⊢ ↑bag-all(x.(#x in as) ≤z (#x in bs);as)
BY
{ (InstLemma `assert-bag-all` [⌜T⌝;⌜eq⌝]⋅ THENA Auto) }

1
1. T : Type
2. eq : EqDecider(T)
3. as : bag(T)@i
4. bs : bag(T)@i
5. ∀x:T. ((#x in as) ≤ (#x in bs))@i
6. ∀[p:T ⟶ 𝔹]. ∀[bs:bag(T)].  (∀x:T. (x ↓∈ bs ⇒ (↑p[x])) ⇐⇒ ↑bag-all(x.p[x];bs))
⊢ ↑bag-all(x.(#x in as) ≤z (#x in bs);as)

---

Latex:

---

Latex:

1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  as  :  bag(T)@i
4.  bs  :  bag(T)@i
5.  \mforall{}x:T.  ((\#x  in  as)  \mleq{}  (\#x  in  bs))@i
\mvdash{}  \muparrow{}bag-all(x.(\#x  in  as)  \mleq{}z  (\#x  in  bs);as)


By

---

Latex:
(InstLemma  `assert-bag-all`  [\mkleeneopen{}T\mkleeneclose{};\mkleeneopen{}eq\mkleeneclose{}]\mcdot{}  THENA  Auto)

---

Home Index