---

Step * of Lemma strong-subtype-isect-base

∀[A:Type]. (strong-subtype(A ⋂ Base;Base) ∧ strong-subtype(Base ⋂ A;Base))
BY
{ (Auto THEN RepeatFor 2 ((D 0 THEN Auto)) THEN RepeatFor 2 (D (-1)) THEN HypSubst' (-1) 0 THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[A:Type].  (strong-subtype(A  \mcap{}  Base;Base)  \mwedge{}  strong-subtype(Base  \mcap{}  A;Base))


By

---

Latex:
(Auto  THEN  RepeatFor  2  ((D  0  THEN  Auto))  THEN  RepeatFor  2  (D  (-1))  THEN  HypSubst'  (-1)  0  THEN  Auto)

---

Home Index