---

Step * of Lemma strong-subtype-ext-equal

∀[A,B:Type].  (strong-subtype(A;B)) supposing ((A ⊆r B) and (B ⊆r A))
BY
{ (Auto THEN Unfold `strong-subtype` 0 THEN D 0 THEN Try (Trivial) THEN D 0 THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[A,B:Type].    (strong-subtype(A;B))  supposing  ((A  \msubseteq{}r  B)  and  (B  \msubseteq{}r  A))


By

---

Latex:
(Auto  THEN  Unfold  `strong-subtype`  0  THEN  D  0  THEN  Try  (Trivial)  THEN  D  0  THEN  Auto)

---

Home Index