---

Step * of Lemma outl-or-class

∀[Info,A,B:Type]. ∀[X:EClass(A)]. ∀[Y:EClass(B)].  (outl-class(or-class(X;Y)) = X ∈ EClass(A))
BY
{ ((Auto THEN BLemma `eclass-ext` THEN Auto)
   THEN RepUR ``outl-class or-class parallel-class inl-class inr-class`` 0
   THEN RepUR ``eclass-compose1 eclass-compose2`` 0
   THEN (GenConclAtAddr [3] THEN GenConclAtAddr [2;3;2;2] THEN All Thin)⋅) }

1
1. A : Type
2. B : Type
3. v : bag(A)@i
4. v1 : bag(B)@i
⊢ bag-mapfilter(λx.outl(x);λx.isl(x);bag-map(λx.(inl x);v) + bag-map(λx.(inr x );v1)) = v ∈ bag(A)

---

Latex:

---

Latex:
\mforall{}[Info,A,B:Type].  \mforall{}[X:EClass(A)].  \mforall{}[Y:EClass(B)].    (outl-class(or-class(X;Y))  =  X)


By

---

Latex:
((Auto  THEN  BLemma  `eclass-ext`  THEN  Auto)
  THEN  RepUR  ``outl-class  or-class  parallel-class  inl-class  inr-class``  0
  THEN  RepUR  ``eclass-compose1  eclass-compose2``  0
  THEN  (GenConclAtAddr  [3]  THEN  GenConclAtAddr  [2;3;2;2]  THEN  All  Thin)\mcdot{})

---

Home Index