Step
*
2
1
2
2
of Lemma
rinv_wf
1. x : ℝ
2. a : {2...}
3. mu-ge(λn.4 <z |x n|;1) = a ∈ {1...}
4. 4 < |x a|
5. ∀[i:ℕ+a]. (¬4 < |x i|)
6. ∀m:ℕ+. ((a ≤ m) 
⇒ (m ≤ (a * |x m|)))
7. m : ℕ+
⊢ (2 * m) ≤ ((2 * a) * |reg-seq-adjust(a;x) m|)
BY
{ (InstLemma `reg-seq-adjust-property` [⌜a⌝;⌜x⌝;⌜m⌝]⋅ THEN Auto)⋅ }
1
1. x : ℝ
2. a : {2...}
3. mu-ge(λn.4 <z |x n|;1) = a ∈ {1...}
4. 4 < |x a|
5. ∀[i:ℕ+a]. (¬4 < |x i|)
6. ∀m:ℕ+. ((a ≤ m) 
⇒ (m ≤ (a * |x m|)))
7. m : ℕ+
8. m ≤ (a * |reg-seq-adjust(a;x) m|)
⊢ (2 * m) ≤ ((2 * a) * |reg-seq-adjust(a;x) m|)
Latex:
Latex:
1.  x  :  \mBbbR{}
2.  a  :  \{2...\}
3.  mu-ge(\mlambda{}n.4  <z  |x  n|;1)  =  a
4.  4  <  |x  a|
5.  \mforall{}[i:\mBbbN{}\msupplus{}a].  (\mneg{}4  <  |x  i|)
6.  \mforall{}m:\mBbbN{}\msupplus{}.  ((a  \mleq{}  m)  {}\mRightarrow{}  (m  \mleq{}  (a  *  |x  m|)))
7.  m  :  \mBbbN{}\msupplus{}
\mvdash{}  (2  *  m)  \mleq{}  ((2  *  a)  *  |reg-seq-adjust(a;x)  m|)
By
Latex:
(InstLemma  `reg-seq-adjust-property`  [\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}x\mkleeneclose{};\mkleeneopen{}m\mkleeneclose{}]\mcdot{}  THEN  Auto)\mcdot{}
Home
Index