---

Step * 1 1 1 of Lemma assert-bag-has-no-repeats


1. T : Type
2. eq : EqDecider(T)
3. b : bag(T)
4. #(bag-remove-repeats(eq;b)) = #(b) ∈ ℤ
5. x : T
6. 0 < (#x in b)
⊢ (#x in b) ≤ 1
BY
{ TACTIC:((InstLemma `bag-size-partition` [⌜T⌝;⌜eq⌝;⌜b⌝]⋅ THENA Auto) THEN RevHypSubst' (-4) (-1)) }

1
1. T : Type
2. eq : EqDecider(T)
3. b : bag(T)
4. #(bag-remove-repeats(eq;b)) = #(b) ∈ ℤ
5. x : T
6. 0 < (#x in b)
7. #(bag-remove-repeats(eq;b)) = Σ(x∈bag-remove-repeats(eq;b)). (#x in b) ∈ ℤ
⊢ (#x in b) ≤ 1

---

Latex:

---

Latex:

1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  b  :  bag(T)
4.  \#(bag-remove-repeats(eq;b))  =  \#(b)
5.  x  :  T
6.  0  <  (\#x  in  b)
\mvdash{}  (\#x  in  b)  \mleq{}  1


By

---

Latex:
TACTIC:((InstLemma  `bag-size-partition`  [\mkleeneopen{}T\mkleeneclose{};\mkleeneopen{}eq\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{}]\mcdot{}  THENA  Auto)  THEN  RevHypSubst'  (-4)  (-1))

---

Home Index