Step
*
of Lemma
mfun-subtype
∀[X,Y:Type]. ∀[d:metric(X)]. ∀[d':metric(Y)]. ∀[A:Type].  FUN(X ⟶ A) ⊆r FUN(X ⟶ Y) supposing A ⊆r Y
BY
{ (Auto THEN (D 0 THENA Auto) THEN D -1 THEN MemTypeCD THEN Auto) }
Latex:
Latex:
\mforall{}[X,Y:Type].  \mforall{}[d:metric(X)].  \mforall{}[d':metric(Y)].  \mforall{}[A:Type].
    FUN(X  {}\mrightarrow{}  A)  \msubseteq{}r  FUN(X  {}\mrightarrow{}  Y)  supposing  A  \msubseteq{}r  Y
By
Latex:
(Auto  THEN  (D  0  THENA  Auto)  THEN  D  -1  THEN  MemTypeCD  THEN  Auto)
Home
Index