Step
*
of Lemma
bag-size-zero
∀[C:Type]. ∀[bs:bag(C)]. bs ~ {} supposing #(bs) ≤ 0
BY
{ (RepeatFor 2 ((D 0 THENA Auto))
THEN (GenConcl ⌜bs = L ∈ (Top List)⌝⋅ THENA Auto)
THEN Unfold `bag-size` 0
THEN D (-2)
THEN RepUR ``empty-bag`` 0
THEN Auto') }
Latex:
Latex:
\mforall{}[C:Type]. \mforall{}[bs:bag(C)]. bs \msim{} \{\} supposing \#(bs) \mleq{} 0
By
Latex:
(RepeatFor 2 ((D 0 THENA Auto))
THEN (GenConcl \mkleeneopen{}bs = L\mkleeneclose{}\mcdot{} THENA Auto)
THEN Unfold `bag-size` 0
THEN D (-2)
THEN RepUR ``empty-bag`` 0
THEN Auto')
Home
Index