---

Step * 2 of Lemma mcompact_functionality_wrt_homeomorphic+


1. X : Type
2. Y : Type
3. d : metric(X)
4. d' : metric(Y)
5. f : FUN(Y ⟶ X)
6. g : FUN(X ⟶ Y)
7. [%6] : (∀x:Y. g (f x) ≡ x) ∧ (∀y:X. f (g y) ≡ y)
8. B : ℕ+
9. [%5] : ∀x1,x2:Y.  (mdist(d;f x1;f x2) ≤ (r(B) * mdist(d';x1;x2)))
10. mcomplete(X with d)
11. ∀k:ℕ. ∃n:ℕ+. ∃xs:ℕn ⟶ X. ∀x:X. ∃i:ℕn. (mdist(d;x;xs i) ≤ (r1/r(k + 1)))
12. UC(g:X ⟶ Y)
13. mcomplete(Y with d')
14. k : ℕ
⊢ ∃n:ℕ+. ∃xs:ℕn ⟶ Y. ∀x:Y. ∃i:ℕn. (mdist(d';x;xs i) ≤ (r1/r(k + 1)))
BY
{ (((D -3 With ⌜k + 1⌝  THENA Auto) THEN ExRepD)
   THEN (InstLemma `small-reciprocal-real` [⌜delta⌝]⋅ THENA Auto)
   THEN ExRepD
   THEN (D -7 With ⌜k1 - 1⌝  THENA Auto)
   THEN ParallelLast
   THEN (Subst' (k1 - 1) + 1 ~ k1 -1 THENA Auto)
   THEN ExRepD) }

1
1. X : Type
2. Y : Type
3. d : metric(X)
4. d' : metric(Y)
5. f : FUN(Y ⟶ X)
6. g : FUN(X ⟶ Y)
7. [%6] : (∀x:Y. g (f x) ≡ x) ∧ (∀y:X. f (g y) ≡ y)
8. B : ℕ+
9. [%5] : ∀x1,x2:Y.  (mdist(d;f x1;f x2) ≤ (r(B) * mdist(d';x1;x2)))
10. mcomplete(X with d)
11. mcomplete(Y with d')
12. k : ℕ
13. delta : {d:ℝ| r0 < d} 
14. ∀x,y:X.  ((mdist(d;x;y) ≤ delta) ⇒ (mdist(d';g x;g y) ≤ (r1/r(k + 1))))
15. k1 : ℕ+
16. (r1/r(k1)) < delta
17. n : ℕ+
18. xs : ℕn ⟶ X
19. ∀x:X. ∃i:ℕn. (mdist(d;x;xs i) ≤ (r1/r(k1)))
⊢ ∃xs:ℕn ⟶ Y. ∀x:Y. ∃i:ℕn. (mdist(d';x;xs i) ≤ (r1/r(k + 1)))

---

Latex:

---

Latex:

1.  X  :  Type
2.  Y  :  Type
3.  d  :  metric(X)
4.  d'  :  metric(Y)
5.  f  :  FUN(Y  {}\mrightarrow{}  X)
6.  g  :  FUN(X  {}\mrightarrow{}  Y)
7.  [\%6]  :  (\mforall{}x:Y.  g  (f  x)  \mequiv{}  x)  \mwedge{}  (\mforall{}y:X.  f  (g  y)  \mequiv{}  y)
8.  B  :  \mBbbN{}\msupplus{}
9.  [\%5]  :  \mforall{}x1,x2:Y.    (mdist(d;f  x1;f  x2)  \mleq{}  (r(B)  *  mdist(d';x1;x2)))
10.  mcomplete(X  with  d)
11.  \mforall{}k:\mBbbN{}.  \mexists{}n:\mBbbN{}\msupplus{}.  \mexists{}xs:\mBbbN{}n  {}\mrightarrow{}  X.  \mforall{}x:X.  \mexists{}i:\mBbbN{}n.  (mdist(d;x;xs  i)  \mleq{}  (r1/r(k  +  1)))
12.  UC(g:X  {}\mrightarrow{}  Y)
13.  mcomplete(Y  with  d')
14.  k  :  \mBbbN{}
\mvdash{}  \mexists{}n:\mBbbN{}\msupplus{}.  \mexists{}xs:\mBbbN{}n  {}\mrightarrow{}  Y.  \mforall{}x:Y.  \mexists{}i:\mBbbN{}n.  (mdist(d';x;xs  i)  \mleq{}  (r1/r(k  +  1)))


By

---

Latex:
(((D  -3  With  \mkleeneopen{}k  +  1\mkleeneclose{}    THENA  Auto)  THEN  ExRepD)
  THEN  (InstLemma  `small-reciprocal-real`  [\mkleeneopen{}delta\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  ExRepD
  THEN  (D  -7  With  \mkleeneopen{}k1  -  1\mkleeneclose{}    THENA  Auto)
  THEN  ParallelLast
  THEN  (Subst'  (k1  -  1)  +  1  \msim{}  k1  -1  THENA  Auto)
  THEN  ExRepD)

---

Home Index