Step
*
of Lemma
image-metric_wf
∀[X,Y:Type]. ∀[f:X ⟶ Y]. ∀[d:metric(Y)].  (image-metric(d) ∈ metric(f[X]))
BY
{ (Auto
   THEN (Assert image-metric(d) ∈ f[X] ⟶ f[X] ⟶ ℝ BY
               ProveWfLemma)
   THEN MemTypeCD
   THEN Auto
   THEN Try (D -3)
   THEN Try (D -2)
   THEN D -1
   THEN (RepUR ``image-metric`` 0 THEN Fold `mdist` 0)
   THEN Auto) }
Latex:
Latex:
\mforall{}[X,Y:Type].  \mforall{}[f:X  {}\mrightarrow{}  Y].  \mforall{}[d:metric(Y)].    (image-metric(d)  \mmember{}  metric(f[X]))
By
Latex:
(Auto
  THEN  (Assert  image-metric(d)  \mmember{}  f[X]  {}\mrightarrow{}  f[X]  {}\mrightarrow{}  \mBbbR{}  BY
                          ProveWfLemma)
  THEN  MemTypeCD
  THEN  Auto
  THEN  Try  (D  -3)
  THEN  Try  (D  -2)
  THEN  D  -1
  THEN  (RepUR  ``image-metric``  0  THEN  Fold  `mdist`  0)
  THEN  Auto)
Home
Index