Step * 2 1 1 of Lemma non-empty-bag-union-of-list


1. [T] Type
2. bag(T)
3. bag(T) List
4. 0 < #(bag-union(v))  (∃b∈v. 0 < #(b))
5. 0 < #(bag-union(v))  (∃b∈v. 0 < #(b))
6. v ∈ bag(bag(T))
7. 0 < #(u) #(bag-union(v))
⊢ 0 < #(u) ∨ (∃b∈v. 0 < #(b))
BY
(Decide ⌜0 < #(u)⌝⋅ THEN Auto) }


Latex:


Latex:

1.  [T]  :  Type
2.  u  :  bag(T)
3.  v  :  bag(T)  List
4.  0  <  \#(bag-union(v))  {}\mRightarrow{}  (\mexists{}b\mmember{}v.  0  <  \#(b))
5.  0  <  \#(bag-union(v))  \mLeftarrow{}{}  (\mexists{}b\mmember{}v.  0  <  \#(b))
6.  v  \mmember{}  bag(bag(T))
7.  0  <  \#(u)  +  \#(bag-union(v))
\mvdash{}  0  <  \#(u)  \mvee{}  (\mexists{}b\mmember{}v.  0  <  \#(b))


By


Latex:
(Decide  \mkleeneopen{}0  <  \#(u)\mkleeneclose{}\mcdot{}  THEN  Auto)




Home Index