---

Step * 2 of Lemma strong-subtype-union


1. A : Type
2. B : Type
3. C : Type
4. D : Type
5. A ⊆r C
6. {b:C| ∃a:A. (b = a ∈ C)}  ⊆r A
7. B ⊆r D
8. {b:D| ∃a:B. (b = a ∈ D)}  ⊆r B
9. ∀b:C. ∀a:A.  ((b = a ∈ C) ⇒ (b = a ∈ A))
10. ∀b:D. ∀a:B.  ((b = a ∈ D) ⇒ (b = a ∈ B))
11. (A + B) ⊆r (C + D)
12. y : D
13. y1 : B
14. y = y1 ∈ D
⊢ y ∈ B
BY
{ (SubsumeC {b:D| ∃a:B. (b = a ∈ D)} ⋅ THEN Auto THEN MemTypeCD THEN Auto THEN With ⌜y1⌝ (D 0)⋅ THEN Auto) }

---

Latex:

---

Latex:

1.  A  :  Type
2.  B  :  Type
3.  C  :  Type
4.  D  :  Type
5.  A  \msubseteq{}r  C
6.  \{b:C|  \mexists{}a:A.  (b  =  a)\}    \msubseteq{}r  A
7.  B  \msubseteq{}r  D
8.  \{b:D|  \mexists{}a:B.  (b  =  a)\}    \msubseteq{}r  B
9.  \mforall{}b:C.  \mforall{}a:A.    ((b  =  a)  {}\mRightarrow{}  (b  =  a))
10.  \mforall{}b:D.  \mforall{}a:B.    ((b  =  a)  {}\mRightarrow{}  (b  =  a))
11.  (A  +  B)  \msubseteq{}r  (C  +  D)
12.  y  :  D
13.  y1  :  B
14.  y  =  y1
\mvdash{}  y  \mmember{}  B


By

---

Latex:
(SubsumeC  \{b:D|  \mexists{}a:B.  (b  =  a)\}  \mcdot{}  THEN  Auto  THEN  MemTypeCD  THEN  Auto  THEN  With  \mkleeneopen{}y1\mkleeneclose{}  (D  0)\mcdot{}  THEN  Auto)

---

Home Index