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 (ParallelLast') THEN Auto THEN RWO "-2<THEN Auto) }

1
1. Type
2. eq EqDecider(T)
3. bs bag(T)
4. 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