Step * 1 1 of Lemma compact-metric-to-real-continuity

.....assertion..... 
1. [X] Type
2. metric(X)
3. cmplt mcomplete(X with d)
4. mtb m-TB(X;d)
5. X ⟶ ℝ
6. ∀x,y:X.  (x ≡  ((f x) (f y)))
7. : ℕ+
8. : ℕ
9. ∀p,q:mtb-cantor(mtb).
     ((p q ∈ (i:ℕn ⟶ ℕ(fst(mtb)) i))
      ((f mtb-cantor-map(d;cmplt;mtb;p) (2 k)) (f mtb-cantor-map(d;cmplt;mtb;q) (2 k)) ∈ ℤ))
⊢ ∃delta:{d:ℝr0 < d} 
   ∀x,y:X.
     ((mdist(d;x;y) ≤ delta)
      (∃p,q:mtb-cantor(mtb)
          ((p q ∈ (i:ℕn ⟶ ℕ(fst(mtb)) i)) ∧ mtb-cantor-map(d;cmplt;mtb;p) ≡ x ∧ mtb-cantor-map(d;cmplt;mtb;q) ≡ y)))
BY
(InstLemma `mtb-cantor-map-onto-common` [⌜X⌝;⌜d⌝;⌜cmplt⌝;⌜mtb⌝;⌜n⌝]⋅ THENA Auto) }

1
1. [X] Type
2. metric(X)
3. cmplt mcomplete(X with d)
4. mtb m-TB(X;d)
5. X ⟶ ℝ
6. ∀x,y:X.  (x ≡  ((f x) (f y)))
7. : ℕ+
8. : ℕ
9. ∀p,q:mtb-cantor(mtb).
     ((p q ∈ (i:ℕn ⟶ ℕ(fst(mtb)) i))
      ((f mtb-cantor-map(d;cmplt;mtb;p) (2 k)) (f mtb-cantor-map(d;cmplt;mtb;q) (2 k)) ∈ ℤ))
10. ∀x,y:X.
      ((mdist(d;x;y) ≤ (r1/r(n 1)))
       (∃p,q:mtb-cantor(mtb)
           ((p q ∈ (i:ℕn ⟶ ℕ(fst(mtb)) i)) ∧ mtb-cantor-map(d;cmplt;mtb;p) ≡ x ∧ mtb-cantor-map(d;cmplt;mtb;q) ≡ y)))
⊢ ∃delta:{d:ℝr0 < d} 
   ∀x,y:X.
     ((mdist(d;x;y) ≤ delta)
      (∃p,q:mtb-cantor(mtb)
          ((p q ∈ (i:ℕn ⟶ ℕ(fst(mtb)) i)) ∧ mtb-cantor-map(d;cmplt;mtb;p) ≡ x ∧ mtb-cantor-map(d;cmplt;mtb;q) ≡ y)))


Latex:


Latex:
.....assertion..... 
1.  [X]  :  Type
2.  d  :  metric(X)
3.  cmplt  :  mcomplete(X  with  d)
4.  mtb  :  m-TB(X;d)
5.  f  :  X  {}\mrightarrow{}  \mBbbR{}
6.  \mforall{}x,y:X.    (x  \mequiv{}  y  {}\mRightarrow{}  ((f  x)  =  (f  y)))
7.  k  :  \mBbbN{}\msupplus{}
8.  n  :  \mBbbN{}
9.  \mforall{}p,q:mtb-cantor(mtb).
          ((p  =  q)
          {}\mRightarrow{}  ((f  mtb-cantor-map(d;cmplt;mtb;p)  (2  *  k))  =  (f  mtb-cantor-map(d;cmplt;mtb;q)  (2  *  k))))
\mvdash{}  \mexists{}delta:\{d:\mBbbR{}|  r0  <  d\} 
      \mforall{}x,y:X.
          ((mdist(d;x;y)  \mleq{}  delta)
          {}\mRightarrow{}  (\mexists{}p,q:mtb-cantor(mtb)
                    ((p  =  q)  \mwedge{}  mtb-cantor-map(d;cmplt;mtb;p)  \mequiv{}  x  \mwedge{}  mtb-cantor-map(d;cmplt;mtb;q)  \mequiv{}  y)))


By


Latex:
(InstLemma  `mtb-cantor-map-onto-common`  [\mkleeneopen{}X\mkleeneclose{};\mkleeneopen{}d\mkleeneclose{};\mkleeneopen{}cmplt\mkleeneclose{};\mkleeneopen{}mtb\mkleeneclose{};\mkleeneopen{}n\mkleeneclose{}]\mcdot{}  THENA  Auto)




Home Index