Step
*
1
of Lemma
outr-or-class
1. A : Type
2. B : Type
3. v : bag(B)@i
4. v1 : bag(A)@i
⊢ bag-mapfilter(λx.outr(x);λx.(¬bisl(x));bag-map(λx.(inl x);v1) + bag-map(λx.(inr x );v)) = v ∈ bag(B)
BY
{ (RepUR ``bag-mapfilter`` 0 THEN Fold `bag-merge` 0) }
1
1. A : Type
2. B : Type
3. v : bag(B)@i
4. v1 : bag(A)@i
⊢ bag-map(λx.outr(x);[x∈bag-merge(v1;v)|¬bisl(x)]) = v ∈ bag(B)
Latex:
Latex:
1.  A  :  Type
2.  B  :  Type
3.  v  :  bag(B)@i
4.  v1  :  bag(A)@i
\mvdash{}  bag-mapfilter(\mlambda{}x.outr(x);\mlambda{}x.(\mneg{}\msubb{}isl(x));bag-map(\mlambda{}x.(inl  x);v1)  +  bag-map(\mlambda{}x.(inr  x  );v))  =  v
By
Latex:
(RepUR  ``bag-mapfilter``  0  THEN  Fold  `bag-merge`  0)
Home
Index