Step
*
2
1
of Lemma
bag-member-splits
1. T : Type
2. as : bag(T)
3. bs : bag(T)
4. cs : bag(T)
⊢ λx.Ax ∈ ((as + bs) = cs ∈ bag(T)) 
⇒ <as, bs> ↓∈ bag-splits(cs)
BY
{ ((BagToList 2 THENA Auto)
   THEN (BagToList 3 THENA Auto)
   THEN (BagToList 4 THENA Auto)
   THEN Unfold `bag-append` 0
   THEN Auto) }
1
1. T : Type
2. as : T List
3. bs : T List
4. cs : T List
5. x : (as @ bs) = cs ∈ bag(T)
⊢ Ax ∈ <as, bs> ↓∈ bag-splits(cs)
Latex:
Latex:
1.  T  :  Type
2.  as  :  bag(T)
3.  bs  :  bag(T)
4.  cs  :  bag(T)
\mvdash{}  \mlambda{}x.Ax  \mmember{}  ((as  +  bs)  =  cs)  {}\mRightarrow{}  <as,  bs>  \mdownarrow{}\mmember{}  bag-splits(cs)
By
Latex:
((BagToList  2  THENA  Auto)
  THEN  (BagToList  3  THENA  Auto)
  THEN  (BagToList  4  THENA  Auto)
  THEN  Unfold  `bag-append`  0
  THEN  Auto)
Home
Index