---

Step * of Lemma equal_subtype

∀[A,B:Type]. ∀[a1,a2:A]. ∀[b1,b2:B].  (a1 = a2 ∈ A) ⊆r (b1 = b2 ∈ B) supposing (a1 = a2 ∈ A) ⇒ (b1 = b2 ∈ B)
BY
{ (Auto THEN (D 0 THEN Auto) THEN D -2 THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[A,B:Type].  \mforall{}[a1,a2:A].  \mforall{}[b1,b2:B].    (a1  =  a2)  \msubseteq{}r  (b1  =  b2)  supposing  (a1  =  a2)  {}\mRightarrow{}  (b1  =  b2)


By

---

Latex:
(Auto  THEN  (D  0  THEN  Auto)  THEN  D  -2  THEN  Auto)

---

Home Index