---

Step * 1 2 1 of Lemma rmaximum-select


1. n : ℤ
2. d : ℤ
3. [%1] : 0 < d
4. ∀x:{n..(n + (d - 1)) + 1-} ⟶ ℝ. ∀e:ℝ.
     ((r0 < e) ⇒ (∃i:{n..(n + (d - 1)) + 1-}. ((primrec(d - 1;x[n];λi,s. rmax(s;x[n + i + 1])) - e) < x[i])))
5. 1 ≤ d
6. x : {n..(n + d) + 1-} ⟶ ℝ
7. ∀e:ℝ. ((r0 < e) ⇒ (∃i:{n..(n + (d - 1)) + 1-}. ((primrec(d - 1;x[n];λi,s. rmax(s;x[n + i + 1])) - e) < x[i])))
8. e : ℝ
9. r0 < e
⊢ ∃i:{n..(n + d) + 1-}. ((rmax(primrec(d - 1;x[n];λi,s. rmax(s;x[n + i + 1]));x[n + (d - 1) + 1]) - e) < x[i])
BY
{ xxx(((InstHyp [⌜e⌝] (-3))⋅ THENA Auto)
      THEN ExRepD
      THEN xxx((MoveToConcl (-1)) THEN (GenConclAtAddrType ⌜ℝ⌝ [1; 1; 1])⋅ THEN Auto)xxx)xxx }

1
1. n : ℤ
2. d : ℤ
3. [%1] : 0 < d
4. ∀x:{n..(n + (d - 1)) + 1-} ⟶ ℝ. ∀e:ℝ.
     ((r0 < e) ⇒ (∃i:{n..(n + (d - 1)) + 1-}. ((primrec(d - 1;x[n];λi,s. rmax(s;x[n + i + 1])) - e) < x[i])))
5. 1 ≤ d
6. x : {n..(n + d) + 1-} ⟶ ℝ
7. ∀e:ℝ. ((r0 < e) ⇒ (∃i:{n..(n + (d - 1)) + 1-}. ((primrec(d - 1;x[n];λi,s. rmax(s;x[n + i + 1])) - e) < x[i])))
8. e : ℝ
9. r0 < e
10. i : {n..(n + (d - 1)) + 1-}
11. v : ℝ
12. primrec(d - 1;x[n];λi,s. rmax(s;x[n + i + 1])) = v ∈ ℝ
13. (v - e) < x[i]
⊢ ∃i:{n..(n + d) + 1-}. ((rmax(v;x[n + (d - 1) + 1]) - e) < x[i])

---

Latex:

---

Latex:

1.  n  :  \mBbbZ{}
2.  d  :  \mBbbZ{}
3.  [\%1]  :  0  <  d
4.  \mforall{}x:\{n..(n  +  (d  -  1))  +  1\msupminus{}\}  {}\mrightarrow{}  \mBbbR{}.  \mforall{}e:\mBbbR{}.
          ((r0  <  e)
          {}\mRightarrow{}  (\mexists{}i:\{n..(n  +  (d  -  1))  +  1\msupminus{}\}.  ((primrec(d  -  1;x[n];\mlambda{}i,s.  rmax(s;x[n  +  i  +  1]))  -  e)  <  x[i])))
5.  1  \mleq{}  d
6.  x  :  \{n..(n  +  d)  +  1\msupminus{}\}  {}\mrightarrow{}  \mBbbR{}
7.  \mforall{}e:\mBbbR{}
          ((r0  <  e)
          {}\mRightarrow{}  (\mexists{}i:\{n..(n  +  (d  -  1))  +  1\msupminus{}\}.  ((primrec(d  -  1;x[n];\mlambda{}i,s.  rmax(s;x[n  +  i  +  1]))  -  e)  <  x[i])))
8.  e  :  \mBbbR{}
9.  r0  <  e
\mvdash{}  \mexists{}i:\{n..(n  +  d)  +  1\msupminus{}\}
      ((rmax(primrec(d  -  1;x[n];\mlambda{}i,s.  rmax(s;x[n  +  i  +  1]));x[n  +  (d  -  1)  +  1])  -  e)  <  x[i])


By

---

Latex:
xxx(((InstHyp  [\mkleeneopen{}e\mkleeneclose{}]  (-3))\mcdot{}  THENA  Auto)
        THEN  ExRepD
        THEN  xxx((MoveToConcl  (-1))  THEN  (GenConclAtAddrType  \mkleeneopen{}\mBbbR{}\mkleeneclose{}  [1;  1;  1])\mcdot{}  THEN  Auto)xxx)xxx

---

Home Index