Step * 1 1 1 of Lemma accelerate_wf


1. : ℕ+
2. : ℕ+ ⟶ ℤ
3. accelerate(k;f) ∈ ℕ+ ⟶ ℤ
4. ∀n,m:ℕ+.  (|(m (f n)) (f m)| ≤ ((2 k) (n m)))
5. : ℕ+@i
6. : ℕ+@i
⊢ |(2 k) ((m ((f ((2 k) n)) ÷ k)) ((f ((2 k) m)) ÷ k))| ≤ (|2 k| (n m))
BY
(Assert ∀m,x:ℤ.  ((2 k) (x ÷ k) (m x) (x rem k)) BY
         (Auto
          THEN (Subst' (2 k) m1 (x ÷ k) m1 (2 k) (x ÷ k) THEN Auto)
          THEN RWO "div_rem_sum2" 0
          THEN Auto)) }

1
1. : ℕ+
2. : ℕ+ ⟶ ℤ
3. accelerate(k;f) ∈ ℕ+ ⟶ ℤ
4. ∀n,m:ℕ+.  (|(m (f n)) (f m)| ≤ ((2 k) (n m)))
5. : ℕ+@i
6. : ℕ+@i
7. ∀m,x:ℤ.  ((2 k) (x ÷ k) (m x) (x rem k))
⊢ |(2 k) ((m ((f ((2 k) n)) ÷ k)) ((f ((2 k) m)) ÷ k))| ≤ (|2 k| (n m))


Latex:


Latex:

1.  k  :  \mBbbN{}\msupplus{}
2.  f  :  \mBbbN{}\msupplus{}  {}\mrightarrow{}  \mBbbZ{}
3.  accelerate(k;f)  \mmember{}  \mBbbN{}\msupplus{}  {}\mrightarrow{}  \mBbbZ{}
4.  \mforall{}n,m:\mBbbN{}\msupplus{}.    (|(m  *  (f  n))  -  n  *  (f  m)|  \mleq{}  ((2  *  k)  *  (n  +  m)))
5.  n  :  \mBbbN{}\msupplus{}@i
6.  m  :  \mBbbN{}\msupplus{}@i
\mvdash{}  |(2  *  k)  *  ((m  *  ((f  ((2  *  k)  *  n))  \mdiv{}  2  *  k))  -  n  *  ((f  ((2  *  k)  *  m))  \mdiv{}  2  *  k))|  \mleq{}  (|2  *  k|
    *  2
    *  (n  +  m))


By


Latex:
(Assert  \mforall{}m,x:\mBbbZ{}.    ((2  *  k)  *  m  *  (x  \mdiv{}  2  *  k)  \msim{}  (m  *  x)  -  m  *  (x  rem  2  *  k))  BY
              (Auto
                THEN  (Subst'  (2  *  k)  *  m1  *  (x  \mdiv{}  2  *  k)  \msim{}  m1  *  (2  *  k)  *  (x  \mdiv{}  2  *  k)  0  THEN  Auto)
                THEN  RWO  "div\_rem\_sum2"  0
                THEN  Auto))




Home Index