Step
*
of Lemma
outr-or-class
∀[Info,A,B:Type]. ∀[X:EClass(A)]. ∀[Y:EClass(B)].  (outr-class(or-class(X;Y)) = Y ∈ EClass(B))
BY
{ ((Auto THEN BLemma `eclass-ext` THEN Auto)
   THEN RepUR ``outr-class or-class parallel-class inl-class inr-class`` 0
   THEN RepUR ``eclass-compose1 eclass-compose2`` 0
   THEN (GenConclAtAddr [3] THEN GenConclAtAddr [2;3;1;2] THEN All Thin)⋅) }
1
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)
Latex:
Latex:
\mforall{}[Info,A,B:Type].  \mforall{}[X:EClass(A)].  \mforall{}[Y:EClass(B)].    (outr-class(or-class(X;Y))  =  Y)
By
Latex:
((Auto  THEN  BLemma  `eclass-ext`  THEN  Auto)
  THEN  RepUR  ``outr-class  or-class  parallel-class  inl-class  inr-class``  0
  THEN  RepUR  ``eclass-compose1  eclass-compose2``  0
  THEN  (GenConclAtAddr  [3]  THEN  GenConclAtAddr  [2;3;1;2]  THEN  All  Thin)\mcdot{})
Home
Index