Step
*
1
1
1
1
1
1
of Lemma
bag-member-splits
1. T : Type
2. ∀b:T List. (bag-splits(b) ∈ (bag(T) × bag(T)) List)
3. as : bag(T)
4. bs : bag(T)
5. (<as, bs> ∈ {<{}, {}>})
⊢ (as + bs) = [] ∈ bag(T)
BY
{ (Unfold `single-bag` (-1) THEN ((RWO "member_singleton" (-1) THENM SplitPair (-1)) THENA Auto)) }
1
1. T : Type
2. ∀b:T List. (bag-splits(b) ∈ (bag(T) × bag(T)) List)
3. as : bag(T)
4. bs : bag(T)
5. as = {} ∈ bag(T)
6. bs = {} ∈ bag(T)
⊢ (as + bs) = [] ∈ bag(T)
Latex:
Latex:
1.  T  :  Type
2.  \mforall{}b:T  List.  (bag-splits(b)  \mmember{}  (bag(T)  \mtimes{}  bag(T))  List)
3.  as  :  bag(T)
4.  bs  :  bag(T)
5.  (<as,  bs>  \mmember{}  \{<\{\},  \{\}>\})
\mvdash{}  (as  +  bs)  =  []
By
Latex:
(Unfold  `single-bag`  (-1)  THEN  ((RWO  "member\_singleton"  (-1)  THENM  SplitPair  (-1))  THENA  Auto))
Home
Index