---

Step * of Lemma bag-count-member-no-repeats

∀[T:Type]. ∀[eq:EqDecider(T)]. ∀[bs:bag(T)]. ∀[x:T].  ((#x in bs) = 1 ∈ ℤ) supposing (bag-no-repeats(T;bs) and x ↓∈ bs)
BY
{ (InstLemma `bag-no-repeats-count` [] THEN RepeatFor 3 (ParallelLast') THEN Auto THEN RWO "-2<" 0 THEN Auto) }

1
1. T : Type
2. eq : EqDecider(T)
3. bs : bag(T)
4. x : T
5. x ↓∈ bs
6. bag-no-repeats(T;bs)
7. ∀[x:T]. uiff(1 ≤ (#x in bs);(#x in bs) = 1 ∈ ℤ)
8. bag-no-repeats(T;bs)
⊢ 1 ≤ (#x in bs)

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}[eq:EqDecider(T)].  \mforall{}[bs:bag(T)].  \mforall{}[x:T].
    ((\#x  in  bs)  =  1)  supposing  (bag-no-repeats(T;bs)  and  x  \mdownarrow{}\mmember{}  bs)


By

---

Latex:
(InstLemma  `bag-no-repeats-count`  []
  THEN  RepeatFor  3  (ParallelLast')
  THEN  Auto
  THEN  RWO  "-2<"  0
  THEN  Auto)

---

Home Index