Step
*
1
2
2
1
1
of Lemma
m-regularize-mcauchy
1. X : Type
2. d : metric(X)
3. s : ℕ ⟶ X
4. k : ℕ+
5. n : ℕ
6. m : ℕn
7. (6 * k) ≤ n
8. (6 * k) ≤ m
9. v : ℕ(n + 1) + 1
10. v1 : ℕ(m + 1) + 1
11. (∀n:ℕv - 1. m-not-reg(d;s;n) = ff) ∧ m-not-reg(d;s;v - 1) = tt supposing 0 < v
12. ¬0 < v1
13. v1 = 0 ∈ ℤ
14. ∀n:ℕm + 1. m-not-reg(d;s;n) = ff
15. v ≤ 0
16. v = 0 ∈ ℤ
17. ∀n:ℕn + 1. m-not-reg(d;s;n) = ff
18. mdist(d;s n;s m) ≤ ((r(3)/r(n + 1)) + (r(3)/r(m + 1)))
⊢ mdist(d;s n;s m) ≤ (r1/r(k))
BY
{ ((Assert (r(3)/r(n + 1)) ≤ (r1/r(2 * k)) BY Auto) THEN (Assert (r(3)/r(m + 1)) ≤ (r1/r(2 * k)) BY Auto)) }
1
1. X : Type
2. d : metric(X)
3. s : ℕ ⟶ X
4. k : ℕ+
5. n : ℕ
6. m : ℕn
7. (6 * k) ≤ n
8. (6 * k) ≤ m
9. v : ℕ(n + 1) + 1
10. v1 : ℕ(m + 1) + 1
11. (∀n:ℕv - 1. m-not-reg(d;s;n) = ff) ∧ m-not-reg(d;s;v - 1) = tt supposing 0 < v
12. ¬0 < v1
13. v1 = 0 ∈ ℤ
14. ∀n:ℕm + 1. m-not-reg(d;s;n) = ff
15. v ≤ 0
16. v = 0 ∈ ℤ
17. ∀n:ℕn + 1. m-not-reg(d;s;n) = ff
18. mdist(d;s n;s m) ≤ ((r(3)/r(n + 1)) + (r(3)/r(m + 1)))
19. (r(3)/r(n + 1)) ≤ (r1/r(2 * k))
20. (r(3)/r(m + 1)) ≤ (r1/r(2 * k))
⊢ mdist(d;s n;s m) ≤ (r1/r(k))
Latex:
Latex:
1.  X  :  Type
2.  d  :  metric(X)
3.  s  :  \mBbbN{}  {}\mrightarrow{}  X
4.  k  :  \mBbbN{}\msupplus{}
5.  n  :  \mBbbN{}
6.  m  :  \mBbbN{}n
7.  (6  *  k)  \mleq{}  n
8.  (6  *  k)  \mleq{}  m
9.  v  :  \mBbbN{}(n  +  1)  +  1
10.  v1  :  \mBbbN{}(m  +  1)  +  1
11.  (\mforall{}n:\mBbbN{}v  -  1.  m-not-reg(d;s;n)  =  ff)  \mwedge{}  m-not-reg(d;s;v  -  1)  =  tt  supposing  0  <  v
12.  \mneg{}0  <  v1
13.  v1  =  0
14.  \mforall{}n:\mBbbN{}m  +  1.  m-not-reg(d;s;n)  =  ff
15.  v  \mleq{}  0
16.  v  =  0
17.  \mforall{}n:\mBbbN{}n  +  1.  m-not-reg(d;s;n)  =  ff
18.  mdist(d;s  n;s  m)  \mleq{}  ((r(3)/r(n  +  1))  +  (r(3)/r(m  +  1)))
\mvdash{}  mdist(d;s  n;s  m)  \mleq{}  (r1/r(k))
By
Latex:
((Assert  (r(3)/r(n  +  1))  \mleq{}  (r1/r(2  *  k))  BY
                Auto)
  THEN  (Assert  (r(3)/r(m  +  1))  \mleq{}  (r1/r(2  *  k))  BY
                          Auto)
  )
Home
Index